Запустить VB процедуру как скрипт

Денис24

Можно ли изменить слудующую процедуру для запуска как скрипт на машине,которая запускает с внешнюю программу и ждёт ёё завершения?В МСДН нашёл следующий пример
Sub ExecuteAndWait(cmdline As String)
 Dim NameOfProc As PROCESS_INFORMATION
 Dim NameStart As STARTUPINFO
 Dim X As Long
 NameStart.cb = Len(NameStart)
 X = CreateProcessA(<b>0</b>&, cmdline$, <b>0</b>&, <b>0</b>&, <b>1</b>&, NORMAL_PRIORITY_CLASS, <b>0</b>&, <b>0</b>&, NameStart, NameOfProc)
 X = WaitForSingleObject(NameOfProc.hProcess, INFINITE)
 X = CloseHandle(NameOfProc.hProcess)
End Sub
Знаю в скриптах dim ... as .... не проходит.Как можно выйти из данной ситуации?
6 ответов

Денис24

api никак через скрипт не вызовешь, если только через com-обертку


Денис24

тоесть через скрипт никак?


Денис24

может с использованием wmi что-то можно придумать, типа цикла по процессам и ожиданием пока конкретный процесс ещё жив. поищите по форуму тут где-то были такие скрипты


Денис24

api никак через скрипт не вызовешь, если только через com-обертку
например dynwrap.dll тынц


Денис24

Через скрипт-в поиск по ключевым словам CreateObject WScript.Shell Run.


Денис24

Через скрипт-в поиск по ключевым словам CreateObject WScript.Shell Run.
Спасибо!Имено то что нужно.