powered by simpleCommunicator - 2.0.56     © 2025 Programmizd 02
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Форумы / Microsoft Access [игнор отключен] [закрыт для гостей] / как добавить модуль VBA (tracing модуль) в access
3 сообщений из 3, страница 1 из 1
как добавить модуль VBA (tracing модуль) в access
    #39124436
Retvisan
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Натолкнулся в интернете на следующий текст:
для возможности поиска ошибок при работе в режиме 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
...
Рейтинг: 0 / 0
как добавить модуль VBA (tracing модуль) в access
    #39124457
Фотография ПЕНСИОНЕРКА
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Retvisan,

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

Код: vbnet
1.
2.
3.
4.
5.
6.
7.
8.
9.
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 & " " & " какая-то метка в коде " & " некая переменная=" & ееЗначение
.........
...
Рейтинг: 0 / 0
как добавить модуль VBA (tracing модуль) в access
    #39125135
Retvisan
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
ПЕНСИОНЕРКА,спасибо
...
Рейтинг: 0 / 0
3 сообщений из 3, страница 1 из 1
Форумы / Microsoft Access [игнор отключен] [закрыт для гостей] / как добавить модуль VBA (tracing модуль) в access
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


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