Syntax 如何从另一个vbscript执行vbscript?

Syntax 如何从另一个vbscript执行vbscript?,syntax,vbscript,Syntax,Vbscript,例如,如果我有两个vbscript文件:A.vbs和B.vbs。我希望B.vbs中的vbscript执行A.vbs,这样的peudo代码如下所示: 'B.vbs execute("A.vbs") 就像这一行一样简单,但我真的找不到有效的语法来完成这样的任务。希望有人能帮助我,谢谢。以下将执行a.vbs,因为它是调用脚本本身的一部分 Dim oShell Set oShell = Wscript.CreateObject("WScript.Shell") oShell.Run "name_of

例如,如果我有两个vbscript文件:
A.vbs
B.vbs
。我希望B.vbs中的vbscript执行A.vbs,这样的peudo代码如下所示:

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

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

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

Dim oShell 
Set oShell = Wscript.CreateObject("WScript.Shell")
oShell.Run "name_of_vbs_file_here.vbs"   
Set oShell = Nothing 
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 
Dim Shell
Set Shell=CreateObject(“WScript.Shell”)
Shell。运行“a.vbs”

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

这将执行一个脚本是的,但不与调用脚本进行任何交互