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