Belajar dan belajar

Langkah awal dalam mendesain program database adalah melakukan koneksi ke database, dalam hal ini yang saya akan gunakan adalah Mysql. umumnya koneksi diawali dengan pendeklarasian variabel - variabel yang digunakan dengan setting variabel tersebut dalalm Form load. sebelum membuat sebuah fungsi pembuka database, kita harus memaktifkan komponen "refensi ADO" dengan cara :
1. klik menu project,
2. klik menu references
3. centang microsoft Aktivec Data Object 2.6 Libarary
pastikan anda sudah mempunyai ODBC Connector, jika belum punya silahkan download disini , setelah itu


Scrip yang di gunakan adalah seperti ini..
taruhlah pada sebuah modul

Option Explicit


Public bukadb As New ADODB.Connection
Public Str As String


Public Sub bukadatabase()
 
   Set bukadb = New ADODB.Connection
   str = "DRIVER={MYSQL ODBC 3.51 Driver};" & _
   " server=localhost; " & _
   " password=; " & _
   " database=coba;" & _
   " user=root;"
   bukadb.CursorLocation = adUseClient
   If bukadb.State = adStateOpen Then
     bukadb.Close
     bukadb.Open str
       Else
         bukadb.Open str
   End If
End Sub


sederhana bukan,,, jika kita ingin membuka koneksi ke database cukup menggundang fungsi bukadatabase, yangditaruhakan pada From_load (), dengan cara "CALL bukadatabase"...

semoga bermanfaat,,,