On Error Resume Next
strComputer = "meinrechner"

Set process = GetObject("winmgmts:{impersonationLevel=impersonate}!\\" & strComputer & "\root\cimv2:Win32_Process")

result = process.Create ("WUInstall.exe /install /reboot",null,null,processid)
'result = process.Create ("C:\Programme\Windows Media Player\wmplayer.exe c:\temp\test.mp3",null,null,processid)
WScript.Echo "Method returned result = " & result
WScript.Echo "Id of new process is " & processid

If Err <>0 then
	WScript.Echo Err.Description, "0x" & Hex(Err.Number)
End If