Pertama buat object connection, Private Sub Form_Load() On Error Go To HELL Dim con As New ADODB.connection Dim sObjStrCon As String
sObjStrCon = "Provider=SQLOLEDB.1;Data Source=(local);Initial Catalog=Northwind;Usr=sa;Pwd=pwdsa;" con.open(sObjStrCon) Debug.Print "Connection Okay" Exit Sub HELL: Debug.Print "Connection Failed" End Sub dicoba yaaaa... Rgrds' Ado * Original message * From: [email protected] Sent: 16:18:15 02-07-2010 To: [Programmer VB] [email protected] Subject: [programmer-vb] MSDE SQL SERVER 2000 dear all, ada yang tau cara koneksi dengan microsoft desktop engine sql server 2000 dan cara menyimpan data nya.. best regrads, story .:: Group of Book Publishing - Kompas Gramedia
