hi..plz chek the actual number of link first..
Set LnkCounters=Browser("Google").Page("Google").*ChildObjects(oDesc)* '
collection
NumLinks=LnkCounters.*Count
msgbox NumLinks
Thanks
Bibek
*
On Sat, Sep 5, 2009 at 1:33 PM, phaneendra theerdhala <[email protected]
> wrote:
> hi joshi,
>
> In google home page there 29 links.
> you can see them by clicking on more link, which looks like dropdown box.
>
> regards
> Phani.
>
>
> On 30/08/2009, kosharny ludmila <[email protected]> wrote:
>>
>> Hi Joshi,
>> I don't understand your idea, but try this:
>> (there are 29 links on the page)
>>
>> Browser("Google").Page("Google").Sync
>>
>> Set oDesc = Description.Create()
>> oDesc("micclass").Value = "Link"
>> oDesc("html tag").Value = "A"
>>
>> Set LnkCounters=Browser("Google").Page("Google").*ChildObjects(oDesc)* '
>> collection
>> NumLinks=LnkCounters.*Count
>> *If NumLinks = 16 Then
>> Reporter.ReportEvent micPassl, "Number of links", "User defined
>> step passed"
>> else
>> Reporter.ReportEvent micFail, "Number of links is: "& NumLinks , "User
>> defined step is NOT passed"
>>
>> End If
>>
>>
>> Ludmila.
>>
>>
>>
>>
>> ------------------------------
>> Date: Fri, 28 Aug 2009 17:28:21 -0700
>> Subject: Re: Error in code
>> From: [email protected]
>> To: [email protected]
>>
>> Hi Again,
>>
>> One mistake is that it should be :
>> If NumLinks=16 and not == 16.
>> I corrected this.
>> But it still says Expected End of Statement for line 5, i.e the
>> ReportEvent line.
>> Please help.
>>
>> Thanks,
>> Joshi
>>
>>
>> On Fri, Aug 28, 2009 at 5:25 PM, RRJoshi Joshi <[email protected]>wrote:
>>
>> Hi,
>> I am trying a simple scenario where in I want to count the number of links
>> on Google webpage.
>> If the no.of links equals 16 then I want the Result as Pass in QTP Test
>> Results, for this I am using ReportEvent.
>> However, there is some mistake in my code.
>> Could anyone please help resolve these?
>>
>> Browser("Google").Page("Page_Google").Sync
>> Set LnkCounter=Browser("Google").Page("Page_Google").Object.links
>> NumLinks=LnkCounter.length
>> If NumLinks==16 Then
>> Reporter.Report Event micPass, "No.of Links", "the user defined step
>> passed."
>> End If
>>
>> Thanks in advance!
>>
>> -RRJoshi
>>
>>
>> >>
>>
--
Regards,
Bibek
Hey! Catch me on:
http://khateee.blogspot.com/
--~--~---------~--~----~------------~-------~--~----~
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 [email protected]
To unsubscribe from this group, send email to
[email protected]
For more options, visit this group at
http://groups.google.com/group/MercuryQTP?hl=en
-~----------~----~----~----~------~----~------~--~---
