Refresh - ????

[Jew]

Добрый день! Вот процедура, в которой при удалении строки из DataGrid подразумевается обновление DataGrid. Но обновление происходит только после повторного нажатия на кнопку, а соответственно меня это не устраивает (хотелось бы чтобы при нажатии кнопки, скажем "Применить", сразуже происходило обновление записей и то, что уже удалили не присутствовало).
У кого-нибудь есть соображения по этому поводу???

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

Private Sub Command2_Click()
Dim conn As New adodb.Connection
conn.ConnectionString = "Provider=MSDASQL.1;Persist Security Info=False;Mode=ReadWrite;DSN=База Данных MS Access;DBQ=C:\My_Project\DB.mdb;DefaultDir=C:\My_Project;DriverId=25;FIL=MS Access;MaxBufferSize=2048;PageTimeout=5;UID=admin;"
DG1.RowBookmark (DG1.Row)
conn.Open
conn.Execute "DELETE FROM PostTab WHERE IDPost =" & DG1.Text
frmPost.Refresh
DG1.Refresh
adodc1.Refresh
End Sub


[alibek]

Поменяй местами рефреш ADODC и DataGrid.

[Jew]

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

[Jew]

Я от своих слов благодарности не отказываюсь, но это не помогло решить проблему... Может еще есть что-нибудь? Плиз

[amda]

а Requery здесь не сработает? Насколько я помню рефрэш только обновляет экран. А реквэри перезагружает источник записей.

[Jew]

А можно по-подробнее об Requery. это свойство? и какого элемента?

[amda]

А можно по-подробнее об Requery. это свойство? и какого элемента?

прошу прощения
я перепутал. этот реквери есть только в акцессе
в твоём случае, может подойдёт присвоение источника записей к контролам заново?... Но это сильно скажется на производительности.

[alibek]

Попробуй после conn.Execute вставить conn.Close

[Jew]

Всем огробное спасибо за участие в решении моей проблемы. Надеюсь на этом примере многие почерпнут для себя полезной инфы!!!
Особое СПАСИБО Alibek_у - это именно то, что надо!!!