|
目标:将test1中的参数传递到test2中
操作:
test1中的action1中 call 了test2中的可复用的action1
1、在test1中设置一个test输出参数和一个action输出参数,action call properties中关联这两个参数
test1-action1代码如下:
Parameter("outaction") = "aaa"
RunAction "Action1 [Test2]", oneIteration , outpara
2、在test2中设置一个test输入参数和一个action输入参数,action call properties中关联这两个参数
test2-action1代码如下:
Dim qtApp ,pDefColl,pDef ,rtParams,rtParam
Set qtApp = CreateObject("QuickTest.Application")
Set pDefColl = qtApp.Test.ParameterDefinitions
Set rtParams = pDefColl.GetParameters()
Set rtParam = rtParams.Item("inpara")
MsgBox rtParams.Item("inpara").Value
可是运行时,系统提示错误,如下图,请教原因,是不是我设置的有问题,如果想这么传递参数,应该怎么做?谢谢
之前看过一个test和vbs之间传递参数的例子,可我在test与test之间传递总也不成功,不知道为什么
[ 本帖最后由 zte_boy 于 2008-4-7 00:49 编辑 ] |
|