Laufende Dienste mit VBS unter WINNT abfragen?
Wie kann man unter WinNT mit VBScript laufende Dienste abfragen? So was
Set objWMIService = GetObject("winmgmts:" _
& "{impersonationLevel=impersonate}!\\" & strserver &
Hallo alle zusammen,
ich habe folgende Frage
Wie kann man unter WinNT mit VBScript laufende Dienste abfragen? So was
geht leider nicht
ich habe folgende Frage
Wie kann man unter WinNT mit VBScript laufende Dienste abfragen? So was
Set objWMIService = GetObject("winmgmts:" _
& "{impersonationLevel=impersonate}!\\" & strserver & "\root\cimv2")
Set colProcesses = objWMIService.ExecQuery _
("Select * from Win32_Service ")
For Each objWMIService In colProcesses
WScript.Echo objWMIService.Name & " " & objWMIService.State
Next
Please also mark the comments that contributed to the solution of the article
Content-Key: 2076
Url: https://administrator.de/contentid/2076
Printed on: April 24, 2024 at 22:04 o'clock
5 Comments
Latest comment
mach doch einfach mit CMD befehlen bzw mit command befhelen , so weit ich weiß kann der "NET" befehl Dienste verwalten !
set ws = CreateObject("WScript.Shell")
cmd("net <<<<HIER DEN BEFEHL REIN >>>> ")
'Ging glaub ich mit NET START / STOP / VIEW? <Computername>
'weiß aber nicht mehr genau !
'Usage : cmd("Text for DOSBOX")
SUB cmd (BYVAL xBefehl)
set ws = CreateObject("WScript.Shell")
xBefehl = "pause |" & myBefehl
xresultat = ws.run("%COMSPEC /c " & myBefehl,,true)
END SUB
'(c) by Markus Wypych
set ws = CreateObject("WScript.Shell")
cmd("net <<<<HIER DEN BEFEHL REIN >>>> ")
'Ging glaub ich mit NET START / STOP / VIEW? <Computername>
'weiß aber nicht mehr genau !
'Usage : cmd("Text for DOSBOX")
SUB cmd (BYVAL xBefehl)
set ws = CreateObject("WScript.Shell")
xBefehl = "pause |" & myBefehl
xresultat = ws.run("%COMSPEC /c " & myBefehl,,true)
END SUB
'(c) by Markus Wypych