11-25-2011, 09:56 PM
Hi Ankesh,
Now am not getting the error however loops are not working now also
i updated the code to
Loops are not working .
Thanks,
Saisu.
Now am not getting the error however loops are not working now also
i updated the code to
Code:
strResultMsg= Browser("Browser").Page("Page").Object.body.innertext
Loops are not working .
Code:
intFlag = 0
Do
Browser("Browser").Page("Page").Frame("toolbar").Link("Customer Search").Click
GEOVoIPnumber=mysheet.cells(i,8).value
Browser("Browser").Page("Page").Frame("workarea").WebEdit("v_value").Set GEOVoIPnumber
Browser("Browser").Page("Page").Frame("workarea").WebButton("Search").Click
strResultMsg= Browser("Browser").Page("Page").Object.body.innertext
'chk for the message
If Instr(strResultMsg,"0 records returned")>0 Then
msgbox"Please procced to build"
Exit Do ' Exit the loop
intFlag =1
End If
Loop Until intFlag =1---------- Not working.
Thanks,
Saisu.