当前位置： 移动技术网 > IT编程>脚本编程>VBScript > 在一个vbs中包含其他vbs文件的方法

在一个vbs中包含其他vbs文件的方法

2017年12月12日  | 移动技术网IT编程  | 我要评论

多肉花卉,助闺蜜私奔遭处决,小兔子

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


您可能感兴趣的文章:

如对本文有疑问，请在下面进行留言讨论，广大热心网友会与你互动！！ 点击进行留言回复

相关文章:

验证码：
最近更新的文章
大家感兴趣的文章
移动技术网