vbscript - QTP中如何添加多个函数库文件

比如说，我的框架中有 20 个 vbs 文件位于 C:\LIBS\
我想删除所有已经关联的 vbs 文件并添加上述位置的所有 20 个 vbs。

我尝试使用以下代码获取所有文件

Set fso= CreateObject("Scripting.FileSystemObject")
Set f = fso.GetFolder("C:\LIBS\")
Set fc = f.files
  For Each singlefile in fc
  msgbox singlefile.name
 Next

通过这个，我能够看到所有的 vbs 文件。但是我不确定如何使用这些文件将它与我的测试相关联。

提前致谢。

最佳答案

您可以使用 LoadFunctionLibrary 方法加载任何 vbs 文件...
LoadFunctionLibrary "C:\LIBS\Library1.vbs"
您可以放置​​它来循环所有文件。您也可以这样做来加载多个库。
LoadFunctionLibrary "C:\LIBS\Library1.vbs", "C:\LIBS\Library2.vbs"
使用这两种方法之一，您必须将此 LoadFunctionLibrary 代码放置在任何测试代码之前运行。要么将此 vbs 文件关联到您的 qtp 脚本，要么将其放在 QTP 脚本中的测试代码前面。

这种方法称为函数库的动态加载。

关于vbscript - QTP中如何添加多个函数库文件，我们在Stack Overflow上找到一个类似的问题：https://stackoverflow.com/questions/20270580/