♥ Koneksi database Menggunakan Adodc || VB6

السَّلاَمُ عَلَيْكُمْ وَرَحْمَةُ اللهِ وَبَرَكَاتُهُ

بِسْـــــــــــــــــمِ اللّهِ الرَّحْمَنِ الرَّحِيْم

Entri kali ini tentang koneksi database pada VB 6.0 menggunakan Adodc dan data akan di tampilkan menggunakan DataGrid. mungkin sebagian chum uda banyak yang faham soal ini, namun bagi pemula (yang baru belajar) agak kesulitan tata cara peng-koneksian VB 6.0 ke database.

satu catatan lagi, disini saya menggunakan database Microsoft Access 2003 (extension .mdb) disini saya menggunakan nama database koneksi.mdb dan nama tabelnya adalah tbkoneksi.

berikut cara koneksi database menggunakan Adodc.

buka form baru kemudian pada Tool Box paling bawah saja, lakukan klik kanan dan akan muncul pilihan Components, add tabs, dll >> silahkan anda pilih yang Components

 kemudian pilih dengan mencentang combox di samping "Microsoft ADO Data Control 6.0 (OLEDB)" dan "Microsoft DataGrid Control 6.0 (OLEDB)"seperti gambar di atas. klik tombol Apply -> ok.

kalau udah... masukkan commponen Adodc dan DataGrid ke dalam tampilan form seperti Gambar berikut.

 nah langkah-langkah koneksi databasenya adalah ^_^ :
 1. klik pada Adodc (kebetulan namanya adidc1). pilih ConnectionString pada properties klik tombol add dan akan muncul tampilan Property pages
 










klik tombol build maka akan masuk ke form Data Link Properties. -> pilih Microsoft Jet 4.0 OLE DB Provider -> klik tombol next ->Add tombol pada pilihan Select or Enter....... -> cari database koneksi.mdb (yang dibuat sebelumnya) -> lakukan test Connection dengan klik tombol Test Connection. jika terhubung maka akan muncul pesan "Test Connection Succeded".

 

2. masih pada properties -> pilih RecordSource -> add -> pilih tabel yang sudah dibuat sebelumnya (tbkoneksi)

3. Selanjutnya koneksi data untuk ditampilkan di DataGrid. silahkan klik DataGrid -> pada propertid pilih DataSource -> Pilih Adodc1, setelah itu klik kanan pada DataGrid -> pilih Retrieve Field -> ada pesan pilih tombol "Yes" 

Koneksi Adodc pada dataGrid

Apply Field

Add caption

Program Pada saat di jalankan

 semoga bermanfaat yah chum.... silahkan dicoba ^_^ good luck!!!!