Dim conn As System.Data.OleDb.OleDbConnection
Dim cmd As System.Data.OleDb.OleDbCommand
conn.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=E:\OEMP\a.mdb"
cmd.Connection = conn
cmd.CommandType = Data.CommandType.Text
Dim sqlTest As String
sqlTest = "select *