ok, nel programmino semplice sopra postato ora funziona, ma non riesco a fare la stessa cosa con questo codice:
codice:
Public Class Form_rubrica
Dim conn As New OleDb.OleDbConnection
Dim da As OleDb.OleDbDataAdapter
Dim strsql As String
Dim cmdsql As OleDb.OleDbCommand
Private Sub ListBox_rubrica_SelectedIndexChanged(ByVal sender As System.Object, ByVal e
As System.EventArgs) Handles ListBox_rubrica.SelectedIndexChanged
TextBox_eta.Text = ListBox_rubrica.SelectedItems(0).ToString()
End Sub
Private Sub Form_rubrica_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
'connessione al database
Dim dbprovider As String = "PROVIDER=Microsoft.Jet.OleDb.4.0;" Dim dbsource As String = "DATA SOURCE = c:\Documents and Settings\GIAMPIERO\Documenti\database.mdb"
conn.ConnectionString = dbprovider & dbsource
'comando insert sql
strsql = "SELECT nominativo FROM Tabella_anagrafiche ORDER BY nominativo"
Dim cmdsql As New OleDb.OleDbCommand(strsql, conn)
Dim da As New OleDb.OleDbDataAdapter(strsql, conn)
da.SelectCommand = cmdsql
conn.Open()
Dim ds As New DataSet("Tabella_anagrafiche")
ds.Clear()
da.Fill(ds, "Tabella_anagrafiche")
Dim bs As New BindingSource()
bs.DataSource = ds
bs.DataMember = "Tabella_anagrafiche"
conn.Close()
ListBox_rubrica.DataSource = ds.Tables("Tabella_anagrafiche")
ListBox_rubrica.DisplayMember = "nominativo"
End Sub
Private Sub Button_home_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button_home.Click
Me.Close()
Me.Dispose()
Form_home.ShowDialog()
End Sub
End Class
Così nella text_eta.text mi compare la stringa "System.Data.DataRowView".
Come risolvo??