Пытаюсь из VB.net создать запрос к БД Access он отрабатывается и выводится вся БД, а мне нужно только строки где столбец IMEI совпал с введённым значением....
Не подскажете в чём ошибка ?

Public Sub ExecSQL(ByVal sSQL As String)
Dim sConnect As String
sConnect = "Provider=Microsoft Jet 4.0 OLE DB Provider;" & _
"Data Source=C:\Documents and Settings\Администратор\Мои документы\Visual Studio Projects\СТА\CTA.mdb ;Mode=Share Deny None;"
Dim myConnection As New OleDbConnection(sConnect)
myConnection.Open()
Dim myCommand As New OleDbCommand(sSQL, myConnection)
myCommand.ExecuteNonQuery()
myConnection.Close()


Dim sSQL As String
sSQL = "SELECT * FROM Таблица1 WHERE [IMEI] ='" & TextBox4.Text & "'"
ExecSQL(sSQL)
DataSet11.Clear()
OleDbDataAdapter1.Fill(DataSet11)

Ну грамотный.... просто жуть. А нормально подсказать где ошибка нельзя ? В процедуре ExecSQL нормально обрабатываются запросы Insert и Delete, а Select не хотит...

УРААА !!!! ЗАРАБОТАЛО !!!

Примного благодарен !!!!