51Testing软件测试论坛

标题: 急求关于参数化链接的问题。 [打印本页]

作者: lingb 时间: 2009-10-14 17:00
标题: 急求关于参数化链接的问题。
录制一个资产被盗申请单的流程，包括三个环节：申请、确认和审核。代码如下：将申请时自动生成的工单号码输出作为参数AAL_Number，第二、第三环节登陆后点击的工单号码取该参数。
Browser("动态资产跟踪管理系统（DATAMS） - 广东省移动通信有限").Page("动态资产跟踪管理系统（DATAMS） - 广东省移动通信有限").WebEdit("TextBoxUserName").Set "chenlizhou"
Browser("动态资产跟踪管理系统（DATAMS） - 广东省移动通信有限").Page("动态资产跟踪管理系统（DATAMS） - 广东省移动通信有限").Image("ButtonLogin").Click 2,2
Browser("动态资产跟踪管理系统（DATAMS） - 广东省移动通信有限").Page("动态资产跟踪管理系统（DATAMS） - 广东省移动通信有限_2").Frame("contents").Link("起草工作单").Click
Browser("动态资产跟踪管理系统（DATAMS） - 广东省移动通信有限").Page("动态资产跟踪管理系统（DATAMS） - 广东省移动通信有限_2").Frame("contents").Link("资产退出管理流程").Click
Browser("动态资产跟踪管理系统（DATAMS） - 广东省移动通信有限").Page("动态资产跟踪管理系统（DATAMS） - 广东省移动通信有限_2").Frame("contents").Link("网络资产被盗处理单").Click
Browser("网络资产被盗处理单").Page("网络资产被盗处理单").WebTable("状态：新建").Output CheckPoint("状态：新建")
Browser("网络资产被盗处理单").Page("网络资产被盗处理单").WebEdit("WOContentRegion1$tbReasonReque").Set "test"
Browser("网络资产被盗处理单").Page("网络资产被盗处理单").WebButton("编辑清单...").Click
Browser("网络资产被盗处理单").Window("明细编辑 -- 网页对话框").Activate
Browser("网络资产被盗处理单").Window("明细编辑 -- 网页对话框").Page("明细编辑").WebEdit("tbBarcode").Set DataTable("Barcode", dtGlobalSheet)
Browser("网络资产被盗处理单").Window("明细编辑 -- 网页对话框").Page("明细编辑").Link("查找并添加").Click
Browser("网络资产被盗处理单").Window("明细编辑 -- 网页对话框").Activate
Browser("网络资产被盗处理单").Window("明细编辑 -- 网页对话框").Page("明细编辑").Link("快速录入").Click
Browser("网络资产被盗处理单").Window("明细编辑 -- 网页对话框").Window("值列表批量录入 -- 网页对话框").Page("值列表批量录入").Frame("Main").WebEdit("tbList").Set DataTable("BarcodeList", dtGlobalSheet)
Browser("网络资产被盗处理单").Window("明细编辑 -- 网页对话框").Window("值列表批量录入 -- 网页对话框").Page("值列表批量录入").Frame("Main").WebButton("确定").Click
Browser("网络资产被盗处理单").Window("明细编辑 -- 网页对话框").Page("明细编辑").WebEdit("grdView$ctl02$tbDateOfLost").Set "2009-10-14"
Browser("网络资产被盗处理单").Window("明细编辑 -- 网页对话框").Page("明细编辑").WebEdit("grdView$ctl03$tbDateOfLost").Set "2009-10-14"
Browser("网络资产被盗处理单").Window("明细编辑 -- 网页对话框").Page("明细编辑").WebEdit("grdView$ctl04$tbDateOfLost").Set "2009-10-14"
Browser("网络资产被盗处理单").Window("明细编辑 -- 网页对话框").Page("明细编辑").WebButton("确定").Click
Browser("网络资产被盗处理单").Page("网络资产被盗处理单_2").WebTable("序号").Output CheckPoint("序号")
Browser("网络资产被盗处理单").Page("网络资产被盗处理单_2").WebButton("提交").Click
Browser("网络资产被盗处理单").Window("-- 网页对话框").Page("Page").Frame("Frame").WebButton("确定").Click
Browser("动态资产跟踪管理系统（DATAMS） - 广东省移动通信有限").Page("动态资产跟踪管理系统（DATAMS） - 广东省移动通信有限_2").Frame("banner").Link("退出").Click
Browser("动态资产跟踪管理系统（DATAMS） - 广东省移动通信有限").Page("动态资产跟踪管理系统（DATAMS） - 广东省移动通信有限").WebEdit("TextBoxUserName").Set "zhongrongguang"
Browser("动态资产跟踪管理系统（DATAMS） - 广东省移动通信有限").Page("动态资产跟踪管理系统（DATAMS） - 广东省移动通信有限").Image("ButtonLogin").Click 2,2
Dim s,string
s=Mid(DataTable("AAL_Number", dtGlobalSheet),5,15)
Browser("动态资产跟踪管理系统（DATAMS） - 广东省移动通信有限").Page("动态资产跟踪管理系统（DATAMS） - 广东省移动通信有限_2").Frame("main").Link("AAL_20091000065").SetTOProperty "text",s
Browser("动态资产跟踪管理系统（DATAMS） - 广东省移动通信有限").Page("动态资产跟踪管理系统（DATAMS） - 广东省移动通信有限_2").Frame("main").Link(s).Click
Browser("网络资产被盗处理单").Page("网络资产被盗处理单").WebButton("流程图").ClickBrowser("工单流程示意图").Page("工单流程示意图").Sync
Browser("工单流程示意图").Close
Browser("网络资产被盗处理单").Page("网络资产被盗处理单").WebButton("下载").Click
Browser("网络资产被盗处理单").Dialog("文件下载").WinButton("取消").Click
Browser("网络资产被盗处理单").Page("网络资产被盗处理单_3").WebButton("提交").Click
Browser("网络资产被盗处理单").Window("-- 网页对话框").Page("Page").Frame("Frame").WebButton("确定").Click
Browser("动态资产跟踪管理系统（DATAMS） - 广东省移动通信有限").Page("动态资产跟踪管理系统（DATAMS） - 广东省移动通信有限_2").Frame("banner").Link("退出").Click
Browser("动态资产跟踪管理系统（DATAMS） - 广东省移动通信有限").Page("动态资产跟踪管理系统（DATAMS） - 广东省移动通信有限").WebEdit("TextBoxUserName").Set "linhongwei"
Browser("动态资产跟踪管理系统（DATAMS） - 广东省移动通信有限").Page("动态资产跟踪管理系统（DATAMS） - 广东省移动通信有限").Image("ButtonLogin").Click 5,5
Browser("动态资产跟踪管理系统（DATAMS） - 广东省移动通信有限").Page("动态资产跟踪管理系统（DATAMS） - 广东省移动通信有限_2").Frame("main").Link("AAL_20091000065").SetToProperty "text",s
Browser("动态资产跟踪管理系统（DATAMS） - 广东省移动通信有限").Page("动态资产跟踪管理系统（DATAMS） - 广东省移动通信有限_2").Frame("main").Link(s).Click
Browser("网络资产被盗处理单").Page("网络资产被盗处理单").WebButton("编辑清单...").Click
Browser("网络资产被盗处理单").Window("明细编辑 -- 网页对话框").Page("明细编辑").WebEdit("grdView$ctl02$tbLossOfCharge").Set "10.00"
Browser("网络资产被盗处理单").Window("明细编辑 -- 网页对话框").Page("明细编辑").WebEdit("grdView$ctl03$tbLossOfCharge").Set "20.00"
Browser("网络资产被盗处理单").Window("明细编辑 -- 网页对话框").Page("明细编辑").WebEdit("grdView$ctl04$tbLossOfCharge").Set "30.00"
Browser("网络资产被盗处理单").Window("明细编辑 -- 网页对话框").Page("明细编辑").WebButton("确定").Click
Browser("网络资产被盗处理单").Page("网络资产被盗处理单_4").WebEdit("WOContentRegion1$tbAssetManage").Set "tttttt"
Browser("网络资产被盗处理单").Page("网络资产被盗处理单_4").WebButton("提交").Click
Browser("网络资产被盗处理单").Window("-- 网页对话框").Page("Page").Frame("Frame").WebButton("确定").Click
Browser("网络资产被盗处理单").Window("-- 网页对话框").Dialog("Microsoft Internet Explorer").WinButton("确定").Click
Browser("动态资产跟踪管理系统（DATAMS） - 广东省移动通信有限").Page("动态资产跟踪管理系统（DATAMS） - 广东省移动通信有限_2").Frame("banner").Link("退出").Click

但第二环节点击工单号时报错：
The"AAL_20091000069" Link Object was not found in the Object Repository.
Check the Object Repository to Confirm that the object exists or find the correct name of the object.

请高手赐教。。。

作者: testlab 时间: 2009-10-14 17:33
s=Mid(DataTable("AAL_Number", dtGlobalSheet),5,15)
还是s=Mid(DataTable("AAL_Number", dtGlobalSheet),5,11)

作者: lingb 时间: 2009-10-14 18:20
问题已经解决，谢谢，问题在于对象录制下来后其name为：AAL_20091000065
因此将参数化的脚本改为如下即可（修改了红色部分）：
Dim s,string
s=Mid(DataTable("AAL_Number", dtGlobalSheet),5,15)
Browser("动态资产跟踪管理系统（DATAMS） - 广东省移动通信有限").Page("动态资产跟踪管理系统（DATAMS） - 广东省移动通信有限_2").Frame("main").Link("AAL_20091000065").SetTOProperty "text",s
Browser("动态资产跟踪管理系统（DATAMS） - 广东省移动通信有限").Page("动态资产跟踪管理系统（DATAMS） - 广东省移动通信有限_2").Frame("main").Link("AAL_20091000065").Click

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