Cieo,
per prima cosa grazie per la risposta.
Ma se provo a mettere il tuo codice mi da sempre lo stesso errore cioè:

"Eccezione non gestita di tipo "System.Data.Odbc.OdbcException" in system.data.dll

Informazioni aggiuntive: Errore di sistema."

Come mai??
A cosa è dovuto visto che mi si ferma sempre alla riga

Dim dr As Odbc.OdbcDataReader = cmd.ExecuteReader

Grazie
spider81man