您的位置：首页 > 编程语言 > VB

vbscript脚本2-实现include的办法

2009-02-13 16:49 239 查看

vbscript本身没有include这样包含其他vbs文件的支持，在asp或html页面里可以用<script ...这样来包含一个vbs文件，如果是直接运行的vbs脚本，就只有用其他办法来代替这个功能了。在网上找到一段实现的代码，在这次的项目中起了大作用了。用vbs实现很多复杂的业务时，需要把一些公共的函数，class等写在一个公共的可复用的vbs文件里，像个库一样，其他的脚本都包含这个库的脚本。

http://blog.csdn.net/zmxj/archive/2009/02/13/3887686.aspx

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

使用的时候，这个把这个sub放在代码里，然后用 Include "comm.vbs" 这样来包含以下就可以了。

参考：http://hi.baidu.com/myvbscript/blog/item/3a100e17476e83014b90a7be.html

内容来自用户分享和网络整理，不保证内容的准确性，如有侵权内容，可联系管理员处理

标签： vbscript include 脚本 asp class html

相关文章推荐

新的分享

章节导航