вот скрипт для Установки типа запуска службы - подсобите...

[abasov]

Dim Computer
Dim ComputerName
Dim Service
Dim TargetService
TargetService = "wuauserv"
ComputerName = "Как указать локальную машину????!!"
Set Computer = GetObject("WinNT://" & ComputerName & Computer)
Set Service = Computer.GetObject("service", TargetService)
Service.StartType =4
Service.SetInfo

[RayShade]

Имя компьютера вообще то указывается то, что задано в свойствах сетевого окружения.

Но сам скрипт выглядит странно. Я обычно делаю так:

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

for each Service in
GetObject("winmgmts:impersonationLevel=impersonate}!//ComputerName").InstancesOf ("Win32_service")
'здесь код обработки сервисов - аннализируешь имя и делаешь с ним что надо.
Next