qtp引用外部函数文件的问题

SilenceHost

我使用如下代码进行QTP函数资源库的文件添加，但是每次执行都会出错

1. Set obj = CreateObject("QuickTest.Application")
   
2. Set QTPResources = obj.Test.Settings.Resources.Libraries
   
3. If QTPResources.Find("E:\Qtp\Tests\TestData\test.vbs") = -1 Then
   
4. QTPResources.Add "E:\Qtp\Tests\TestData\test.vbs"
   
5. End If
   
6. Set QTPResources = nothing
   
7. Set obj = nothing

复制代码

错误信息“This operation cannot be performed during a run session.
Line(4):"QTPResources.Add "E:\Qtp\Tests\TestData\test.vbs""

操作系统windows 7，qtp10.0

hsjzfling

这段代码只能在vbs中运行，如果你能弄清楚QTP中各部分的的执行次序，那么就应该能解决这个问题了。
Resources中的代码是先于QTP Test中的各Action代码而执行的

SilenceHost

回复 2# hsjzfling


    嗯，现在是在VBS中执行了的，但是如果只能在外部VBS执行的话那灵活性要低很多了。
请问一下，如果要在qtp中使用代码加载函数资源库该如何做呢？

hsjzfling

如果非要在QTP运行的代码中加载，那就用ExecuteFile的方式吧，跟加载Resources大致一样，只有略微的区别