|
我的原始目标是,界面A,点解了打印按钮,跳出了打印B ,注意B 是browser,不是dialog
我的代码如下
If Browser("title:=.*").Exist(0) Then
Dim tmpBtn,tmpDialog
Set tmpBtn = Browser("公共对象").Page("登录页面").Image("签出")
If tmpBtn.GetROProperty("width") > 30 Then ''签出按钮不显示
tmpBtn.Click
'Wait(1)
If Browser("受理免填单打印").Exist(1) Then
'Browser("受理免填单打印").Page("受理免填单打印").Sync
Browser("受理免填单打印").Close
'Browser("受理免填单打印").close
End If
Set tmpDialog = Browser("公共对象").Window("提示")
If tmpDialog.Exist(2) Then
If InStr(tmpDialog.Page("提示").WebElement("html tag:=LI","index:=0").GetROProperty("innertext"),"确认要签出吗") > 0 Then
tmpDialog.Page("提示").WebButton("确定").Click
Else
Call LogReport(micPass,"点击【受理打印/签出】","","")
Call AMT_DoneDialogInfo(2)
End If
Else
Call LogReport(micPass,"点击【受理打印/签出】","","")
'Call AMT_DoneDialogInfo(2)
End If
End If
目前是调试的过程中,可以正常关闭B,但是没有调试的时候,A和B都关闭了
什么原因???
高手指教 |
|