Interested to Buy Any Domain ? << Click Here >> for more details...
write script to open Gmail.com, and to write script for
entering username and password and show whether the result
as pass or fail
- 2 Answers
- 15881 Views
- Thomson Reuters, I also Faced
- E-Mail Answers
Answers were Sorted based on User's Feedback
'---------------------------------------------opening gmail
login page------------------------------------------------
systemutil.Run "iexplore.exe","www.gmail.com",,,3
wait(20)
If Browser("name:=Gmail: Email from
Google").Page("title:=Gmail: Email from
Google").WebEdit("name:=Email","html id:=Email").exist Then
Reporter.ReportEvent micPass,"Login page","Gmail Login
Page Succesfully Opened"
Browser("name:=Gmail: Email from
Google").Page("title:=Gmail: Email from
Google").WebEdit("name:=Email","html id:=Email").set
"balagisrinu.reddy"
Browser("name:=Gmail: Email from
Google").Page("title:=Gmail: Email from
Google").WebEdit("name:=Passwd","html id:=Passwd").set
"00000000"
Browser("name:=Gmail: Email from
Google").Page("title:=Gmail: Email from
Google").WebButton("name:=Sign in","html id:=signIn").Submit
else
Reporter.ReportEvent micFail,"Login page","Gmail Login Page
Not Opened Succesfully "
ExitTestIteration
End If
'--------------------------------------------------------------------------------------------------------------------------------------------
'------------------------------------------------validating
the my mail id opened--------------------------------------
'Browser("name:=Gmail - Inbox").Page("title:=Gmail -
Inbox").Link("text:=Compose Mail","name:=Compose
Mail").highlight
wait(20)
If Browser("name:=Gmail - Inbox").Page("title:=Gmail -
Inbox").Link("text:=Compose Mail","name:=Compose
Mail").exist Then
Reporter.ReportEvent micPass,"Sign in","login is successfully"
else
Reporter.ReportEvent micPass,"Sign in","login is Not
successfull"
ExitTestIteration
End If
'-----------------------------------------------------------------------------------------------------------------------------------------------------
| Is This Answer Correct ? | 8 Yes | 1 No |
Answer / b.v.raghavendra babu
systemutil.Run "iexplore.exe" , "http://www.gmail.com"
browser("name:=Gmail").page("title:=Gmail").Sync
browser("name:=Gmail").page("title:=Gmail").webedit("name:=Email").Set "raghavendrababu"
browser("name:=Gmail").page("title:=Gmail").webedit("name:=Passwd").Setsecure "52b8097da3e1d1b557575738826"
browser("name:=Gmail").page("title:=Gmail").webbutton("name:=Sign in").Click
browser("name:=Gmail - Inbox").page("title:=Gmail - Inbox").Sync
browser("name:=Gmail - Inbox").page("title:=Gmail - Inbox").Link("name:=Compose Mail","x:=18","y:=155").Click
| Is This Answer Correct ? | 0 Yes | 1 No |
Is vbscript a case-sensitive or case-insensitive?
i need to sort the data using qtp script for this how i need to write a qtp script
about vb scripting programs this type of all question& answers
write a vb script to add two 2*2 matrix
How to insert snapshot during manual scripting in QTP?
int a=4857 i need output as 7584.without using any inbuild function?
How will you release the memory acquired by an array variable in vbscript?
How to create MSAcess table foriegn key
write a vb script to display ***** ***** ***** ***** *****
generic function for webedit box for web application
How can I write HTML text to the window in VB Script?
My questions is while writting descriptve programming, lets take flight reservation. Line1: systemutil.Run "D:\Program Files\Mercury Interactive\QuickTestProfessional\samples\flight\app\flight4 a.exe" dialog("text:=Login").WinEdit("attached text:=Agent Name:").Set "mercury" dialog("text:=Login").WinEdit("attached text:=Password:").Set "mercury" dialog("text:=Login").WinButton("text:=OK").click window("text:=Flight Reservation").Activate window("text:=Flight Reservation").ActiveX ("acx_name:=MaskEdBox").Type "111111" window("text:=Flight Reservation").WinComboBox("attached text:=Fly From:").Select "Frankfurt" window("text:=Flight Reservation").WinComboBox("attached text:=Fly To:").Select "London" window("text:=Flight Reservation").WinButton ("text:=FLIGHT").Click window("text:=Flight Reservation").dialog("text:=Flights Table").WinList("text:=From").Select "13536 FRA 08.00AM LON 08.45AM SR $163.00" window("text:=Flight Reservation").dialog("text:=Flights Table").WinButton("text:=OK").Click window("text:=Flight Reservation").WinEdit("attached text:=Name:").Exist window("text:=Flight Reservation").WinEdit("attached text:=Name:").Set "sagar", Now i m getting the error in the last line. it is not accepting the WinEdit("attached text:=Name:") Please do solve this urgent...! and i want to know how to insert additional properties for an object and which properties we need to select from the object spy.
ASP 
