so hier nun noch für alle die es interessiert die umsetzung in vbs:
---------------
Dim WshShell : Set WshShell = WScript.CreateObject("WScript.Shell")
Dim WshNetwork : Set WshNetwork = WScript.CreateObject("WScript.Network")
' --- collect the argument sent ------------------
If WScript.Arguments.Count <1 Then
' --- collect the argument from the user ------------------
strRemoteComputer = InputBox ("Enter the name of the target computer to which you wish to connect.", "Remote Assistance Helper", "Remote_Computer", 400,400)
If strRemoteComputer = "" Then WScript.Quit
Else
' --- collect the argument from the script/cmd line -------
strRemoteComputer = UCASE(Trim(WScript.Arguments(0)))
End If
'--------------------------------------------------
WScript.Echo "Attempting to connect to machine: " & strRemoteComputer
WshShell.Run "%windir%\pchealth\helpctr\binaries\helpctr.exe -FromStartHelp " & _
"-url hcp://CN=Microsoft%20Corporation,L=Redmond,S=Washington,C=US/Remote%20Assistance/Escalation/unsolicited/SMSUnsolicitedRCUI.htm " & _
"-ExtraArgument " & "NOVICECOMPUTER=" & strRemoteComputer & """"
------------
Savi