Dim objController, objRemoteScript

Set objController = CreateObject("WshController")

WScript.Echo "trying on host: " & host 
	
Set objRemoteScript = objController.CreateScript("\\host\share$\someScript.vbs", host)
objRemoteScript.Execute

Do While objRemoteScript.Status <> 1
    	WScript.Sleep 100
Loop

Call exeute("host.domain.local", "wuauclt /resetauthorization /detectnow")

Sub exeute(ByRef host, ByRef parameter)
	Set objWMIService = GetObject("winmgmts:\\" & host & "\root\cimv2:Win32_Process")
	
	Error = objWMIService.Create(parameter, null, null, intProcessID)

	If Error = 0 Then
	    Wscript.Echo "started with a process ID of " & intProcessID & "."
	Else
	    Wscript.Echo "could not be started due to error " & Error & "."
	End If
End Sub