here556 发表于 2011-1-10 16:23:59

通过vbs启动QTP然后在QTP中调用外部vbs时遇到的问题

我在桌面有两个vbs文件,hello.vbs和run.vbs,代码如下:
hello.vbs:

Sub hello
msgbox "hello"
End Sub

run.vbs:

Dim qtApp
Set qtApp = createObject("QuickTest.Application")
qtApp.Launch
qtApp.Visible = True

'Set Run Options
qtApp.Options.Run.RunMode = "Fast"
qtApp.Options.Run.ViewResults = False

qtApp.Test.Settings.Resources.Libraries.RemoveAll
qtApp.Test.Settings.Resources.Libraries.Add "C:\Documents and Settings\liuf\桌面\hello.vbs"

qtApp.Test.SetAssociatedAddins(Array("Web","Visual Basic","ActiveX"))
qtApp.Test.Actions("Action1").SetScript "hello"
qtApp.Test.Run

我想通过run.vbs启动QTP再调用hello.vbs,最后打出hello,但是我运行的时候报错如截图:

是不是我的版本太低不支持SetScript方法,还是其他什么原因,我的版本是9.2.如果不支持,那么在较低的版本怎样实现这样的功能呢?

wugecat 发表于 2011-1-10 17:21:43

帮助里没看有SetScript 这个方法啊,你在哪里看到的?

nimcok 发表于 2011-1-10 18:00:33

本帖最后由 nimcok 于 2011-1-10 18:03 编辑

晕,你Help文档中看看不就知道了,QTP10才支持SetScript的方法,QTP9.2都不支持此方法
所以你要执行这段代码需要QTP10支持
为什么非得要这样实现,你先建一个QTP_Test,里面执行Hello,然后通过Run.vbs执行这个QTP_test不就可以了
回复 1# here556

hsjzfling 发表于 2011-1-10 18:03:30

回复 1# here556

LZ的报错和代码不符合啊,前面的qtApp.呢?另外,QTP中不能使用中文路径,切记.代码review倒是能通过,就代码来看完全没有问题

nimcok 发表于 2011-1-10 18:05:40

谁说不能用中文路径的,和路径没关系的,QTP版本的支持问题,换QTP10就没问题了,QTP9.2不支持SetScript方法
回复here556

LZ的报错和代码不符合啊,前面的qtApp.呢?另外,QTP中不能使用中文路径,切记.代码review倒 ...
hsjzfling 发表于 2011-1-10 18:03 http://bbs.51testing.com/images/common/back.gif

here556 发表于 2011-1-10 18:30:13

多谢各位了,回去下个QTP10去!
页: [1]
查看完整版本: 通过vbs启动QTP然后在QTP中调用外部vbs时遇到的问题