Dear Sirs,
Like this
Dim conStr As String = "Provider=Microsoft.JET.OLEDB.4.0;data Source=" &
VB6.GetPath & "\Rehber.mdb"
Dim sqlStr As String = "SELECT DISTINCT Gurup FROM Rehber Order by Gurup"
Dim conn As OleDbConnection = New OleDbConnection(conStr)
' Create data adapter object
Dim da As OleDbDataAdapter = New OleDbDataAdapter(sqlStr, conn)
' Create a dataset object and fill with data using data adapter's Fill
method
Dim ds As DataSet = New DataSet
da.Fill(ds, "Rehber")
' Attach dataset's DefaultView to the datagrid control
Dim dv As DataView = ds.Tables("Rehber").DefaultView
Me.cmbGurup.DataSource = dv
Me.cmbGurup.DisplayMember = "Gurup"
"Fergus Cooney" <fi******@tesco.net> wrote in message
news:u7*************@tk2msftngp13.phx.gbl...
Hi QT,
How are you setting up dv ?
Regards,
Fergus