Cara Koneksi Database SQL Server VB 6.0

Dibawah ini akan di jelaskan step by step cara koneksi database SQL Server dengan Visual Basic 6.0. Seperti yang kita tahu bahwa dalam membuat aplikasi berbasis Client Server, kami menyarankan menggunakan database SQL Server. ada beberapa alasan yang pertama SQL Server masih keluarga microsoft, system security yang bagus dan mudah untuk diconfigurasi.
Pada Tutorial dibawah ini kami menggunakan SQL Server versi 2008

Berikut langkah-langkahnya :
Buatlah atabase dengan nama : DB_SEWAMOBIL
Buatlah sebuah tabel dengan nama : TBL_MOBIL
Design TBL_MOBIL adalah sebagai berikut :

kemudian karena nantinya kita akan mencoba mengkoneksikan, maka tidak ada salahnya kita masukan sample data seperti gambar dibawah ini :

Jika sudah malukan langkah diatas,
Buka aplikasi VB 6.0 anda
Jika sudah muncul form1, design form1 seperti gambar dibawah ini :

Gambar diatas hanya di masukan Datagrid1 dan Adodc1 pada Form1
Kemudian masukan koding dibawah ini :

Dim Koneksi As New ADODB.Connection
Dim RSMOBIL As ADODB.Recordset
Sub BukaDB()
 Set Koneksi = New ADODB.Connection
 Set RSMOBIL = New ADODB.Recordset
 Koneksi.Open "Provider=SQLOLEDB.1;Integrated Security=SSPI;Persist Security Info=False;Initial Catalog=DB_SEWAMOBIL"
End Sub
Private Sub Form_Load()
Call BukaDB
Adodc1.ConnectionString = Koneksi
Adodc1.RecordSource = "TBL_MOBIL"
Adodc1.Refresh

Set DataGrid1.DataSource = Adodc1
End Sub

Silahkan Run atau jalankan Project VB 6.0 anda, dan hasilnya seperti gambar dibawah ini :

Mudah bukan??? selamat mengikuti pembelajaran kami berikutnya yaaaa :

1. Cara Input Database SQL Server dengan Visual Basic 6.0
2. Cara Edit Database SQL Server dengan Visual Basic 6.0
3. Cara Hapus Database SQL Server dengan Visual Basic 6.0

Langkah-langkahnya sudah kami buatkan dalam File PDF dan  menggunakan SQL Server 2005, anda bisa langsung lihat dengan KLIK LINK INI