Tolong pilih kategori sesuai, jenis posting (diskusi atau bukan) dan sertakan tag/topik yang sesuai seperti komputer, java, php, mysql, dll. Promosi atau posting tidak pada tempatnya akan kami hapus!
- Bagi Anda yang ingin mendaftar, baca link berikut:
http://diskusiweb.com/discussion/50491/how-to-registrasi-diskusiweb-com-baca-ini-terlebih-dahulu
- Cara menyisipkan kode program supaya tampil rapi dan terformat dengan baik di diskusiweb.com: http://www.diskusiweb.com/discussion/50415/cara-menyisipkan-kode-program-di-diskusiweb-com
- Cara posting gambar/image di post Anda: http://www.diskusiweb.com/discussion/47345/cara-menyisipkan-menyertakan-image-pada-posting/p1

Binding Database ke Datagridview

bro bro semuanya, ane mau tampilin database ke datagridview, tapi makai library autofilter



ini koding ane gan


        Dim ds As DataSet
Dim oda As OdbcDataAdapter
Dim sql As String
Dim i As Integer
 
i = 0
conn = New OdbcConnection("Driver={Microsoft Access Driver (*.mdb, *.accdb)};DBQ=c:\databseku.mdb;")
 
sql = "SELECT * FROM tabel1"
 
oda = New OdbcDataAdapter(sql, conn)
ds = New DataSet("dsTemp")
 
'TODO: This line of code loads data into the 'DataSet1.tabel1' table. You can move, or remove it, as needed.
Me.table1TableAdapter.Fill(Me.DataSet1.table1)
 
oda.Fill(ds, "table1")
 
datagridview1.DataSource = table1BindingSource

saya sudah mencoba melakukan binding ke dalam datagridview, tetapi di datagridview, tidak menampilkan isi database saya, melainkan hanya ada 4 row kosong yang bertambah, 4 row kosong itu sebenarnya (mungkin) sudah terbaca oleh datagridview cuman belum bisa menampilkan isi nya, yang saya mau tanya kan, bagaimana nampilin isi databasenya ya?

Comments

  • edited November 2012
    ada beberapa yang direvisi, dicoba dulu ya, mudah2an bisa

    Dim ds As new DataSet
    Dim oda As OdbcDataAdapter
    Dim sql As String
    Dim i As Integer
     
    i = 0
    conn = New OdbcConnection("Driver={Microsoft Access Driver (*.mdb, *.accdb)};DBQ=c:\databseku.mdb;")
     
    If conn.State = ConnectionState.Closed Then
    conn.Open()
    End If

    sql = "SELECT * FROM tabel1"
     
    oda = New OdbcDataAdapter(sql, conn)

     
    oda.Fill(ds, "table1")
     
    datagridview1.DataSource = ds.tables("table1")


    wah.....gw belum tau caranya nyisip kode program di DW biar warnanya gak ngejreng gini, mana berantakan lagi... :))
This discussion has been closed.