本篇内容介绍了“如何在一个vbs中包含其他vbs文件”的有关知识,在实际案例的操作过程中,不少人都会遇到这样的困境,接下来就让小编带领大家学习一下如何处理这些情况吧!希望大家仔细阅读,能够学有所成!
asp中 include file 包含其他文件
vbs中
复制代码 代码如下:
Option Explicit On Error Resume Next Sub include(vbs) Dim fso : Set fso = CreateObject("scripting.FileSystemObject") Dim p : p = Split(Wscript.ScriptFullName,"\") p(UBound(p)) = vbs p = Join(p,"\") Dim f : Set f = fso.OpenTextFile(p) Execute f.ReadAll() ' ExecuteGlobal f.ReadAll() f.Close() Set f = Nothing Set fso = Nothing ' Wscript.Echo(p) End Sub include("1.vbs") include("2.vbs") 'If Err Then ' Wscript.Echo(Err.description) ' Wscript.Quit() 'End If Wscript.Echo(a+b) 1.vbs a = 3 2.vbs b = 4
“如何在一个vbs中包含其他vbs文件”的内容就介绍到这里了,感谢大家的阅读。如果想了解更多行业相关的知识可以关注创新互联网站,小编将为大家输出更多高质量的实用文章!