Menghubungkan Database ke Data Grid

Bagaimana dengan program yang anda buat? semakin menemukan titik nyaman anda membuat program?  tau semakin bingung? saya yakin dan saya harap anda tidak patah semangat dan mengurungkan niat anda untuk melanjutkan program yang anda buat. kalau anda mempunyai permasalahan dengan cara menyambungkan database ke Data Grid dan menampilkannya di Data Grid, ini dia caranya. Tapi tentunya langkah ini harus mengikuti langkah sebelumnya yaitu menghubungkan Database dengan koneksi Adodc, anda bisa membacanya di postingan saya sebelumnya, klik saja disini

jika anda sudah melakukan langkah tersebut, saatnya kita koneksika database ke Data Grid. langkahnya yaitu cukup dengan menyimpan listing code berikut di form_load atau jika anda menggunakan contoh saya sebelumnya simpan di private sub loaddb() . list nya sebagai berikut :

Set tbl_kons.DataSource = adokons

tbl_kons.Refresh

Huruf yang dicetak tebal berwarna hitam adalah nama Data Grid yang akan dikoneksikan dan Huruf yang berwarna merah adalah nama Adodc.

Selamat mencoba dan enjoy... silahkan komentarnya... atau Baca postingan lainnya.

Cara Mudah Koneksi Database ADODC di Visual Basic 6

Artikel pemrograman yang akan  saya share kali ini yaitu tentang bagaimana caranya membuat koneksi database Ms. Access  ke Visual Basic 6 dengan pembahasan yang ringkas dan mudah untuk diimplementasikan. 

Caranya anda buka proyek program yang sudah anda buat, anda juga bisa membuat baru. designnya sesuaikan dengan database yang anda buat. 

Tambahkan satu module, dan ketikkan listing di bawah ini :

Public Conn As New ADODB.Connection

Public rsanggota As ADODB.Recordset

Public Sub BukaDB()

Set Conn = New ADODB.Connection

Set rsanggota = New ADODB.Recordset

Conn.Open "PROVIDER=Microsoft.Jet.OLEDB.4.0;Data Source=" & App.Path & "\dbanggota.mdb"

End Sub

Sesuaikan huruf yang dicetak tebal pada listing di atas dan sesuaikan pula nama database yang berwarna merah tersebut dengan database program anda. (catatan: simpan database tepat di file program yang sedang anda buat. jika berada di dalam direktori tertentu, maka tambahkan \namadirektori. contoh \dbase\namadatabase.mdb)

Tutup module dan buka form. beralih ke jendela code dan ketikan listing di bawah ini :

Private Sub loaddb()

Call BukaDB

adoanggota.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source= " & App.Path & "\dbanggota.mdb"

adoanggota.RecordSource = "anggota"

adoanggota.Refresh

End Sub

Jangan lupa untuk menambahkan komponen Adodc di program anda. jika anda tidak menemukannya, klik kanan pada toolbox, tambahkan Ms. Ado Data Control 6.0 (OLEDB).

Sesuaikan huruf yang dicetak tebal hitam dengan nama ADODC di form anda. sesuaikan pula nama database anda pada huruf berwarna merah. untuk huruf berwarna hijau, sesuaikan dengan nama tabel yang anda tuju.

satu langkah lagi, tambahkan pada sub form_load listing berikut :

call loaddb

nah, database anda sudah terkoneksi dengan Visual Basic. tandanya adalah, Adodc akan muncul dengan warna jelas. jika belum terkoneksi, adodc akan terlihat seperti samar (Enabled=false).

Semoga bermanfaat.