从VBS脚本Ping变量的值

Question

我正在尝试制作一个简单的脚本来ping它作为参数的计算机。

执行VBScript时，似乎无法将变量识别为变量，而只是将其作为字符串信息并打印以下错误消息；

  

Ping请求找不到主机Var2。请检查名称，然后重试。

下面是脚本：

Dim Var2

Var2 = inputbox("What is your B number?")
Wscript.Echo Var2

Set objShell = CreateObject("WScript.Shell")
objShell.Run "%COMSPEC% /k ping Var2"

通过在网上搜索，我得到了更长的脚本解决方案，因为我认为这些解决方案并不那么复杂。 感谢任何帮助。

谢谢。

Answer 1

您正在将Var2作为字符串传递给命令。要将Var2的内容添加到命令中，必须将最后一行中的字符串连接起来：

objShell.Run "%COMSPEC% /k ping " & Var2