首页 > itarticle > vbs引用(include)外部函数库

vbs引用(include)外部函数库

admin 11月 14, 2020 0

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

     Function Include(strFileName)
        Dim objFileContent
        Set objFileContent = CreateObject("Scripting.FileSystemObject").OpenTextFile(strFileName,1,False) 
        ExecuteGlobal objFileContent.ReadAll
        Set objFileContent = Nothing   
    End Function

在脚本A中加入这个Function，调用此Function：

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

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