创建 vbs 脚本以将 .bat 文件安装到远程 IP答案

【问题标题】：creating vbs script to install .bat file to remote IP创建 vbs 脚本以将 .bat 文件安装到远程 IP
【发布时间】：2012-04-16 16:13:42
【问题描述】：

我有一个需要在我们网络上的远程 IP 上运行的 .bat 文件。我想做的是提示输入 IP 地址的 10.x.x 部分，然后让脚本执行一个从 .1 开始并继续到 .254 的循环，这样 .bat 文件就会被推送到 10.x.x.1 - 10.x.x.254

到目前为止，这是我得到的：

Dim WshShell
set WshShell = CreateObject("wscript.shell")

strUserInput = InputBox("enter network" )

Wshshell.exec("cmd /k CD ../directory/file.bat" & strUserInput)

如果我手动打开一个 cmd 并导航到正确的目录并运行 file.bat 10.x.x.x，如果 .bat 文件在网络上，它将在远程计算机上运行。

【问题讨论】：

您只是在寻找 1-254 的循环吗？
我无法将输入的文本字符串附加到代码的第一部分。
好久没用vb了，试试MsgBox看看缺什么：MsgBox("cmd /k CD ../directory/file.bat" & strUserInput)跨度>
不确定您所说的 MsgBox 是什么意思。我试过 Wshshell.MsgBox("cmd /k CD ../bit9/deploy_bit9.bat" & strUserInput) 但它出错并说'对象不支持此属性或方法'
是不是有问题，“cmd /k ... file.bat”字符串的末尾没有空格？

标签： windows batch-file cmd vbscript

【解决方案1】：

这有助于正确创建和显示字符串：

Sub test()
    Dim location As String
    location = InputBox("enter network")
    MsgBox ("cmd /k CD ../directory/file.bat" & location)
End Sub

【讨论】：

声明该变量时是否必须包含“字符串”？