Question

例如，如果我有两个vbscript文件：A.vbs和B.vbs。我希望B.vbs中的vbscript执行A.vbs，这样的peudo-code看起来如下：

'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 之类的东西来增加它的趣味性。

如何从另一个vbscript执行vbscript？

3 个答案: