bs调用另一个vbs的函数

要在1.vbs中运行在2.vbs中包含的函数。我摘抄如下：
1.第一种需要可能是需要在一个脚本运行的中间直接运行另外一个脚本。这可以通过下面的方法来完成： Set WSHShell = CreateObject("WScript.Shell") WSHShell.Run "wscript c:\Test.vbs param1", , True 
2. 更多的时候，我们需要在脚本之间共享变量，以及相互调用函数。我们想要得到C/C++中那样的便利性：通过一个Include声明，就可以将另外一个模块中的函数和变量引入到当前的模块中。在VBScript中，可以通过ExecuteGlobal来实现: 
Sub Include(sInstFile) 
Dim oFSO, f, s 
Set oFSO = CreateObject("Scripting.FileSystemObject") 
Set f = oFSO.OpenTextFile(sInstFile) 
s = f.ReadAll 
f.Close 
ExecuteGlobal s 
End Sub 

这样，在脚本中加上这样一句调用：Include "mylib.vbs"，就可以使用mylib.vbs中声明的全局变量和函数了！注意这里的函数ExecuteGlobal有一个类似的函数Execute，这里如果使用Execute的话，就达不到我们想要的效果。因为通过Execute暴露的名字，其作用范围局限于Execute所处的级别，在这里，也就是在函数Include内部。这几乎肯定不是你想要的结果。