powered by simpleCommunicator - 2.0.61     © 2026 Programmizd 02
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Форумы / Microsoft Access [игнор отключен] [закрыт для гостей] / MSAcc97 + Execute + DFirst
2 сообщений из 2, страница 1 из 1
MSAcc97 + Execute + DFirst
    #32471700
- Ничего не понимаю! (с)
- Аналогично! (с)


Вчера пришлось переписать ф-ю, которая делала следующее

Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
Private Function SetArendaPath() 'Private
Dim tmpQDFMY As QueryDef
    On Error Resume Next
    Set tmpQDFMY = CurrentDb.CreateQueryDef("")
        tmpQDFMY.sql = "UPDATE OWNER " _
        & "SET OWNER.ArendaPath = " _
        & "DFirst('ArendaPath','DB_Names'," _
        & "'(ArendaPath Is Not Null) AND (IsCurrent=True)');"
        tmpQDFMY.Execute
    SetArendaPath = (Err =  0 )
    Set tmpQDFMY = Nothing
End Function

-возврашала False
("раньше работала")
в строке tmpQDFMY.Execute
стабильно происходила ошибка

полез смотреть:
Из кода:
Код: plaintext
err.Description  "Неизвестная ф-я DFirst..." 

Из окна запросов Sql выполняется.
Смотрю ссылки - все живо. И так и сяк - Хулио, блин, Дон.
Ни декомпиляция, ничего не помогает.
Поскоку (в данном случае) - одно значение - обошел, вычисляя значение DFirst в коде. Но, екарный бабай, решил седня проверить. - Не могу повторить ошибку.
Полтергейсты, блин.
Что это было?
Кто встречался?
...
Рейтинг: 0 / 0
MSAcc97 + Execute + DFirst
    #32472023
up
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
...
Рейтинг: 0 / 0
2 сообщений из 2, страница 1 из 1
Форумы / Microsoft Access [игнор отключен] [закрыт для гостей] / MSAcc97 + Execute + DFirst
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


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