Серый форум — VBS: не запускается команда

Re: VBS: не запускается команда

2017-05-25T06:04:47Z

Опять перестал нормально работать скрипт в Win7x64. Разобрался. Пароль неверный подкидывал.

Re: VBS: не запускается команда

2016-11-28T06:37:42Z

Переписал имя раздела С: в английской раскладке. Работает вроде.

Re: VBS: не запускается команда

2016-11-25T12:51:30Z

With CreateObject("WScript.Shell")
  .Run "rasdial RK chan i_1623",, True
  .Run "C:\NB\tst10.exe /r:C:\NB\log.txt /o",, True
  .Run "rasdial RK /d"
End With

Re: VBS: не запускается команда

2016-11-25T07:54:32Z

Похожий скрипт не выполняется в Виндовс 2000. Сообщает "Файл не найден Стрпока 3 символ 1":

Set WshShell=WScript.CreateObject("WScript.Shell")
Sub Program(Oops, Style, Wait)
X=WshShell.Run(Oops, Style, Wait)
End Sub

Call Program("rasdial RK chan i_1623", True, True)
Wscript.Sleep 5000

'запускаем вкл/выкл аутентификации
Call Program("С:\NB\tst10.exe /r:C:\NB\log.txt /o", True, True)
Wscript.Sleep 10000

'разъединяем модемное соединение
Call Program("rasdial RK /d", True, True)

Что исправить в скрипте для запуска?

Re: VBS: не запускается команда

2016-04-01T05:48:47Z

Flasher CreateObject("WScript.Shell").Run "C:\NetAuth\bin\bin\perl.exe C:\NetAuth\script\netauth.pl",, True не запускается.
shiz добавление WshShell.CurrentDirectory = "C:\NetAuth\script\" помогло.
Всем СПАСИБО!

Re: VBS: не запускается команда

2016-03-29T16:27:52Z

Кир пишет:

Рабочий каталог в ярлыке C:\NetAuth\script\. Как указать каталог в моем скрипте?

Set WshShell = CreateObject("WScript.Shell")
WshShell.CurrentDirectory = "C:\NetAuth\script\"
WshShell.Run "C:\NetAuth\bin\bin\perl.exe netauth.pl",, True

Re: VBS: не запускается команда

2016-03-29T08:20:41Z

Спасибо. Проверю.

Re: VBS: не запускается команда

2016-03-29T05:45:52Z

Весь код:

CreateObject("WScript.Shell").Run "C:\NetAuth\bin\bin\perl.exe C:\NetAuth\script\netauth.pl",, True

5 секунд ожидания там ни к чему.

Re: VBS: не запускается команда

2016-03-29T05:35:15Z

Flasher пишет:

А в чём прок от запуска скрипта perl из под vbs?

До выполнения скрипта perl поднимаю dial-up соединение, а потом закрываю его.

shiz пишет:

Т.к. не задан рабочий каталог и не указан путь к netauth.pl, то, возможно, он ищется не там.

ДА. Рабочий каталог в ярлыке C:\NetAuth\script\. Как указать каталог в моем скрипте?

Re: VBS: не запускается команда

2016-03-28T14:45:21Z

Т.к. не задан рабочий каталог и не указан путь к netauth.pl, то, возможно, он ищется не там.

Re: VBS: не запускается команда

2016-03-28T14:42:11Z

Описание метода.
А в чём прок от запуска скрипта perl из под vbs?

VBS: не запускается команда

2016-03-28T12:56:56Z

В WindowsXP все работало

Set WshShell=WScript.CreateObject("WScript.Shell")

Sub Program(Oops, Style, Wait)
X=WshShell.Run(Oops, Style, Wait)
End Sub

Call Program("C:\NetAuth\bin\bin\perl.exe netauth.pl", True, True)
Wscript.Sleep 5000

На Windows 7x64 не запускается.
С ярлыка и из командной строки работает.
Как запустить команду из скрипта?