|
现场勘察ACTION的脚本如下:
现场勘察对应的datatable中有两条数据,其中第二条数据为正常数据。
设置循环后,我想着是执行到datatable中第二条数据,执行完后,执行倒数第四行代码(点击编辑按钮后)跳出这个action去执行下一个action,但是还是继续执行现场勘查这个循环
RowCount=DataTable.GetSheet("现场勘察").GetRowCount
For n=0 to RowCount-1
'现场勘察页面
Browser("创富电子业务开发平台").Page("创富电子业务开发平台_2").Frame("FunctionTree").Link("我的工作台").Click
Browser("创富电子业务开发平台").Page("创富电子业务开发平台_2").Frame("FunctionTree").Link("在办工作").Click
Browser("创富电子业务开发平台").Page("创富电子业务开发平台_2").Frame("PlugInRunService_6").Link("编辑").Click
Browser("创富电子业务开发平台").Page("创富电子业务开发平台_2").Frame("PlugInRunService_3").WebEdit("ctl05$ctl08$ProspectPerson").Set DataTable("勘察人", dtLocalSheet)
cout=DataTable.GetSheet("现场勘察").GetCurrentRow
If cout=2 Then
Browser("创富电子业务开发平台").Page("创富电子业务开发平台_2").Frame("PlugInRunService_3").Image("ctl05$SaveDataButton").Click 33,10
Browser("创富电子业务开发平台").Page("创富电子业务开发平台_2").Frame("PlugInRunService_4").Image("ctl05$TransmitDataButton").Click 38,11
Browser("创富电子业务开发平台_2").Page("创富电子业务开发平台").Frame("PlugInRunService").WebCheckBox("ctl05$UsersList$ctl03$CheckBox").Set "ON"
Browser("创富电子业务开发平台_2").Page("创富电子业务开发平台").Frame("PlugInRunService").Image("ctl05$ConfirmTransmit").Click 23,13
Browser("创富电子业务开发平台").Page("创富电子业务开发平台_2").Frame("PlugInRunService_4").Link("编辑").Click
End If
RowCount=DataTable.GetSheet("现场勘察").SetNextRow
Next
[ 本帖最后由 mizhe521 于 2010-1-20 14:20 编辑 ] |
|