Remoteunterstützung anbieten per VBS

Hallo, ich würde gerne per VBS die Remoteunterstützung aufrufen und einen Parameter mit übergeben (den PCNamen) jemand eine Idee wie ich das umsetzen könnte?

Den Aufruf hab ich soweit nur der Paremeter wird nicht übernommen:

option explicit

dim WshShell : Set WshShell = WScript.CreateObject(„WScript.Shell“)
dim return

Return = WshShell.Run (""„hcp://CN=Microsoft%20Corporation,L=Redmond,S=Washington,C=US/Remote%20Assistance/Escalation/Unsolicited/Unsolicitedrcui.htm“"" & " „“ PCName"" ",1 )

und es muss ohne sendkeys umsetzbar sein.