...сделать журнал событий открытия базы данных на VFP 8.0.

Приложение .NET использует базу данных VFP 8.0 для своих внутренних целей. Соединение устанавливается через vfpoledb.dll. Все работает прекрасно.

Событие открытия базы данных:

*Immediately after DBC is opened.
PROCEDURE dbc_OpenData(cDatabaseName,lExclusive,lNoupdate,lValidate)
SET DELETED ON
LOCAL lcEventDate,;
lcDBFullName,;
lcPath,;
lcDBName,;
lcExclusive,;
lcNoupdate,;
lcValidate,;
lnLogHandle
lcEventDate=TTOC(DATETIME())
lcDBFullName=IIF(ISNULL(cDatabaseName),'',ALLTRIM(cDatabaseName))
lcPath=IIF(EMPTY(lcDBFullName),'',LEFT(lcDBFullName,RAT('\',lcDBFullName)))
lcDBName=IIF(EMPTY(lcDBFullName),'',SUBSTR(lcDBFullName,RAT('\',lcDBFullName)+1))
lcExclusive='Exclusive='+IIF(lExclusive,'Yes','No')
lcNoupdate='ReadOnly='+IIF(lNoupdate,'Yes','No')
lcValidate='Validate='+IIF(lValidate,'Yes','No')
lnLogHandle=FOPEN(lcPath+'dbcopendatalog.txt',12)
IF lnLogHandle<0
lnLogHandle=FCREATE(lcPath+'dbcopendatalog.txt')
ENDIF
IF lnLogHandle>=0
=FSEEK(lnLogHandle,0,2)
=FPUTS(lnLogHandle,lcEventDate+', FullName='+lcDBFullName+', Name='+lcDBName+', '+lcExclusive+', '+lcNoupdate+', '+lcValidate)
=FCLOSE(lnLogHandle)
ENDIF
RETURN .T.
ENDPROC

Если база данных открывается из IDE VFP, то все работает, файл создается, запись в него идет. Если база открывается из .NET, то выдает ошибку: File "<MyView>.dbf" not found. (Запрос идет к представлению).

В результате экспериментов установлено, что если из VFP открыть базу монопольно, а потом попытаться соединиться через .NET, то ошибка будет та же. В результате тех же экспериментов установлено )))), что если в событии открытия базы закомментировать всю работу с текстовым файлом, которая ведется функциями низкого уровня, то ошибка исчезает. Права доступа NTFS не меняются, т.е. какой-то прикол с функциями низкого уровня, так что ли?

Посмотрел. Ни одна функция работы с файлами не поддерживается. Типа фиг запишешь что-нибудь в файл?

А также не поддерживается USE. Типа фиг запишешь что-нибудь в таблицу? :)

Sergey Ch- используйте stored procedures + передача параметров

Конкретно в событии открытия БД это не помогает.

Sergey Ch- используйте SQL команды select, update, delete ...

Да это понятно. Дело в другом - нужно создать веб-интерфейс для администраторов, чтобы выполнять обслуживание БД. А это предполагает использование родных фоксовых команд по любому. Придется, наверное, писать COM-сервер.

Я так понял, что вы пишете в лог из интерфейса, т.е. лог у вас ведет само приложение. Тут никто не спорит - ASP.NET прекрасно работает с VFP, это даже не обсуждается :). Дело в другом. Просто если есть возможность не зависеть от того, будет какой-то интерфейс писать в лог или не будет, то хотелось бы эту возможность использовать. Ведь событие БД не зависит от прихотей клиентского приложения, правда? А получается, что журнал можно вести только из приложения ASP.NET.

авторSergey Ch

Есть подозрение, что работая с БД через OLE DB Provider for Visual FoxPro, при срабатывании триггера будет та же хрень. И потом, триггер не решит ту конкретную проблему, которую я описал.