51Testing软件测试论坛

标题: 用multi工具一次运行多个action，前面运行正常，重新载入个action报找不到JTree [打印本页]

作者: shuyanping1004 时间: 2010-12-8 17:11
标题: 用multi工具一次运行多个action，前面运行正常，重新载入个action报找不到JTree
用multi工具一次运行多个action，前面运行正常，重新载入新action报找不到JTree，重新打开应用程序再跑又OK，很麻烦，只能一点点的跑，有高手碰到过吗？谢谢

作者: TIB 时间: 2010-12-8 17:41
调试一下，可能是对象识别问题

建议用QTP的AOM自己写调度工具

作者: shuyanping1004 时间: 2010-12-9 09:59
单独跑是可以的，跑多个就有问题，对象应该没问题吧，请问如何用QTP的AOM自己写调度工具，能否具体点，没用过，谢谢

作者: timfung 时间: 2010-12-9 10:49
multi不好用，自己写吧！

Set qtApp = CreateObject("QuickTest.Application")
qtApp.Launch
qtApp.Visible = True
qtApp.Options.Run.RunMode = "FAST"
qtApp.Options.Run.ViewResults = False

Dim ActionList(4)

ActionList(0) = ""
ActionList(1) = ""
ActionList(2) = ""
ActionList(3) = ""

For i = 0 To UBound(ActionList)-1
qtApp.Open ActionList(i),True
qtApp.Test.Run
qtApp.Test.Close
Next
qtApp.Quit
Set qtApp = Nothing

作者: shuyanping1004 时间: 2010-12-10 14:20
Set qtApp = CreateObject("QuickTest.Application")
qtApp.Launch
qtApp.Visible = True
qtApp.Options.Run.RunMode = "FAST"
qtApp.Options.Run.ViewResults = False

Dim testList(2)

testList(0) = "test11"
testList(1) = "test22"

For i = 0 To UBound(testList)-1
qtApp.Open testList(i),True
qtApp.Test.Run
qtApp.Test.Close
Next
qtApp.Quit
Set qtApp = Nothing
想运行多个test,模仿上面写的，运行报错，找不到test
多谢高手指教（初学）

欢迎光临 51Testing软件测试论坛 (http://bbs.51testing.com/)