Серый форум — VBS: Не работает Goto

Re: VBS: Не работает Goto

2012-08-17T10:34:47Z

smaharbA пишет:

поверьте, On Error GoTo 0 - обязательно пригодится

Ок, спасибо!

2012-08-17T09:48:45Z

поверьте, On Error GoTo 0 - обязательно пригодится

2012-08-17T09:43:49Z

smaharbA пишет:

On Error GoTo 0 совсем не тоже самое что On Error GoTo МеткаИлиНомерСтроки

Сабж был именно про GoTo
Второй пост объяснил почему

2012-08-17T09:41:44Z

On Error GoTo 0 совсем не тоже самое что On Error GoTo МеткаИлиНомерСтроки

2012-08-17T06:26:09Z

Я ж говорю, что он начинает ручаться именно после GoTo! так что ничего не происходит

2012-08-17T06:18:13Z

afteroot пишет:

Просто при опирации любой ставишь
 On Error Resume Next
Далее
[..]
Вуаля, обработчик сработал, что собственно мне и нужно было!
Тема закрыта!:cool:

Еще вообще-то, если у скрипта есть дальнейшие действия, надо не забывать после обработки ошибки убирать действие "On Error Resume Next" командой:

On Error GoTo 0

2012-08-16T06:47:35Z

Всем спасибо! Нашёл выход!

Просто при опирации любой ставишь

 On Error Resume Next

If Err.Number <> 0 Then
   MsgBox "Не удалось создать ключи реестра " & ServiceName
   WScript.Quit
End If

Вуаля, обработчик сработал, что собственно мне и нужно было!
Тема закрыта!:cool:

2012-08-16T06:40:33Z

smaharbA пишет:

это не будет работать в VBS
это код для VB

А для VBS есть переходы?

2012-08-16T06:39:00Z

это не будет работать в VBS
это код для VB

2012-08-16T06:33:19Z

Всем привет, подскажите плиз!

Sub Test()
    On Error GoTo Err1
    1<>1
    Exit Sub
Err1:
    Msg "Ошибка"    
    Resume Next
End Sub

Выдает ошибку на Goto, может кто-то подскажет где ошибка?