vbs引用(include)外部函数库

我们经常会碰见这样的情况,脚本A中想引用脚本B中的方法,VBS中可能通过以下方法来实现:

1
2
3
4
5
6
     Function Include(strFileName)
        Dim objFileContent
        Set objFileContent = CreateObject("Scripting.FileSystemObject").OpenTextFile(strFileName,1,False) 
        ExecuteGlobal objFileContent.ReadAll
        Set objFileContent = Nothing   
    EndFunction

在脚本A中加入这个Function,调用此Function:

1
Call Include(ProjectPath + "脚本B.vbs")

这样即可实现外部函数的调用。

唐胡璐 wechat
欢迎您扫一扫上面的微信公众号,订阅我的博客!
分享创造价值,您的支持将鼓励我继续前行!