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

软件发布|下载排行|最新软件

当前位置:首页IT学院IT技术

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

  2021-03-17 我要评论
想了解在一个vbs中包含其他vbs文件的方法的相关内容吗,在本文为您仔细讲解的相关知识和一些Code实例,欢迎阅读和指正,我们先划重点:在一个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


Copyright 2022 版权所有 软件发布 访问手机版

声明:所有软件和文章来自软件开发商或者作者 如有异议 请与本站联系 联系我们