从超链接打开VBS

Question

我在pdf中创建了一个超链接，这个超链接绑定到vbs脚本，直到这一步都行。当我手动运行该脚本（双击）时，脚本会自动运行（打开telnet连接）。问题是当我通过超链接运行脚本时，CMD显示消息“”telnet“未被识别为内部或外部命令”。请，谁能告诉我为什么会发生？

这是脚本：设置不正确

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

可能工作目录。

尝试

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

P.S：你这样做是错误的。当telnet终端已经运行时，“sendkeys”可以理解，但没有理由手动将密钥发送到标准命令提示符。

Answer 2

Telnet是不是在我的Windows 10和8。但无论如何，如果你有“远程登录”命令不能这样做：

WshShell.run "cmd.exe /k telnet" 

这应该工作，并节省了空间。