Гость
Целевая тема:
Создать новую тему:
Автор:
Форумы / Microsoft Access [игнор отключен] [закрыт для гостей] / Сообщение Access'а без текста при выполнении / 6 сообщений из 6, страница 1 из 1
25.08.2004, 10:30:08
    #32664181
Shubnikov
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Сообщение Access'а без текста при выполнении
тривиальных вещей.

Кто сталкивался ?

В подчинёной форме выполняется Requery с последующим Find
Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
    Dim rs As ADODB.Recordset, iddoc&
    
    iddoc = Me!sub_list.Form.Recordset.Fields!id_doc

    Me!sub_list.Requery
    Set rs = Me!sub_list.Form.Recordset
 '    rs.MoveFirst 
    rs.Find "id_obj=" & CStr(iddoc)
    . . .
Find вызывает сообщение без текста с восклицательным знаокм и выполнение процедуры прерывается. Пробовал вместо rs. ссылку через контрол, тоже самое. Кде же поискать ? (Access 2000, adp, SQL 2000, клиент Win XP)
...
Рейтинг: 0 / 0
25.08.2004, 10:34:35
    #32664196
Kelme
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Сообщение Access'а без текста при выполнении
если ты ищешь строку, то в принципе надо так:

Код: plaintext
1.
rs.Find "id_obj='" & CStr(iddoc) & "'"
...
Рейтинг: 0 / 0
25.08.2004, 10:49:27
    #32664228
Shubnikov
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Сообщение Access'а без текста при выполнении
Прошу у всех прощения: Не верно указал имя поля! Раззява! Но странно , что текста сообщения нет!!!
...
Рейтинг: 0 / 0
25.08.2004, 10:53:20
    #32664235
incold
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Сообщение Access'а без текста при выполнении
Переходи на Access Xp у него куда более правильно организована обработка ошибок. А уж если работаешь с SQL 2000 а не SQL 7. То такая связка точно лучше.
...
Рейтинг: 0 / 0
25.08.2004, 10:54:40
    #32664242
ищ
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Сообщение Access'а без текста при выполнении
шубников имей ввиду, что ТАК записи в adp не ищут.
в твоем варианте find может не найти, т.к. find начинает искать сразу, не дожидаясь прихода всех записей после requery.
обработай событие рекордсета FetchComplete

вот рабочий пример

Private WithEvents rst As ADODB.Recordset

Private Sub rst_FetchComplete(ByVal pError As ADODB.Error, adStatus As ADODB.EventStatusEnum, ByVal pRecordset As ADODB.Recordset)
rst.Find "id=" & lngCurrentNode, , , 1
End Sub
...
Рейтинг: 0 / 0
25.08.2004, 14:47:03
    #32664911
Shubnikov
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Сообщение Access'а без текста при выполнении
2 Ищ

Т.е. через класс ? А вот такой тормоз прокатит ? (от Козина)
Код: plaintext
1.
2.
3.
    Do While rs.State And adStateFetching
        DoEvents
    Loop
...
Рейтинг: 0 / 0
Форумы / Microsoft Access [игнор отключен] [закрыт для гостей] / Сообщение Access'а без текста при выполнении / 6 сообщений из 6, страница 1 из 1
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]