PDA

Показать полную графическую версию : Visual Basic 6: adodc и datagrid


DestR0yer
09-11-2004, 21:53
Такая проблема:
Есть база Access97, форма, на форме: пара текст-боксов, adodc, datagrid и пара бАтонов. Нужно реализовать поиск через adodc, чтобы критерии поиска задавались текст-боксами, а результат выводился в datagrid. Насколько я понял нужно выполнить sql-запрос через свойство adodc.recordsource. Но у меня почему-то ничего не выходит. Поможите чем сможите, а то сроки сдачи практической горят :(

Prisoner
10-11-2004, 02:33
Я слаб в Access'е, но может быть помогу логикой или чем придется. Что именно у вас не получается?

DestR0yer
11-11-2004, 21:14
У меня не получается обновить информацию в DataGrid. Я добавляю запись в базу средствами VB. Но почему-то в сетке изменения не отображаются.

Prisoner
13-11-2004, 02:21
Нужно убедиться, что записи в самом деле добавляются - падают в таблицу(ы), если это так, то можно после добавления обновлять сетку. Обновление вызывается вероятнее всего каким-нибудь методом сетки или же отправкой запроса к базе.

DestR0yer
16-11-2004, 19:12
К Adodc у меня подключен запрос из базы, а запись я добавляю в одну из таблиц. После чего делаю рефреш и Adodc и DataGrid, но ничего не меняется в DataGrid. В Adodc все есть и запись в базе появляется.

privalihin
13-01-2010, 15:01
Ставишь на форму Timer, присваеваешь свойству Interval 5000 (10000) - это сколько секунд 5 либо 10, можешь еще меньше. Когда запись добавлена, записи DataGrid обновяться через столько секунд укажешь и все сразу же увидишь.


'процедура обновления данных
Private Sub Timer1_Timer()
Dim book As Variant
Dim coll As Integer
On Error Resume Next
book = Adodc1.Recordset.Bookmark
coll = DataGrid1.Col
Adodc1.Refresh
Adodc1.Recordset.Bookmark = book
DataGrid1.Col = coll
End Sub

privalihin
13-01-2010, 15:35
А у меня другой вопрос: как сделать в Adodc, чтобы всегда отображалась последняя запись?




© OSzone.net 2001-2012