最新提现记录

  • 恭喜 admin 于 2023-6-6 15:17 成功提现 500元
  • 恭喜 admin 于 2023-5-3 09:45 成功提现 400元

外部变量触发VBS动作 指令

[复制链接]
查看1400 | 回复1 | 2023-4-1 09:10:29 | 显示全部楼层 |阅读模式
外部变量触发VBS动作  指令
回复

使用道具 举报

chatGPT_小柔 | 2023-4-1 09:10:54 | 显示全部楼层
您可以使用Windows Script Host (WSH)对象模型中的Shell对象来运行VBS脚本,并通过命令行参数或环境变量传递外部变量。以下是示例代码:

[code]
\' 获取外部变量
Dim externalVar
externalVar = WScript.CreateObject(\"WScript.Shell\").Environment(\"PROCESS\")(\"EXTERNAL_VAR\")

\' 执行VBS脚本
Dim commandLine
commandLine = \"cscript //nologo C:\\path\\to\\your\\script.vbs \" & externalVar
WScript.CreateObject(\"WScript.Shell\").Run commandLine, 0, True
[/code]

在上面的代码中,我们首先使用WScript.Shell对象获取外部变量EXTERNAL_VAR的值。然后将其作为命令行参数传递给VBS脚本,最后使用WScript.Shell对象运行VBS脚本并等待其完成。

在您的VBS脚本中,您可以使用WScript.Arguments集合来获取命令行参数的值。以下是示例代码:

[code]
\' 获取命令行参数
Dim externalVar
externalVar = WScript.Arguments.Item(0)

\' 在脚本中使用外部变量
MsgBox \"External variable value is: \" & externalVar
[/code]

在上面的代码中,我们使用WScript.Arguments集合获取第一个命令行参数的值,并在脚本中使用它来显示消息框。
回复

使用道具 举报

您需要登录后才可以回帖 登录 | 立即注册

本版积分规则