if else语法问题请教
我想对网站后台的通过功能进行自动化,这个开发的规律是,如果该条记录可以操作成功,那么那条记录就被下面那条记录顶下来到别的模块,如果操作失败,则还在原来的位置上,所以我设置了一个if else语句,但是QTP编辑始终通过不了,提示else 和end if部分有问题代码如下:
Browser("服基因后台管理工作平台").Page("服基因后台管理工作平台").WebButton("通过").Click
RowCount=Browser("服基因后台管理工作平台").Page("服基因后台管理工作平台").WebTable("店铺中文名").RowCount '获取表格的行数
For i=1 to RowCount
j=1
check=Browser("服基因后台管理工作平台").Page("服基因后台管理工作平台").WebElement("name").GetROProperty ("attribute/outerText")
caozuo=Browser("服基因后台管理工作平台").Page("服基因后台管理工作平台").WebTable("店铺中文名").GetCellData (j,6)
if check="修改状态成功" Then Set objTable=Browser("服基因后台管理工作平台").Page("服基因后台管理工作平台").WebTable("店铺中文名") '获取WebTable对象
Set mypassbutton=objTable.childItem(j,6,"WebButton",3) '通过ChildItem获取单元格中的”通过”按钮对象
mypassbutton.click'单击“通过”按钮
Else
j=j+1
Set objTable=Browser("服基因后台管理工作平台").Page("服基因后台管理工作平台").WebTable("店铺中文名") '获取WebTable对象
Set mypassbutton=objTable.childItem(j,6,"WebButton",3) '通过ChildItem获取单元格中的”通过”按钮对象
mypassbutton.click'单击“通过”按钮
End If
Next
if xxxxx then 后面换行。。。 If a=b Then
msgbox "ab相等"
ElseIf a=c Then
msgbox "ac相等"
Else
msgbox "a和b或者a和c都不相等"
End If
页:
[1]