syntax - 如何从另一个 vbscript 执行 vbscript？

Question

例如，如果我有两个 vbscript 文件：A.vbs和B.vbs. 我希望 B.vbs 中的 vbscript 执行 A.vbs，这样的伪代码如下所示：

'B.vbs
execute("A.vbs")

就像这一行一样简单，但我真的找不到有效的语法来完成这样的任务。希望有人能帮帮我，谢谢。

Answer 1

Dim oShell 
Set oShell = Wscript.CreateObject("WScript.Shell")
oShell.Run "name_of_vbs_file_here.vbs"   
Set oShell = Nothing 

Answer 2

以下将执行 a.vbs，因为它是调用脚本本身的一部分

include "a.vbs" 

sub include(script)
  dim fso, file
  set fso = createObject ("Scripting.Filesystemobject")
  if fso.FileExists (script) then 
    set file = fso.OpenTextFile (script)
    executeGlobal file.ReadAll ()
    file.Close 
    set file = nothing 
  end if 
  set fso = nothing 
end sub 

Answer 3

Dim Shell
Set Shell = CreateObject ("WScript.Shell")
Shell.Run "a.vbs"

您还可以通过添加诸如“SendKeys”或其他 Shell 之类的东西来增加它的趣味性。