Friday

Koneksi Visual Basic ke SQL Server

Dim db As New ADODB.Connection


Dim rs As ADODB.Recordset


Dim strCon As String


Dim namaUser As String


Dim passUser As String


strCon = "Provider=SQLOLEDB.1;Persist Security Info=False;User ID=sa;Initial Catalog=Northwind;Data Source=riyulaptop"


namaUser = "sa"


passUser = "as"


db.Open strCon, namaUser, passUser

perintah diatas merupakan perintah untuk koneksi ke sql server dengan menggunakan Visual Basic 6.0, strCon sebenarnya bisa kita dapatkan dengan memanfaatkan kontrol ADODC lewat fasilitas build connection stringnya (cara ini bahkan bisa dipakai untuk koneksi ADO biasa pada VB .Net). Bagian yang dicetak tebal merupakan bagian yang harus diubah disesuaikan dengan nama server dan user yang terdapat dalam SQL Server. SQL Server pada komputer saya mempunyai nama riyulaptop dengan nama user sa, user sa ini mempunyai password as. Kita bisa saja menggantinya sesuai dengan settingan SQL server dikomputer kita masing-masing. Contoh aplikasinya bisa dilihat di sini, selamat belajar..!!