Display content in Listbox

[042355C]

Hi to all,

I have a ODBC table call [hflAdvisoryReports]. In it, I wish to fill the listbox with a column name called [RepCode]. Can someone teach me how to do it? Thanks alot in advance.

 

[Inhua]

Hi 042355C,

I make a new Windows application project and add a ListBox1 and Button1 controls. The code looks below:

Imports System.Data.Odbc

Public Class Form1
    Inherits System.Windows.Forms.Form

    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click

        Dim sql As String = "SELECT RepCode FROM hflAdvisoryReports"
        Dim cn As New OdbcConnection("DSN=MyDataSource")
        Dim cm As New OdbcCommand(sql, cn)
        Dim da As New OdbcDataAdapter(cm)
        Dim ds As New DataSet

        da.Fill(ds, "hflAdvisoryReports")

        ListBox1.DataSource = ds.Tables("hflAdvisoryReports")
        ListBox1.ValueMember = "RepCode"
        ListBox1.DisplayMember = "RepCode"

        cm = Nothing
        da = Nothing
        ds = Nothing
        cn.Close()
    End Sub
End Class

Thank's,
Inhua

 

[042355C]

it did not work. the program failed to run.

Error occured at : da.Fill(ds, "hflAdvisoryReports")

An unhandled exception of type 'System.Data.Odbc.OdbcException' occurred in system.data.dll
Additional information: System error.

 

[Inhua]

What kind of database do you use? MS Access, Paradox, other?

Thank's,
Inhua

 

[042355C]

im using microsoft sql server