vbscript - 在 VB 脚本中调用另一个文件中的函数

Question

我在 QTP 中使用测试驱动程序脚本（testset Driver.vbs），并在其中尝试调用另一个文件中的函数。我想我可以将它添加到测试集 driver.vbs 中：

Function IncludeAOA
Dim objFSO, objFile, AR1

    Set objFSO = CreateObject("Scripting.FileSystemObject")
    Set objFile = objFSO.OpenTextFile("\\Server1\QTP Files\Community\Driver Scripts\AOAReg.vbs", 1)
    AR1 = objFile.ReadAll
    objFile.Close
    ExecuteGlobal AR1
End Function

我调用IncludeAOA似乎有效的函数。但是，当它到达ExecuteGlobal AR1线路时，它会失败并显示

错误：无效字符，代码：800A0408。

谁能看到我错过了什么？

Answer 1

AR1 - 即代码AOAReg.vbs- 是罪魁祸首。尝试使用cscript AOAReg.vbs. 如果这没有显示错误（包括行号），请发布代码或检查该文件的编码。