синтаксис On Error - Компьютерный форум OSzone.net

Компьютерный форум OSzone.net (http://forum.oszone.net/index.php)

- Программирование и базы данных (http://forum.oszone.net/forumdisplay.php?f=21)

- - синтаксис On Error (http://forum.oszone.net/showthread.php?t=113393)

Dr.Dark

05-08-2008 10:48 868267

синтаксис On Error

Помогите плиз чё за глюк!
пишу:
On error goto metka
...
metka:
а он говорит что в первой строке ошибка! Чуть не убился не могу понять.

Busla

05-08-2008 13:46 868447

А чего тут убиваться? - Нет такого оператора в VBS. Или ты категорией ошибся?

Ramzes_

05-08-2008 14:33 868511

On error goto 0

Все, по другому не напишешь.

Dr.Dark

05-08-2008 20:06 868792

Не я вроде не ошибся. Странно.

Цитата:

Цитата Ramzes_

Все, по другому не напишешь »

И чё ваще в случае ошибки нельзя перейти на метку? Я вроде гдето видел что моно. Может спутал с VBA.

Ramzes_

05-08-2008 20:43 868831

Нет, нельзя. Может и спутал с VBA. Можно только отключать обработку ошибок, выполнять какие то действия, а потом проверять, была ли при этом сгенерирована ошибка.

Dr.Dark

25-08-2008 20:31 883644

Ладно, не отходя от кассы, что бы не создавать новую тему спрошу, как сделать так чтобы VBS скрипт по умолчанию запускался из CScript.exe, т.е. где-то видел что добавляешь какую-то строчку в начале и скрипт запускается из Cscript

Busla

25-08-2008 22:26 883738

Dr.Dark, одна проблема - одна тема

Ramzes_

26-08-2008 02:44 883925

Цитата:

Цитата Dr.Dark

Выполнить один раз

Код:

cscript //H:CScript

Dr.Dark

26-08-2008 11:42 884067

Решил проблему так:

Код:

Dim WSH  Set FSO = CreateObject("Scripting.FileSystemObject")  Set WSH = CreateObject("WScript.Shell")  if FSO.GetFileName(Wscript.FullName)="WScript.exe" then   WSH.Run "Cscript.exe "&Wscript.ScriptFullName,"1"   Wscript.Quit  end if

Время: 07:56.