Like this:

Delphi 7 menyediakan beberapa cara untuk koneksi ke database SQL Server 7/2000. Salah satunya adalah menggunakan komponen ADODB yaitu ADOConnection.
Bagaimana cara mensetting dan menggunakan komponen tersebut ? Mari kita buat program sederhana berikut ini.

Rancanglah form seperti gambar berikut:

Komponen ADOConnection1 bisa diambil di tab ADO pada Component Pallette.

Atur properti masing-masing object sbb:

frmKoneksi : BorderStyle=bsDialog | Caption=Koneksi SQL Server via ADODB | Position=poScreenCenter
txtServerName : Text=127.0.0.1
txtUserName : Text=sa
txtUserPass : Text=<kosongkan> | PasswordChar=*
txtDatabase : Text=northwind
btnTes : Caption=Tes Koneksi
ADOConnection1 : LoginPrompt=false

Klik ganda btnTes dan ketik program berikut:

Selesai ! Mudah bukan ?? Coba run project tersebut lalu klik Tes Koneksi. Jika SQL Server sudah running, maka program menampilkan messagebox Koneksi berhasil, sebaliknya program akan menampilkan messagebox Koneksi gagal dengan kemungkinan penyebabnya:
- SQL Server belum running
- Nama server atau IP Address salah atau LAN terputus
- User Name dan/atau Password salah
- Nama database tidak ditemukan

Sekarang mari kita bahas tentang ADO khususnya komponen ADOConnection yang kita gunakan tadi. Sedikit cerita, ADO merupakan singkatan dari ActiveX Dataset Objects buatan Microsoft. ADO adalah sekumpulan library yang dapat digunakan untuk mengakses berbagai macam format basis data yang terkenal, mulai dari kelas file seperti dBase, Paradox hingga yang sekelas server seperti SQL Server dan Oracle. Karena berupa ActiveX maka komponen ADO netral terhadap bahasa pemrograman, artinya, apapun bahasa pemrograman yang Anda gunakan asalkan bahasa tersebut bisa memanggil ActiveX maka ADO bisa digunakan (jadi inget Teh Sosro). Otomatis, bahasa pemrograman visual terkini seperti Delphi, VB, Visual FoxPro, Visual C++,bisa menggunakan komponen ADO tersebut.

Delphi 7 menjajarkan komponen ADO pada tab ADO di Component Palette-nya. Disitu terdapat komponen ADOConnection, ADOCommand, ADODataSet, ADOTable, ADOQuery, ADOStoredProc dan RDSConnection.

Khusus untuk membuka koneksi ke database, gunakan komponen ADOConnection. Properti yang harus di-set adalah ConnectionString. ADOConnection membaca properti ini sebagai konfigurasi untuk membuka koneksi. ConnectionString terdiri dari beberapa parameter yang masing-masing dipisah dengan titik-koma. Untuk koneksi ke SQL Server, parameter-parameter tersebut adalah:

Provider=SQLOLEDB.1
Provider adalah nama driver yang akan digunakan oleh ADO untuk membuka koneksi. Nama driver SQL Server adalah SQLOLEDB.1
Persist Security Info=False
Jika parameter ini True, maka ADO akan menggunakan user account yang terdaftar pada sistem operasi server. Jika False, ADO menggunakan user account internal SQL Server. Parameter ini berkaitan erat dengan parameter User ID dan Password
User ID=<user id>
User ID yang digunakan untuk login ke SQL Server. Jika parameter Persist Security Info=True, user id yang diisi harus sesuai dengan user account sistem operasi, sebaliknya jika False, user id harus sesuai dengan user account internal SQL Server. Jika belum diganti, user id default SQL Server adalah sa
Password=<user pass>
Password yang digunakan untuk login ke SQL Server. Parameter ini diberlakukan sama seperti halnya parameter User ID. Jika belum diganti, password ini kosong, artinya Anda bisa login tanpa menggunakan password dengan User ID sa tersebut. Untuk kasus sebenarnya, sebaiknya ganti password ini
Initial Catalog=<nama database>
Isi parameter ini dengan nama database yang hendak dikoneksikan
Data Source=<nama kompi server atau ip addressnya>
ADO bisa membuka koneksi dengan mencari nama server ataupun IP addressnya. Sebaiknya gunakan nama server, karena nama server cenderung jarang diganti dibandingkan IP address. Jika SQL Server berada pada kompi yang sama dengan program aplikasi, nama server bisa menggunakan localhost atau IP 127.0.0.1

Kembali ke program kita, jika Nama Server diisi 127.0.0.1 , User Name Database diisi sa, Password Database dikosongkan, Nama Database diisi northwind lalu tombol Tes Koneksi diklik, maka program otomatis akan membentuk ConnectionString :

Provider=SQLOLEDB.1; Persist Security Info=False;User ID=sa;Password=;Initial Catalog=northwind;Data Source=127.0.0.1

Selanjutnya string tersebut diaplikasikan pada komponen ADOConnection1 dan membuka koneksi dengan memanggil method ADOConnection1.Open (lihat baris 46-55)

Sudah mendapat pencerahan ? Semoga tulisan ini cukup membantu…

Advertisement