Гость
Войти | Профиль | Очистить
Целевая тема:
Создать новую тему:
Автор:
Действия ...
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / Обработка ошибок.(On error) / 7 сообщений из 7, страница 1 из 1
05.06.2011, 21:52
    #37295784
epifreezz
epifreezz
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Обработка ошибок.(On error)
Хочу сделать небольшой обработчик ошибок для запроса.

Тоесть хочу заменить стандартые ошибки на свои Msgbox'ы

В общем вот код
Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
...

On Error GoTo e
a = "UPDATE assort SET description ='" & txtFilmDesc.Text & "' WHERE as_id='" & txtFilmId.Text & "'"
cn.Execute a

e: 'если возникает ошибка то выводится сообщения "Ошибка"
MsgBox "Ошибка"
...
Вопрос что я делаю не так.
Т.к когда даже нету ошибки в этих двух строчках, то обязательно выводится сообщения "Ошибка" ?
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
05.06.2011, 22:35
    #37295853
michael R
michael R
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Обработка ошибок.(On error)
выход сделай из функции или процедуры перед перехватом ошибки
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
06.06.2011, 00:22
    #37296019
Shocker.Pro
Shocker.Pro
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Обработка ошибок.(On error)
я бы так сказал....
потому что нет кода, который бы не давал выполняться строке
MsgBox "Ошибка"
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
06.06.2011, 00:35
    #37296040
epifreezz
epifreezz
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Обработка ошибок.(On error)
Shocker.Proя бы так сказал....
потому что нет кода, который бы не давал выполняться строке
MsgBox "Ошибка"

Насчёт MsgBox "Ошибка" я не много не понял. Если можешь покажи на моём примере что там нужно дописать.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
06.06.2011, 04:50
    #37296123
Ципихович Эндрю
Ципихович Эндрю
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Обработка ошибок.(On error)
epifreezz,

Код: plaintext
1.
2.
3.
4.
5.
On Error GoTo e
a = "UPDATE assort SET description ='" & txtFilmDesc.Text & "' WHERE as_id='" & txtFilmId.Text & "'"
cn.Execute a
Экзит Зуб или Функция
e: 'если возникает ошибка то выводится сообщения "Ошибка"
MsgBox "Ошибка"
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
06.06.2011, 10:06
    #37296287
Shocker.Pro
Shocker.Pro
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Обработка ошибок.(On error)
epifreezzShocker.Proя бы так сказал....
потому что нет кода, который бы не давал выполняться строке
MsgBox "Ошибка"

Насчёт MsgBox "Ошибка" я не много не понял. Если можешь покажи на моём примере что там нужно дописать.
Лучше не написать, а заставить немного подумать:
в коде
Код: plaintext
1.
a= 1 
b= 2
тебя не будет удивлять, что после a=1 будет выполнено b=2, если первая строка выполнена без ошибок?
так же и здесь после
Код: plaintext
cn.Execute a
идет строка
Код: plaintext
MsgBox "Ошибка"
и она сработает, если ошибки нет, то есть сообщение будет выведено
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
06.06.2011, 13:25
    #37296694
epifreezz
epifreezz
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Обработка ошибок.(On error)
Благодарю за помошь.Разобрался в чём была моя ошибка.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / Обработка ошибок.(On error) / 7 сообщений из 7, страница 1 из 1
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
Польз. соглашение
созд. / загр.: 478ms
Закрыть
start [/forum/topic.php?fid=60&tablet=1&tid=2158645]:
 0ms
get settings:
 10ms
get forum list:
 13ms
check forum access:
 4ms
check topic access:
 4ms
track hit:
 38ms
get topic data:
 11ms
get forum data:
 2ms
get page messages:
 52ms
get tp. blocked users:
 2ms
others: 342ms
total:  478ms
x
x
Закрыть


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