Membuat Database Access dengan Visual Basic 2008

Bahasa Program: Visual Basic 2008

Sertakan referensi Adox agar dapat membuat database Access:
Pilih Menu Project >> Add Reference >>

 

Pilih Tab Com >> Pilih Microsoft ADOX Ext. 6.0 for DDL and Security.

Di tempat Anda bisa saja ADOX-nya tidak bertipe 6.0, misal bertipe 2.8. Tidak masalah! Pilih saja yang sesuai di tempat Anda.

 
Program Selengkapnya:

Public Class Form1

    Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        
        Dim NewDb As New ADOX.Catalog()
        Dim FullPath As String

        FullPath = "D:\RumahSakit.mdb"

        Dim sStringKoneksi As String
        sStringKoneksi = _
          "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & _
           FullPath
        
        NewDb.Create(sStringKoneksi)

        NewDb = Nothing

    End Sub
End Class

Membuat Database Access dengan Visual Basic 2008 2015-08-15T19:39:00-07:00 Rating: 4.5 Diposkan Oleh: Good Dreamer