Problemi con connessione

[Susin]

Ti basta sostituire Sql con OleDb

Dim myConnection as OleDbConnection
Dim myCommand as OleDbCommand
Dim myReader as OleDbDataReader