保持VBScript组织

Question

我维护了很多用于在我的网络上执行各种启动脚本的vbscripts,并且我在几乎所有这些脚本中都使用了一些函数.

没有复制和粘贴,有没有人建议我如何创建可重用的vbscript代码库.我并不反对使用代码生成器这样做,只要它不像复制和粘贴那样令人头疼.但任何建议都将受到赞赏.

谢谢

Answer 1

VBScript有Execute声明,所以如果你不想去Tester101建议的WSF路由,你可以做这样的包括:

Set fso = CreateObject("Scripting.FileSystemObject")
file = "your_library.vbs"

Execute fso.OpenTextFile(file, 1).ReadAll

Set foo = New FooClass
MsgBox foo.GetBar()

假设"your_library.vbs"包含一个类定义FooClass.

请务必在全局上下文中调用Execute,否则您将遇到范围问题.

当然,请务必严密控制所有文件,以防止恶意使用.