Combobox with oracle database

[Antoine]

Hi

I try to fill a combobox with a dataset. I see the data in the dataset, but when i try to bind this dataset with a combobox. The list is fill only whith this message "System.Data.Da taRowView". That was my code, can you help me.

Thanks!

Tr

'Create connection object
Dim strConnNorthwin d As String = "Provider=oraol edb.oracle;User Id=sigrem; " &
"Data Source=sigrem.m etis;password=a dminsigrem
Dim cnPubs As OleDbConnection = New OleDbConnection (strConnNorthwi nd
Dim PubsDA As New OleDbDataAdapte r("SELECT * FROM Projet", cnPubs
Dim dsAuthors As New DataSe
PubsDA.Fill(dsA uthors, "Projet"
Dim dvAuthors As DataView = dsAuthors.Table s("Projet").Def aultVie
With cboPub
.DataSource = dvAuthor
.DisplayMember = "NoProjet
End Wit
'With lstTes
' .DataSource = dvAuthor
' .DisplayMember = "NomUsager
'End Wit
'cboPubs.Select edIndex = -
'cnPubs.Dispose (
'PubsDA.Dispose (
Catch ex As Exceptio
MsgBox(ex.Messa ge, MsgBoxStyle.Inf ormation, Me.Text
End Try

[Cor Ligthert]

Hi Antoine,

I don't see direct something, however the most change you have is that
"NoProjet" is not the name in the datatabel, it is case sensetive you know.

Did you know that those "with" statements are seldom used here anymore in
this newsgroup.
It's your choise of course, however for the typed characters you do not have
to do it, there are now more characters than without it.

However that was not the question, I hope the first sentence helps you.

Cor

[William Ryan eMVP]

Are you sure the datacolum names are correct? This is oftne the problem.
"Antoine" <an*******@disc ussions.microso ft.com> wrote in message
news:5F******** *************** ***********@mic rosoft.com...

Hi,

I try to fill a combobox with a dataset. I see the data in the dataset, but when i try to bind this dataset with a combobox. The list is fill only
whith this message "System.Data.Da taRowView". That was my code, can you
help me.
Thanks!!

Try

'Create connection objects
Dim strConnNorthwin d As String = "Provider=oraol edb.oracle;User Id=sigrem; " & _ "Data Source=sigrem.m etis;password=a dminsigrem"
Dim cnPubs As OleDbConnection = New OleDbConnection (strConnNorthwi nd) Dim PubsDA As New OleDbDataAdapte r("SELECT * FROM Projet", cnPubs) Dim dsAuthors As New DataSet
PubsDA.Fill(dsA uthors, "Projet")
Dim dvAuthors As DataView = dsAuthors.Table s("Projet").Def aultView With cboPubs
.DataSource = dvAuthors
.DisplayMember = "NoProjet"
End With
'With lstTest
' .DataSource = dvAuthors
' .DisplayMember = "NomUsager"
'End With
'cboPubs.Select edIndex = -1
'cnPubs.Dispose ()
'PubsDA.Dispose ()
Catch ex As Exception
MsgBox(ex.Messa ge, MsgBoxStyle.Inf ormation, Me.Text)
End Try