Страница: 1 |
Вопрос: Минование всех ошибок программы | Добавлено: 21.05.05 07:25 |
Автор вопроса: ![]() |
Чтобы все ошибки не выскакивали, а просто записывались в отдельный лог |
Ответы | Всего ответов: 4 |
Номер ответа: 1 Автор ответа: ![]() ![]() ![]() ![]() ![]() ![]() ![]() ![]() ICQ: 50804884 Вопросов: 72 Ответов: 642 |
Web-сайт: Профиль | Цитата | #1 | Добавлено: 21.05.05 09:18 |
on error goto ? |
Номер ответа: 2 Автор ответа: ![]() ![]() ![]() ![]() ![]() ![]() ![]() ![]() ![]() Разработчик Offline Client Вопросов: 236 Ответов: 8362 |
Профиль | Цитата | #2 | Добавлено: 21.05.05 18:08 |
On error goto Err
open "file" for ... ... ... Exit Sub (Function) Err: Open "ErrorLog.txt" for append as #1 print #1, "Ошибка при... " & Err.Description & " " & Err.Number close #1 |
Номер ответа: 3 Автор ответа: ![]() ![]() ![]() ![]() ICQ: 1249088 Вопросов: 10 Ответов: 304 |
Web-сайт: Профиль | Цитата | #3 | Добавлено: 23.05.05 11:21 |
Resume Next бы надо, ошибка-то не одна намечается... |
Номер ответа: 4 Автор ответа: ![]() ![]() ![]() ![]() ICQ: 192496851 Вопросов: 75 Ответов: 3178 |
Профиль | Цитата | #4 | Добавлено: 23.05.05 16:20 |
On error goto Err
open "file" for ... ... ... Exit Sub (Function) Err: Open "ErrorLog.txt" for append as #1 print #1, "Ошибка при... " & Err.Description & " " & Err.Number Resume Next close #1 |
Страница: 1 |
|