Koneksi Ke SQL Server

Rasanya topik database adalah topik yang paling ramai dalam penjelasan mengenai penggunaan bahasa program. Hal ini disebabkan karena topik ini sangat mendekati kehidupan sehari-hari programmer dan lebih mudah dikuasai dibandingkan topik-topik pemrograman yang lain.
Oleh karena itu, saat ini, saya akan mencoba memerikan tutorial singkat cara melakukan koneksi database dari visual basic.
Hal-hal dibawah ini yang menjadi pedoman dalam melakukan koneksi:

1. Deklarasikan variabel obyek yang akan digunakan pada pemrograman
2. Instan-kan obyek
3. Arahkan obyek ke file/server database dengan memanipulasi connection string
4. Hapus obyek saat tidak dibutuhkan untuk menghemat memori

DEKLARASI VARIABEL OBYEK
Deklarasi variabek obyek dapat dilakukan dengan cara berikut:

Dim cnConn As ADODB.Connection
Dim rs As ADODB.Recordset

cnConn dan rs adalah nama variabel. Anda dapat menamakan dengan bebas. Dalam penempatan kode diatas pada program, anda dapat menyesuaikan dengan kebutuhan. Pada kasus disini, saya menginginkan, setiap form terbentuk, maka program saya terhubung dengan database. Dengan demikian saya meletakkannya pada Form. Jika diperlukan, anda dapat saja meletakkan Connection pada form utama, kemudian form-form lain yang membutuhkan mereferensi pada form utama tersebut.


INSTAN-KAN OBYEK
Instan-kan obyek AdoDB dengan menulis kode berikut:


Set cnConn = New ADODB.Connection
Set rs = New ADODB.Recordset


meng-instankan adalah proses membuat obyek tersebut tersedia di memori. Dengan tersedianya di memori, maka event dan property pada obyek tersebut dapat digunakan.

ARAHKAN OBYEK KE FILE/SERVER DATABASE
Beberapa hal yang perlu diingat untuk mengarahkan ke file/server adalah sebagai berikut:

1. Nama server
2. User pada server
3. Password pada server
4. Nama database server
5. Waktu koneksi pada server
6. Mulai melakukan koneksi dengan perintah Open

With cnConn
.Provider = "SQLOLEDB.1"
.Properties("Data Source").Value = "SQLServerName"
.Properties("User ID").Value = "UserName"
.Properties("Password").Value = "Password"
.Properties("Initial Catalog").Value = "DatabaseName"
.CursorLocation = adUseClient
.ConnectionTimeout = 0
.Open
End With

HAPUS INSTAN OBYEK YANG TIDAK DIGUNAKAN
Jangan lupa, untuk selalu menghapus setiap instan obyek yang tidak digunakan agar penggunaan memori lebih hemat. Eksekusi penghapusan obyek dapat dilakukan ketika form akan ditutup:
Sebelum dihapus di memori, tutup dulu obyek tersebut:

rs.Close
cnConn.Close

Hapus dari memori:


Set rs = Nothing
Set cnConn = Nothing

Koneksi Ke SQL Server 2014-07-02T19:46:00-07:00 Rating: 4.5 Diposkan Oleh: Good Dreamer