VBS von Hyperlink öffnen

Question

Ich erstellte einen Hyperlink in einer PDF, dieser Hyperlink ist an VBS-Skript gebunden, bis dieser Schritt alles in Ordnung ist. Wenn ich das Skript manuell ausführe (Doppelklick), macht das Skript das, was ich will (offene Telnet-Verbindung). Das Problem ist, wenn ich das Skript über den Hyperlink ausführen, zeigt CMD die Nachricht "" Telnet "wird nicht als interner oder externer Befehl erkannt". Bitte, kann mir jemand sagen, warum passiert das ??

Dies ist das Skript:

Dim WshShell, regexp 
    set regular = New RegExp 

    direccion = inputbox("Ingresa ip del equipo:") 

    ' Set pattern. 
    regular.Pattern = "^(?:(?:25[0-5]|2[0-4][0-9]|[01]?[0-9][0-9]?)\.){3}(?:25[0-5]|2[0-4][0-9]|[01]?[0-9][0-9]?)$" 
    ' Set case insensitivity. 
    regular.IgnoreCase = True 
    ' Set global applicability. 
    regular.Global = True 

    if regular.test(direccion) = TRUE then 
     set WshShell=CreateObject("WScript.Shell") 
     WshShell.run "cmd.exe" 
     WScript.Sleep 1000 
     'Send commands to the window as needed - IP and commands need to be customized 
     'Step 1 - Telnet to remote IP' 
     WshShell.SendKeys "telnet " & direccion 
     WshShell.SendKeys ("{Enter}") 
     WScript.Sleep 1000 
    else 
    msgbox "Ingresa una ip válida" 
    end if 

Answer 1

wahrscheinlich Arbeitsverzeichnis nicht richtig eingestellt.

versuchen

WshShell.SendKeys "c:\windows\system32\telnet.exe " & direccion 

P. S: Sie es tun falsch. "sendkeys" ist irgendwie verständlich, wenn das Telnet-Terminal bereits läuft, aber es gibt keinen Grund, Schlüssel manuell an die Standard-Eingabeaufforderung zu senden.

Answer 2

Telnet ist nicht in meinem Windows 10 und 8. Aber wie auch immer, wenn Sie „telnet“ Befehl haben könnte nicht Sie tun:

WshShell.run "cmd.exe /k telnet" 

, die funktionieren sollte und spart Platz.