SCript??

[rawat.jagat9]

how to check the number of unread emails in gmail using qtp

[Pavan keerthi]

'You need to be logged into the Gmail account

Code:

Browser("title:=Gmail.*").Page("title:=Gmail.*").Link("innertext:=Inbox.*").Click Browser("title:=Gmail.*").Page("title:=Gmail.*").Sync 'To get the innertext of inbox link inboxcount = Browser("title:=Gmail.*").Page("title:=Gmail.*").Link("innertext:=Inbox.*").getroproperty("innertext") If inboxcount = "Inbox" Then Print "No Unread Emails." ExitAction Else emailcount = replace(inboxcount, "Inbox","") 'replaces inbox with space emailcount = Rtrim(ltrim(emailcount)) 'removes all the spaces emailcount = replace(emailcount, "(","") emailcount = replace(emailcount, ")","") Print "You have "&emailcount& " unread emails in your inbox." End If

plz run this Script

[newqtp]

Code:

'Login to gmail Account Browser("opentitle:=Gmail.*").Page("title:=Gmail.*").WebEdit("name:=Email").Set "username" Browser("opentitle:=Gmail.*").Page("title:=Gmail.*").WebEdit("name:=Passwd").Set "password" Browser("opentitle:=Gmail.*").Page("title:=Gmail.*").WebButton("name:=Sign in").Click Browser("opentitle:=Gmail.*").Page("title:=Inbox.*").Link("innertext:=Inbox.*").Click Browser("title:=Gmail.*").Page("title:=Gmail.*").Sync ' Get unread emails count sLink= Browser("opentitle:=Gmail.*").Page("title:=Inbox.*").Link("innertext:=Inbox.*").GetROProperty("innertext") 'msgbox sLink If sLink = "Inbox" Then iEmails = 0 Msgbox "Total Unread Email(s) " & iEmails & " No New email" Exit Action else 'Split unread emails count from Inbox(XX) iEmails = Split(sLink, " ")(1) 'have total number of unread email count as (XX) iEmails = Replace(iEmails, "(", "") ' this statement have partial number as XX) iEmails = Replace(iEmails, ")", "") 'antoher replace ) to blank sapce statement as XX Msgbox "Total Unread Email(s) " & iEmails End If

[Ram2009]

To add to the above script, I am able to login successfully to gmail. But when I tried to click on Inbox I am getting the error.

Browser("name:=Inbox.*", "hwnd:=854422").page("title:=Inbox.*","hwnd:=852998").Link("innertext:=Inbox.*").click

Error is seen as below:

Cannot find the "[ Link ]" object's parent "[ Browser ]" (class Browser). Verify that parent properties match an object currently displayed in your application.

I am using QTP 10 trail version, Windows 7 ultimate OS, IE 8
Plx let me know if you need any other info.