如何将命令发送到另一个 VBScript？ [复制]

Question

我需要通过 2 个不同的 VBScript 渲染输入的帮助。这是我的代码，但我需要一种将 A.vbs 的输入渲染为 B.vbs 的方法，这是我的代码：

Option Explicit
Dim Shell
Set Shell = CreateObject("WScript.Shell")
Speed = InputBox("How long do you have to wait between clicks, in seconds?", "")
Wait = InputBox("How long until this script runs?", "")
msgbox("You have " & Wait & " seconds until this script runs.")
WScript.Sleep (Wait*1000)
Shell.Run "B.vbs"

Answer 1

您可以使用环境变量：

' Create WSH Shell object
Dim objWshShell
Set objWshShell = CreateObject("WScript.Shell")

' Get the Environment
Dim objEnvironment
Set objEnvironment = objWshShell.Environment("System")

' Write to variable
objEnvironment("Speed") = Speed

' Read from variable
MsgBox objEnvironment("Speed")

您需要写入A.vbs 脚本中的环境变量，并从B.vbs 脚本中的变量中读取。