Vb 6.0 - Cara Gampang Koneksi Database Sql Server
Pada Tutorial Gratis Visual Basic 6.0 kali ini akan dibahas mengenai Cara Praktis Koneksi Database SQL Server pada Microsoft Visual Basic 6.0.
Untuk dapat mengikuti tutorial ini, pastikan anda telah menginstall :
1. VMicrosoft Visual Basic 6.0
2. Database SQL Server ( kami memakai versi 2008 R2 )
Berikut langkahnya :
#Membuat Database dan Tabel
Buatlah database dengan nama : DBPERPUS
Buatlah tabel dengan nama : TBL_PETUGAS
Design TBL_PETUGAS yaitu menyerupai gambar dibawah ini :
#Membuat Form Pada VB 6.0 dan Kodingnya
Silahkan buka Microsoft Visual Basic anda
Buatlah form menyerupai gambar dibawah ini :
Baca Juga : Cara Praktis Koneksi Database MySQL dengan VB 6.0
Kemudian yang terakhir adalah, masukan koding dibawah ini :
Untuk nama yang aku tandai warna kuning, silahkan ganti dengan nama komputer anda.
Anda dapat KLIK DISINI untuk melihat Tutorial diatas biar anda lebih jelas
Demikian Cara Praktis Koneksi Database SQL Server pada VB 6.0, semoga bermanfaat untuk sahabat JNM dimanapun anda berada :)
Untuk dapat mengikuti tutorial ini, pastikan anda telah menginstall :
1. VMicrosoft Visual Basic 6.0
2. Database SQL Server ( kami memakai versi 2008 R2 )
Berikut langkahnya :
#Membuat Database dan Tabel
Buatlah database dengan nama : DBPERPUS
Buatlah tabel dengan nama : TBL_PETUGAS
Design TBL_PETUGAS yaitu menyerupai gambar dibawah ini :
#Membuat Form Pada VB 6.0 dan Kodingnya
Silahkan buka Microsoft Visual Basic anda
Buatlah form menyerupai gambar dibawah ini :
Baca Juga : Cara Praktis Koneksi Database MySQL dengan VB 6.0
Kemudian yang terakhir adalah, masukan koding dibawah ini :
Dim Koneksi As New ADODB.Connection Dim RSBarang As ADODB.Recordset Sub BukaDB() Set Koneksi = New ADODB.Connection Set RSBarang = New ADODB.Recordset Koneksi.Open "Provider=SQLOLEDB.1;Integrated Security=SSPI;Persist Security Info=False;Initial Catalog=DBPERPUS;Data Source=JAVANET001" End Sub Private Sub Form_Load() Call BukaDB Adodc1.ConnectionString = Koneksi Adodc1.RecordSource = "TBL_PETUGAS" Adodc1.Refresh Set DataGrid1.DataSource = Adodc1 End Sub
Untuk nama yang aku tandai warna kuning, silahkan ganti dengan nama komputer anda.
Anda dapat KLIK DISINI untuk melihat Tutorial diatas biar anda lebih jelas
Demikian Cara Praktis Koneksi Database SQL Server pada VB 6.0, semoga bermanfaat untuk sahabat JNM dimanapun anda berada :)