Sync points

[Shridevi.Salagare]

You can use this code to avoid the script getting in the infinite loop in case the page is not displayed.

Code:

Function Page_exist
   intcount=0
Do     
    strStatus =Browser("title : = ").Object.StatusText
    intcount = intcount +1
    If intcount = 100 Then
        Exit Function
    End If
    If instr(strStatus ,"Done")> 0 Then
        Exit function
    End If
    wait 1
Loop While instr(strStatus,"Done") < 1
End Function