VBS: Изменение типа запуска службы и запуск службы

Программирование на Active Server Pages и VBScript.
biffick
Начинающий
Начинающий
 
Сообщения: 17
Зарегистрирован: 24.08.2015 (Пн) 1:00

VBS: Изменение типа запуска службы и запуск службы

Сообщение biffick » 11.05.2022 (Ср) 11:17

Всем привет.
Имеется скрипт по запуску служб VMware.
Работают только строки svcX.StartService.
Строки svcX.ChangeStartMode("Manual").StartService выдают ошибки при запуске скрипта.
Не могу разобраться, как сделать так, чтобы сначала изменялся тип запуска служб, а уже потом происходил их запуск.

Сам скрипт:

Код: Выделить всё

'
' Script "Change Start Mode and Run Services"
'
Set wmi = GetObject("winmgmts://./root/cimv2")
'
' VMware Mode and Start Services
'
Set svc = wmi.Get("Win32_Service.Name='VMAuthdService'")
Set svc2 = wmi.Get("Win32_Service.Name='VMnetDHCP'")
Set svc3 = wmi.Get("Win32_Service.Name='VMware NAT Service'")
Set svc4 = wmi.Get("Win32_Service.Name='VMUSBArbService'")
Set svc5 = wmi.Get("Win32_Service.Name='VMwareHostd'")
svc.ChangeStartMode("Manual").StartService
svc2.ChangeStartMode("Manual").StartService
svc3.ChangeStartMode("Manual").StartService
svc4.ChangeStartMode("Automatic").StartService
svc5.ChangeStartMode("Disable").StartService
'
' VMware Start Program
'
Set objShell = CreateObject("WScript.Shell")
' Example (Program, Size, Parameters)
' objShell.Run """C:\Program Files (x86)\vlc.exe"" --fullscreen ""E:\eto test\Misfits.S01E05.mkv"""
objShell.Run """C:\Program Files (x86)\VMware\VMware Workstation\vmware.exe"" """""
WScript.Quit


biffick
Начинающий
Начинающий
 
Сообщения: 17
Зарегистрирован: 24.08.2015 (Пн) 1:00

Re: VBS: Изменение типа запуска службы и запуск службы

Сообщение biffick » 13.05.2022 (Пт) 2:26

Почему bat'ники отрабатывают такие же функции дольше, чем VBS, причём сильно дольше?
Bat'ник запускает службу 2 секунды, а VBS это делает за доли секунды.
Может возможно как-то решить проблему, тогда VBS отпал бы вообще.

biffick
Начинающий
Начинающий
 
Сообщения: 17
Зарегистрирован: 24.08.2015 (Пн) 1:00

Re: VBS: Изменение типа запуска службы и запуск службы

Сообщение biffick » 14.05.2022 (Сб) 16:09

Вопрос решён на другом форуме.
Тему можно закрывать!


Вернуться в ASP и VBScript

Кто сейчас на конференции

Сейчас этот форум просматривают: нет зарегистрированных пользователей и гости: 15

    TopList