ReSQL.ru
     
powered by simpleCommunicator - 2.0.61     © 2026 Programmizd 02
Мобильная версия    Контакт    Правила    FAQ    Помощь
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Доб. в избранное | Игнор. тему | Прикреп. тему | Пометить прочит. / непрочит. | Фильтр
Форумы / Microsoft Access [игнор отключен] [закрыт для гостей] / Сообщение Access'а без текста при выполнении
6 сообщений из 6, страница 1 из 1
Сообщение Access'а без текста при выполнении
    #32664181
Shubnikov
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Shubnikov
Участник
тривиальных вещей.

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

В подчинёной форме выполняется 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:30:08
| Ответить | Цитировать | Написать  
Сообщение Access'а без текста при выполнении
    #32664196
Kelme
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Kelme
Участник
если ты ищешь строку, то в принципе надо так:

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

Т.е. через класс ? А вот такой тормоз прокатит ? (от Козина)
Код: plaintext
1.
2.
3.
    Do While rs.State And adStateFetching
        DoEvents
    Loop
...
Рейтинг: 0 / 0
25.08.2004, 14:47:03
| Ответить | Цитировать | Написать  
6 сообщений из 6, страница 1 из 1
Форумы / Microsoft Access [игнор отключен] [закрыт для гостей] / Сообщение Access'а без текста при выполнении
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
Польз. соглашение   Полит. конфиден.  
NoSQL.ru       Кролег: Проекты, Новости, Чат       РЕД ФОРУМ       Фотоальбом: Участники, Встречи
Закрыть
start [/forum/topic.php?fid=45&fpage=1570&tid=1672225]:
 0ms
get settings:
 5ms
get forum list:
 9ms
check forum access:
 2ms
check topic access:
 2ms
track hit:
 29ms
get topic data:
 8ms
get forum data:
 2ms
get page messages:
 28ms
get tp. blocked users:
 1ms
others: 199ms
total:  285ms
созд. / загр.: 285ms
x
x
Закрыть


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