Еще раз Refresh (access)

[Kaa]

Итак имеем:
Аксессную базу Test.mdb, в ней табличка с именем TestTable.
Проект на VB, в котором форма и Data Environment c именем deTest.
На этом deTest-е Connection к базе (через Jet 4.0) и Command с SQL
запросом типа: SELECT * FROM TestTable WHERE FirstField > 0. Имя Commanda - Test.
На форме - DataGrid и кнопка. В гриде - результат запроса (привязан в Design-Time), по нажатию кнопки нужно обновить информацию в гриде. Что писать в обработчике кнопки? Пробовал:

Код: Выделить всё

Private Sub Command1_Click()
  deTest.rsTest.Requery
  deTest.rsTest.Resync
  DataGrid1.Refresh
  DataGrid1.ReBind
End Sub

в разных сочетаниях и последовательности. Данные в гриде не обновляются (делал изменения в таблице при помощи Visual Data Manager-a). Куда копать дальше?

[Jew]

Для начала попробуй заносить данные при помощи SQL, а дальше просто:

Public conn As New ADODB.Connection
Private Sub Command1_Click()
conn.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=C:\Test.mdb;Persist Security Info=False"
conn.Open
conn.Execute "INSERT INTO TestTable VALUES ("XXXX", "YYYYYY")
conn.Close
Adodc1.Refresh
DataGrid1.Refresh

Ну вот собственно и все!
ЗЫ! Грызите SQL!!! SQL - rules