QTP的Action间的信息共享的4种方法.docxVIP

通过Action参数来传递数据?Action2的脚本如下： Input ParametersMessage = Parameter(Msg)Msgbox Message? Output ParametersIf NOT Message = Then?????? Parameter(ReturnMsg) = The Message is MessageElse?????? Parameter(ReturnMsg) = The Message is Empty!End If? RetuenValueExitAction HAHAHAHHAHA!!!!!ExitAction Parameter(ReturnMsg)??3种调用Action的方法，Action1的脚本如下： 调用Action2，输入参数为 “ Hello!”，把输出参数值写到ReturnMessage1变量RunAction Action2, oneIteration,Hello! ,ReturnMessage1Msgbox ReturnMessage1? 调用Action2，输入参数为 “ Hello!”，通过Parameter方法读取输出参数值RunAction Action2, oneIteration,Hello! ReturnMessage2=?Parameter(Action2,ReturnMsg)Msgbox ReturnMessage2? 如果被调用的Action使用了ExitAction来退出Action并返回ReturnValue，则可以使用下面的方式来获取Return Value的值 注意OutPut Parameters与Return Value的区别ReturnMessage3 = RunAction( Action2, oneIteration ,Hello!)Msgbox ReturnMessage3?通过全局数据表（Global Data Table）来共享数据??在Action1中设置参数值，Action1的脚本如下： 获取全局数据表Set Sheet = DataTable.GetSheet(Global) 查找参数列Set Parameter1 = Sheet.GetParameter(Column1) Set Parameter2 = Sheet.GetParameter(Column2) 设置参数值Parameter1.Value=Hello Parameter2.Value=World! 调用Action2，Action2将使用前面设置的参数值RunAction Action2, oneIteration?在Action2中读取参数值，Action2的脚本如下： 获取全局数据表Set Sheet = DataTable.GetSheet(Global) 读取参数值Set Parameter1 = Sheet.GetParameter(Column1) Set Parameter2 = Sheet.GetParameter(Column2) 使用参数值Msgbox Parameter1 Parameter2?使用环境变量（Environment Variables）来共享数据??在Action1中使用环境变量中定义的LoginUserName和LoginPassWord，Action1的脚本如下： 在Action1中使用环境变量中定义的LoginUserName和LoginPassWordUserName = Environment.Value(LoginUserName)UserPassWord = Environment.Value(LoginPassWord)?SystemUtil.Run C:/Program Files/Mercury Interactive/QuickTest Professional/samples/flight/app/flight4a.exeDialog(Login).ActivateDialog(Login).WinEdit(Agent Name:).Set UserNameDialog(Login).WinEdit(Password:).SetSecure UserPassWordDialog(Login).WinButton(OK).Click? 调用Action2，在Action2中也将使用到定义的环境变量RunAction Action2, oneIteration?在Action2中使用环境变量中定义的LoginUserName，Action2的脚本如下： 在Action2中使用环境变量中定义的LoginUserNameUserName = Environment