VB.NET

How to retriev data frm DB in datacombo

Please support our VB.NET advertiser: Intel Parallel Studio Home

•

Join Date: Sep 2008

Posts: 22

Reputation: asmit1987 is an unknown quantity at this point

Solved Threads: 0

asmit1987

Offline

Newbie Poster

How to retriev data frm DB in datacombo

Sep 25th, 2008

I want to retrieve data frm my DB in a datacombo what event nd property shud i use plz help me with the single line code to retrieve data

•

Join Date: Nov 2007

Posts: 2,641

Reputation: Jx_Man is a glorious beacon of light

Solved Threads: 245

Jx_Man

Offline

Posting Maven

Re: How to retriev data frm DB in datacombo

Sep 25th, 2008

 Help with Code Tags 
 VB.NET Syntax (Toggle Plain Text) 
Private Sub ReadData()
        Dim i As Integer
 
        con.ConnectionString = ("Provider = Microsoft.JET.OLEDB.4.0;Data Source= D:\Only Me\Authors.mdb")
        Try
 
            cmdOle = con.CreateCommand
            cmdOle.CommandText = "SELECT * FROM Authors "
            da.SelectCommand = cmdOle
            da.Fill(dsOle, "Authors")
            dtOle = dsOle.Tables("Authors")
            For i = 0 To dtOle.Rows.Count - 1
                cmbAuthor.Items.Add(dtOle.Rows(i).Item(1))
            Next
 
        Catch ex As Exception
            MsgBox("Error: " & ex.Source & ": " & ex.Message, MsgBoxStyle.OKOnly, "Koneksi Error !!")
        End Try
        con.Close()
End Sub
Private Sub ReadData()
        Dim i As Integer

        con.ConnectionString = ("Provider = Microsoft.JET.OLEDB.4.0;Data Source= D:\Only Me\Authors.mdb")
        Try

            cmdOle = con.CreateCommand
            cmdOle.CommandText = "SELECT * FROM Authors "
            da.SelectCommand = cmdOle
            da.Fill(dsOle, "Authors")
            dtOle = dsOle.Tables("Authors")
            For i = 0 To dtOle.Rows.Count - 1
                cmbAuthor.Items.Add(dtOle.Rows(i).Item(1))
            Next

        Catch ex As Exception
            MsgBox("Error: " & ex.Source & ": " & ex.Message, MsgBoxStyle.OKOnly, "Koneksi Error !!")
        End Try
        con.Close()
End Sub

in looping function ReadData will fill cmbAuthor with 2nd column from table author (.item(1), index start from 0).
cmbAuthor.Items.Add(dtOle.Rows(i).Item(1))

Never tried = Never Know
So, Please do something before post your thread.
* PM Asking will be ignored *

•

Join Date: Sep 2008

Posts: 22

Reputation: asmit1987 is an unknown quantity at this point

Solved Threads: 0

asmit1987

Offline

Newbie Poster

Re: How to retriev data frm DB in datacombo

Sep 28th, 2008

if i want to store data from datacombo of a particular field of the table of a database the cmbAuthor u mentioned and the code cmbAuthor.Items.Add(dtOle.Rows(i).Item(1)) will it be sufficient bcoz no where else u mentioned the field name.....

•

Join Date: Nov 2007

Posts: 2,641

Reputation: Jx_Man is a glorious beacon of light

Solved Threads: 245

Jx_Man

Offline

Posting Maven

Re: How to retriev data frm DB in datacombo

Sep 29th, 2008

I was told u in previous post, I said the index of item means index of column on your table.but you can change with :
cmbAuthor.Items.Add(dtOle.Rows(i).Item("ColumnName"))

Last edited by Jx_Man; Sep 29th, 2008 at 12:14 am.

Never tried = Never Know
So, Please do something before post your thread.
* PM Asking will be ignored *