lingb 发表于 2009-10-14 17:00: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:50

s=Mid(DataTable("AAL_Number", dtGlobalSheet),5,15)
还是s=Mid(DataTable("AAL_Number", dtGlobalSheet),5,11)

lingb 发表于 2009-10-14 18:20:34

问题已经解决,谢谢,问题在于对象录制下来后其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
页: [1]
查看完整版本: 急求关于参数化链接的问题。