как добавить модуль VBA (tracing модуль) в access

Retvisan
Дата: 09.12.2015 20:09:21
Натолкнулся в интернете на следующий текст:
для возможности поиска ошибок при работе в режиме production на рабочей базе данных очень желательно добавить модуль VBA (tracing модуль) для записи происходящих событий в текстовый файл лога. Простая функция записи в текстовый файл будет очень полезна при отладке.
а как добавить этот модуль
вот сам текст кода:
Sub Trace(ByVal txtinfo As String)
On Error Resume Next
MyFile = "D:\" & "logfile.txt"
fnum = FreeFile()
Open MyFile For Append As fnum
txtinfo = CStr(Now()) + " " + txtinfo
Print #fnum, txtinfo
Close #fnum
End Sub
ПЕНСИОНЕРКА
Дата: 09.12.2015 21:06:17
Retvisan,

этот код поместите в общие модули

Sub Trace(ByVal txtinfo As String)
On Error Resume Next
MyFile = "D:\" & "logfile.txt"
fnum = FreeFile()
Open MyFile For Append As fnum
txtinfo = CStr(Now()) + " " + txtinfo
Print #fnum, txtinfo
Close #fnum
End Sub


а в проблемные почки поместите вызов

например на открытие формы или изменения какого то поля или .....

.....

Trace me.name & " " & " какая-то метка в коде " & " некая переменная=" & ееЗначение
.........
Retvisan
Дата: 10.12.2015 16:45:53
ПЕНСИОНЕРКА,спасибо