Koneksi Database Sql Server Dengan Visual Basic 6

Sebelumnya kami sudah membuat artikel mengenai Koneksi Database Access Dengan Visual Basic 6. Pada kesempatan ini kami akan membuat artikel mengenai Koneksi Database SQL Server Dengan Visual Basic 6. Caranya sangat mudah sekali, masih tetap menggunakan ADODB seperti koneksi dengan Access.


Berikut ini adalah langkah-langkah Koneksi Database SQL Server Dengan Visual Basic 6.

1. Pertama-tama kami membuat Databasenya di SQL Server. Kami membuat database dengan nama DbLatihan.



2. Buat design form seperti gambar dibawah. Terdapat satu Command Button kemudian berinama menjadi CmdKoneksi.




3. Seperti yang kami jelaskan pada Koneksi Access sebelumnya. Kami disini menggunakan ADODB sebagai koneksi ke database SQL Server. Jadi butuh References untuk mengkoneksikan database SQL Server ke Visual Basic 6. Bisa lihat pada gambar dibawah ini.




4. Setelah terbuka References Dialognya, cari References Microsoft ActiveX Data Objects. Pilih salah satu diantara beberapa versi yang muncul.



5. Kemudian masukkan script berikut ke dalam event CmdKoneksi_Click.




Private Sub CmdKoneksi_Click()
Dim Db As New ADODB.Connection
Dim Constr As String

Constr = "Provider=SQLOLEDB.1;Password=y2k;Persist Security Info=True;User ID=sa;Initial Catalog=DbLatihan;Data Source=PCTOS23-TRIE\SQL2008R2"
Db.Open Constr

MsgBox "Koneksi Database Berhasil...!", vbInformation
End Sub



6. Apabila sudah selesai membuat script diatas maka coba sekarang dijalankan dengan menekan F5.

Itu saja artikel yang kami buat, kurang lebihnya kami mohon maaf. Semoga kalian semua bisa cepat Pandai VB.

Related Posts:

Tweet