Ciao a tutti,
ho apportato una serie di modifche e ora sembrerebbe che il codice funzioni. Purtroppo non è così.
- nel database inserisco 5 campi ragione sociale: 1 2 3 4 5
- salvo
- aggiorno il form
- vedo i dati salvati
- provo a ricercare ad esempio la ragione sociale numero 3
- il datagrid si svuota completamente
posto il codice così qualche anima pia mi può dare qualche indicazione sull'errore:
codice:
Dim qr_ricercaragionesociale As String = "SELECT ragione_sociale FROM tblClienti WHERE [ragione_sociale] = '" & txtRicercaRagioneSociale.Text & "'"
Dim Cn As New OleDbConnection(connectionString)
Dim cmd As New OleDbCommand(qr_ricercaragionesociale, Cn)
Try
Cn.Open() 'apro la connessione
TblClientiDataGridView.DataSource = cmd.ExecuteReader 'faccio eseguire la query
Cn.Close() 'chiudo la connessione
Catch ex As Exception
MsgBox(Err.Description) 'se c'è un errore me lo dice
End Try
per completezza aggiungo anche la stringa di connessione
codice:
Dim connectionString As String = "Provider=Microsoft.Jet.OLEDB.4.0; Data Source = C:\Documents and Settings\Banco\Documenti\bellerofonte\bellerofonte\bellerofonte.mdb; "
e segnalo che ho sostituito il DB con un file MDB