red_tea1980 发表于 2009-9-17 10:04:26

如何在一个Test中对Test自身进行操作？？

在QTP的测试工程中，怎样才能保存当前正在执行的Test？？

在QTP的示例中，提供了下面的代码来进行保存动作：
Dim qtApp
Set qtApp = CreateObject("QuickTest.Application") 'Create Application object
qtApp.Launch ' start Quicktest
qtApp.Visible = true ' make it visible
qtApp.test.save ' save the Test
Set qtApp = Nothing ' relase object
但是跟我的要求不符合，我希望能够保存当前执行的Test。
不知道大家有什么好的方法没？？？

hsjzfling 发表于 2009-9-17 10:49:09

在QTP执行过程中是不能对当前的QTP进程做任何操作的，要保存也只能在QTP脚本结束之后
另外，LZ这个要求有什么实际的意义么？

aishifu1 发表于 2009-9-17 10:55:16

一个系统环境下不能同时开启2次QTP。所以楼主想法不通。
请LZ说出需求，为什么要保存当前正在执行的Test。说不定大家可以帮帮忙。

red_tea1980 发表于 2009-9-17 11:38:31

回楼上的朋友：

主要是为了解决一个相对路径XML文件读取失败的问题。
这是我昨天发的帖子：
【在QTP中读取XML文件失败】
地址 http://bbs.51testing.com/viewthread.php?tid=170399

hsjzfling 发表于 2009-9-17 15:29:44

就你这个问题本身而言，在VBS脚本中执行AOM代码就行了，能实现在执行Test前先保存下。
至于XML那个问题就是另外一回事了，应该有其它更好的解决办法。比如在Options->Folder中设置路径等

red_tea1980 发表于 2009-9-17 16:20:02

麻烦楼上的朋友给出示例代码？？
AOM？

hsjzfling 发表于 2009-9-17 16:31:38

你不是自己都贴出来了么。。。稍微改点就好了
Dim qtApp
Set qtApp = CreateObject("QuickTest.Application") 'Create Application object
qtApp.Launch ' start Quicktest
qtApp.Visible = true ' make it visible
qtApp.Open <要执行的脚本名>, False
qtApp.test.save ' save the Test
qtApp.Test.Run
qtApp.test.close
Set qtApp = Nothing ' relase object
页: [1]
查看完整版本: 如何在一个Test中对Test自身进行操作？？