ReSQL.ru
     
powered by simpleCommunicator - 2.0.61     © 2026 Programmizd 02
Мобильная версия    Контакт    Правила    FAQ    Помощь
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Доб. в избранное | Игнор. тему | Прикреп. тему | Пометить прочит. / непрочит. | Фильтр
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / VBS и on Error
13 сообщений из 13, страница 1 из 1
VBS и on Error
    #34787812
Денис24
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Денис24
Участник
Как в vbscript обрабатывать ошибки?
Пишу
Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
dim...
on error doto  111 
.
.
.

 111 :
 MsgBox Err.Description
 Err.Clear
Вываливается ошибка
"Синтаксическая ошибка"
...
Рейтинг: 0 / 0
10.09.2007, 12:09
| Ответить | Цитировать | Написать  
VBS и on Error
    #34787822
Mons
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Mons
Гость
может вместо doto надо Goto
вот так:

dim...
on error Goto 111
.
.
.

111:
MsgBox Err.Description
Err.Clear
...
Рейтинг: 0 / 0
10.09.2007, 12:13
| Ответить | Цитировать | Написать  
VBS и on Error
    #34787906
Денис24
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Денис24
Участник
Monsможет вместо doto надо Goto
вот так:

dim...
on error Goto 111
.
.
.

111:
MsgBox Err.Description
Err.Clear
Описка.В коде все правильно
On Error GoTo 111
...
Рейтинг: 0 / 0
10.09.2007, 12:34
| Ответить | Цитировать | Написать  
VBS и on Error
    #34787964
Фотография PA
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
PA
Участник
VBScript поддерживает только
Код: plaintext
On Error Resume Next
и
Код: plaintext
On Error GoTo  0
...
Рейтинг: 0 / 0
10.09.2007, 12:47
| Ответить | Цитировать | Написать  
VBS и on Error
    #34787988
Денис24
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Денис24
Участник
PAVBScript поддерживает только
Код: plaintext
On Error Resume Next
и
Код: plaintext
On Error GoTo  0

Спасибо!Тоесть обработчика ошибок нет..
...
Рейтинг: 0 / 0
10.09.2007, 12:53
| Ответить | Цитировать | Написать  
VBS и on Error
    #34788021
Фотография Antonariy
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Antonariy
Участник
Есть только inline-обработка чарез объект Err.
Код: plaintext
1.
2.
On error resume next
...
If Err.Number = xxx Then ...
...
Рейтинг: 0 / 0
10.09.2007, 12:59
| Ответить | Цитировать | Написать  
VBS и on Error
    #34788122
Денис24
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Денис24
Участник
AntonariyЕсть только inline-обработка чарез объект Err.
Код: plaintext
1.
2.
On error resume next
...
If Err.Number = xxx Then ...

C этим понятно.Спасибо.Подскажите еще по vbs.Как писать сервисные сообщения,типа "закончилась опрерация" .Сейчас я вижу решение через MsgBox но там нужно жать кнопку OK.А так что бы писалось в дософ\вом окне которое появляется при вызове скрипта чтоли..
...
Рейтинг: 0 / 0
10.09.2007, 13:19
| Ответить | Цитировать | Написать  
VBS и on Error
    #34788145
Фотография Konst_One
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Konst_One
Участник
WSH.Echo
...
Рейтинг: 0 / 0
10.09.2007, 13:23
| Ответить | Цитировать | Написать  
VBS и on Error
    #34788238
Денис24
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Денис24
Участник
Konst_OneWSH.Echo
То что нужно ,спасибо.А как установить что-ти типа паузы в консоли что бы прочитать все сообщения wsh.echo
...
Рейтинг: 0 / 0
10.09.2007, 13:41
| Ответить | Цитировать | Написать  
VBS и on Error
    #34788977
Денис24
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Денис24
Участник
Опять возник вопрос при переделывании vba кода на скрипт.Подскажите где неправильно.
И где вообще взять доку по vbscript?
Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
14.
15.
Set Acc = GetObject("c:\web.mdb")
Set Acc=Acc.Application
Set DB = Acc.CurrentDB
Set q = db.QueryDefs("e_gro1")
set rs=q.openrecordset
do while not rs.eof()
	sql_str=sql_str+",'"+rs!Group+"'"
	rs.movenext
loop
sql_str=right(sql_str,len(sql_str)- 1 )
q.close
rs.close
set q=nothing
set rs=nothing
Ругается на do while,right
...
Рейтинг: 0 / 0
10.09.2007, 16:52
| Ответить | Цитировать | Написать  
VBS и on Error
    #34789161
Фотография Antonariy
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Antonariy
Участник
rs.eof() - зачем скобки?
rs!Group - восклицательный знак VBS не знает. Пиши rs("Group").Value
...
Рейтинг: 0 / 0
10.09.2007, 17:37
| Ответить | Цитировать | Написать  
VBS и on Error
    #34789273
Денис24
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Денис24
Участник
Antonariyrs.eof() - зачем скобки?
rs!Group - восклицательный знак VBS не знает. Пиши rs("Group").Value
Где взять чтиво по vbs?
...
Рейтинг: 0 / 0
10.09.2007, 18:08
| Ответить | Цитировать | Написать  
VBS и on Error
    #34789376
White Owl
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
White Owl
Участник
Денис24 Antonariyrs.eof() - зачем скобки?
rs!Group - восклицательный знак VBS не знает. Пиши rs("Group").Value
Где взять чтиво по vbs?У мелокмягких естественно:
http://www.microsoft.com/downloads/details.aspx?familyid=01592C48-207D-4BE1-8A76-1C4099D7BBB9&displaylang=en
...
Рейтинг: 0 / 0
10.09.2007, 18:50
| Ответить | Цитировать | Написать  
13 сообщений из 13, страница 1 из 1
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / VBS и on Error
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
Польз. соглашение   Полит. конфиден.  
NoSQL.ru       Кролег: Проекты, Новости, Чат       РЕД ФОРУМ       Фотоальбом: Участники, Встречи
Закрыть
start [/forum/topic.php?fid=60&msg=34787964&tid=2163434]:
 0ms
get settings:
 8ms
get forum list:
 14ms
check forum access:
 2ms
check topic access:
 2ms
track hit:
 37ms
get topic data:
 9ms
get forum data:
 1ms
get page messages:
 47ms
get tp. blocked users:
 1ms
others: 274ms
total:  395ms
созд. / загр.: 395ms
x
x
Закрыть


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