hai provato a fare Dim Conn as NewOleDb.OleDbConnection("PROVIDER=Microsoft.Jet.OLEDB.4.0;Data
e pure con l'oggetto command