Pemahaman Objek ADODC untuk Koneksi ke Database di VB6

Properti	Kegunaan
BOFAction	Untuk menentukan apa yang akan dilakukan jika kondisi BOF (Beginning Of File) ditemukan (0-adDoMoveFirst, 1-adStayBOF)
CommandType	Untuk menentukan tipe command yang digunakan, pilihannya adalah (8-adCmdUnkonwn, 1-adCmdText, 2-adCmdTable, 3-adCmdStoredProc)
ConnectionString	Untuk menentukan jenis Database yang kan dihubungkan dengan project
CursorLocation	Untuk menentukan lokasi cursor yang digunakan, apakah disisi Client (3-adUseClient,) atau disisi server (2-adUseServer) Cursor adalah sekumpulan record yang dihasilkan atas satu atau lebih tabel dari sebuah program aplikasi database (DBMS) misalnya SQL Server Cursor nantinya akan ditampung dalam sebuah objek Recordset
CursorType	Untuk menentukan tipe cursor yang digunakan, pilihannya adalah (1-adOpenKeyset, 2-adOpenDynamic, 3-adOpenStatic)
EOFAction	Untuk menentukan pa yang kan dilakukan jikalau kondisi EOF (End Of File) ditemukan (0-adDoMoveLast, 1-adStayEOF, 2-adDoAddNew)
LockType	Untuk menentukan bagaimana ADO tersebut menangani konkurensi, artinya apa yang akan dilakukan jika terdapat dua pengguna sedang mengubah (men-update) record yang sama. Pilihannya adalah (-1-adLockUnspecified, 1-adLockReadOnly, 2-adLockPessimisstic, 3-adLockOptimistic, 4-adLockBatchOptimistic)
MaxRecord	Untuk menentukan jumlah maksimum record yang akan diambil ketika database dibuka
RecordSource	Untuk menentukan nama Recordset yang digunakan. Dapat berupa nama tabel jika properti CommandType = 2-adCmdTable atau berupa query (perintah sql) jika properti CommandType = 1-adCmdText

Adapun event yang sering digunakan untuk bekerja di objek ADODC adalah sebagai berikut :

Event	Keterangan
MouseDown	Terjadi ketika pemakai menekan tombol mouse pada objek Data parameter yang dapat digunakan adalah Button (1-tombol kiri, 2-tombol kanan), Keyboard (1-Shift, 2-Ctrl, 3-Alt), X (posisi kolom pointer), Y (posisi baris pointer)
MouseMove	Terjadi ketika pemakai menggerakan mouse pada objek Data parameter yang dapat digunakan adalah Button (1-tombol kiri, 2-tombol kanan), Keyboard (1-Shift, 2-Ctrl, 3-Alt), X (posisi kolom pointer), Y (posisi baris pointer)
MouseUp	Terjadi ketika pemakai melepaskan penekanan tombol mouse pada objek Data parameter yang dapat digunakan adalah Button (1-tombol kiri, 2-tombol kanan), Keyboard (1-Shift, 2-Ctrl, 3-Alt), X (posisi kolom pointer), Y (posisi baris pointer)
DragDrop	Terjadi ketika objek ADO dipindahkan
DragDrop	Terjadi ketika objek ADO mengalami Error

Sedangkan berikut ini adalah beberapa metode yang biasa digunakan oleh ADODC :

Metode	Keterangan
Move	Metode yang digunakan untuk memindahkan letak kontrol ADODC maupun mengubah ukurannya
Refresh	Untuk mencetak ulang objek Data
Zorder	Untuk menentukan order objek ADODC, apakah diatas atau dibawah objek lain

Berikut dibawah ini adalah bebebrapa perintah objek ADODC yang berhubungan dengan aksi Record:

1. Berpindah Record
Untuk berpindah record selain menggunakan tombol-tombol yang terdapat dalam objek ADODC, juga dapat dilakukan melalui bebebrapa metode yang dituliskan dalam kode program. Metode-metode tersebut itu adalah MoveFirst, MoveLast, MoveNext dan MovePrevious.
Aturan penulisan kode program untuk berpindah record adalah sebagai berikut :

-Berpindah ke Record pertama
<namaobjectADODC>.Recordset.MoveFirst

-Berpindah ke Record terakhir

<namaobjectADODC>.Recordset.MoveLast

-Berpindah ke Recordselanjutnya

<namaobjectADODC>.Recordset.MoveNext

-Berpindah ke Record sebelumnya

<namaobjectADODC>.Recordset.MovePrevious


2. Pencarian Record dengan Find
Ada dua jenis pencarian dengan ADODC yaitu dengan Find dan Filter.Meetode Find, jika record yang dicari ditemukan recordset akan menunjuk pada record tersebut, jika tidak ditemukan maka akan menuju kondisi EOF.

Berikut adalah aturan penulisan kode programnya :
<namaobjekADODC>.Recordset.Find "<kriteria>"

Contoh penggunaannya:
data_dosen.Recordset.MoveFirst
data_dosen.Recordset.Find "kode = 'yang dicari'"
if data_dosen.Recordset.EOF Then
MsgBox "Data tidak ditemukan"
else
MsgBox "Data ditemukan"
End if


3. Pencarian ADODC dengan Filter
data_dosen.Recordet.Filter = "nilai > 10 And nilai <20"
data_dosen.Refresh


4. Menambah Record
<namaobjekADODC>.Recordset.AddNew


5. Menghapus Record
<namaobjekADOODC>.Recordset.Delete


Demikian artikel mengenai Objek ADODC untuk Koneksi ke Database di VB6. semoga dengan adanya artikel dapat menambah wawasan kita dalam dunia pemograman khususnya Visual Basic 6.0.

Download Source Code Program