Hi Friend,

Just see this code which i use for Links using descriptive Programming.

Take an example of Google with links as QTP:-


Set lnk = Description.Create()
lnk("micclass").value = "Link"


Set lnk_col = Browser().Page().ChildObjects(lnk)
''Above code will return a collection of objects of class "
"Link"

'''Once U got the collection take a count in present page

lnk_cnt = lnk_col.count
msgbox lnk_cnt

''Now Take extract a property like below

For i = 0 to lnk_cnt - 1

lnk_prop = lnk_col(i).GetROProperty("innertext")

msgbox lnk_prop

Next

'''Now ur task to extract link randomly

I hope this is the answer ur where asking if u want to go to next page then
set Flag  with IF Else Condition
this is solution ,but i suggest u to go to google group and find solutions
since u have asked for the first time so i have given u solution.



Sorry for giving code moderator and sridhar and i hope u will execuse me.

Regards
Naveen Shrivastava


==================================




On Sun, Aug 29, 2010 at 4:50 PM, kiran kumar <kiransw...@gmail.com> wrote:

> hey,
>
> take sample website, use Descriptive Programming technique.
>
> Thanks,
> Kiran Edupuganti
>
> On Fri, Aug 27, 2010 at 9:23 PM, Shan <sboll...@gmail.com> wrote:
>
>> There is a website, i want to check whether or not each link is
>> working. I want to do this recursively meaning...
>>
>>
>> Goto the main page
>> Num of links = Get all links
>> for i = 0 to Num of links
>>
>>    click on link i and then check to see that there
>>    is no 404 not found error
>>    if there is no 404 error
>>          get all the link in this page and
>>          do the same
>>  end
>>
>>
>> How to do this?>
>>
>> --
>> You received this message because you are subscribed to the Google
>> "QTP - HP Quick Test Professional - Automated Software Testing"
>> group.
>> To post to this group, send email to MercuryQTP@googlegroups.com
>> To unsubscribe from this group, send email to
>> mercuryqtp+unsubscr...@googlegroups.com<mercuryqtp%2bunsubscr...@googlegroups.com>
>> For more options, visit this group at
>> http://groups.google.com/group/MercuryQTP?hl=en
>
>
>
>
> --
> Kiran Edupuganti
> M.no: 9866424362
>
>  --
> You received this message because you are subscribed to the Google
> "QTP - HP Quick Test Professional - Automated Software Testing"
> group.
> To post to this group, send email to MercuryQTP@googlegroups.com
> To unsubscribe from this group, send email to
> mercuryqtp+unsubscr...@googlegroups.com<mercuryqtp%2bunsubscr...@googlegroups.com>
> For more options, visit this group at
> http://groups.google.com/group/MercuryQTP?hl=en
>

-- 
You received this message because you are subscribed to the Google
"QTP - HP Quick Test Professional - Automated Software Testing"
group.
To post to this group, send email to MercuryQTP@googlegroups.com
To unsubscribe from this group, send email to
mercuryqtp+unsubscr...@googlegroups.com
For more options, visit this group at
http://groups.google.com/group/MercuryQTP?hl=en

Reply via email to