SDET- QA Automation Techie

Software Testing Blog

  • Home
  • Training
    • Online
    • Self-Paced
  • Video Tutorials
  • Interview Skills
    • HR Interview Questions Videos
    • Domain Knowledge
  • Career Guidance
  • Home
  • Software Testing
    • Manual Testing Tutorials
    • Manual Testing Project
    • Manaul Testing FAQS
    • ISTQB
    • AGILE
  • Web Automation Testing
    • Java Programmng
    • Python Programmng
    • Selenium with Java
    • Selenium with Python
    • Robot Framework(Selenium with Python)
    • selenium with Cucumber
    • TestNG+IntelliJ
    • Mobile App Testing(Appium)
    • JMeter
  • API Automation Testing
    • Rest Assured API Testing (BDD)
    • Rest Assured API Testing (Java+ TestNG)
    • Robot Framework(Rest API Testing with Python)
    • Postman
    • SoapUI
    • API Testing(FAQ's)
  • SDET|DevOps
    • Continuos Integration
    • SDET Essentials
    • AWS For Testers
    • Docker
  • SQL
    • Oracle(SQL)
    • MySQL for Testers
    • NoSQL
  • Unix/Linux
    • UNIX TUTORIALS
    • Linux Shell Scripting
  • ETL Testing
    • ETL Data warehouse Tutorial
    • ETL Concepts Tools and Templates
    • ETL Testing FAQ's
    • ETL Testing Videos
  • Big Data Hadoop
  • Video Tutorials
  • ApachePOI Video Tutorials
  • Downloads
    • E-Books for Professionals
    • Resumes
  • Automation Essencials
    • Cloud Technologies
      • Docker For Testers
      • AWS For Testers
      • Sub Child Category 3
    • Java Collections
    • Selenium Locators
    • Frequently Asked Java Programs
    • Frequently Asked Python Programs
    • Protractor
    • Cypress Web Automation

VB Script User Defined Functions

 Descriptive Programming, QTP, UFT, vb scripting   

i) Launching Application


Navigation:

a) Launch the Browser

b) Enter / Select the URL (“www.jjperfumes.com”)

Verification: Capture the Browser Name and Verify

—————

Function Launch_App()

SystemUtil.Run “C:\Program Files\Internet Explorer\IEXPLORE.EXE”,”",”C:\Documents and Settings\Administrator”,”open”

Browser(“Google”).Page(“Google”).Sync

Browser(“Google”).Navigate “http://www.jjperfumes.com/”

Wait (8)

Browser_Name = Browser(“Google”).GetROProperty(“title”)

If Browser_Name=”JJ Perfumes-Discount perfume cheap brand name perfumes, fragrance & cologne online” Then

Launch_App=”Jjperumes.com Browser Launched Sucessfully”

Msgbox Launch_App

Else

Launch_App=”Jjperumes.com Browser Not Launched”

Msgbox Launch_App

End If

End Function



——————————————————————————————–

ii) Customer Registration

Pre-Setup: Launching Application

Navigation:

a) Select Registration Link in jjperfumes.com homepage

b) Enter all Mandatory details

c) Select Submit button

Verify: Capture confirmation Message and Verify

Function Register(Email)

Browser(“JJ Perfumes-Discount perfume”).Page(“JJ Perfumes-Discount perfume”).Link(“Register”).Click

Browser(“JJ Perfumes-Discount perfume”).Page(“JJ Perfumes-Discount perfume_2″).WebList(“usertype”).Select “Retailer”

Browser(“JJ Perfumes-Discount perfume”).Page(“JJ Perfumes-Discount perfume_2″).WebEdit(“firstname”).Set “dfgdg”

Browser(“JJ Perfumes-Discount perfume”).Page(“JJ Perfumes-Discount perfume_2″).WebEdit(“lastname”).Set “dgdfgdfg”

Browser(“JJ Perfumes-Discount perfume”).Page(“JJ Perfumes-Discount perfume_2″).WebList(“gender”).Select “Male”

Browser(“JJ Perfumes-Discount perfume”).Page(“JJ Perfumes-Discount perfume_2″).WebEdit(“address1″).Set “dfgfdgf”

Browser(“JJ Perfumes-Discount perfume”).Page(“JJ Perfumes-Discount perfume_2″).WebEdit(“phone”).Set “9222222223″

Browser(“JJ Perfumes-Discount perfume”).Page(“JJ Perfumes-Discount perfume_2″).WebEdit(“email”).Set Email

Browser(“JJ Perfumes-Discount perfume”).Page(“JJ Perfumes-Discount perfume_2″).WebEdit(“city”).Set “chennai”

Browser(“JJ Perfumes-Discount perfume”).Page(“JJ Perfumes-Discount perfume_2″).WebList(“state”).Select “MS – MISSISSIPPI”

Browser(“JJ Perfumes-Discount perfume”).Page(“JJ Perfumes-Discount perfume_2″).WebEdit(“zip”).Set “23456″

Browser(“JJ Perfumes-Discount perfume”).Page(“JJ Perfumes-Discount perfume_2″).WebEdit(“password”).SetSecure “3c30bbc7daa0dccb83c2941bb87fa0709d34″

Browser(“JJ Perfumes-Discount perfume”).Page(“JJ Perfumes-Discount perfume_2″).WebEdit(“conPass”).SetSecure “3c30bbcdb1f7a32d27a56f70a60f7d1e4159″

Browser(“JJ Perfumes-Discount perfume”).Page(“JJ Perfumes-Discount perfume_2″).WebButton(“Submit”).Click

Wait (5)

Confirm_Message = Browser(“JJ Perfumes-Discount perfume”).Page(“JJ Perfumes-Discount perfume_3″).WebElement(“Registered successfully.”).GetROProperty(“innertext”)

If Confirm_Message=”Registered successfully. “Then

Register=”Customer Registration Sucessful”

Msgbox Register

Else

Register=”Registration Failed”

Msgbox Register

End If

End Function

——————-

Function Register(Email)

Set myBrowser=Browser(“JJ Perfumes-Discount perfume”).Page(“JJ Perfumes-Discount perfume_2″)

Browser(“JJ Perfumes-Discount perfume”).Page(“JJ Perfumes-Discount perfume”).Link(“Register”).Click

myBrowser.WebList(“usertype”).Select “Retailer”

myBrowser.WebEdit(“firstname”).Set “dfgdg”

myBrowser.WebEdit(“lastname”).Set “dgdfgdfg”

myBrowser.WebList(“gender”).Select “Male”

myBrowser.WebEdit(“address1″).Set “dfgfdgf”

myBrowser.WebEdit(“phone”).Set “9222222223″

myBrowser.WebEdit(“email”).Set Email

myBrowser.WebEdit(“city”).Set “chennai”

myBrowser.WebList(“state”).Select “MS – MISSISSIPPI”

myBrowser.WebEdit(“zip”).Set “23456″

myBrowser.WebEdit(“password”).SetSecure “3c30bbc7daa0dccb83c2941bb87fa0709d34″

myBrowser.WebEdit(“conPass”).SetSecure “3c30bbcdb1f7a32d27a56f70a60f7d1e4159″

myBrowser.WebButton(“Submit”).Click

Wait (5)

Confirm_Message = Browser(“JJ Perfumes-Discount perfume”).Page(“JJ Perfumes-Discount perfume_3″).WebElement(“Registered successfully.”).GetROProperty(“innertext”)

If Confirm_Message=”Registered successfully. “Then

Register=”Customer Registration Sucessful”

Msgbox Register

Else

Register=”Registration Failed”

Msgbox Register

End If

End Function

iii) Login Operation

Pre-Requisites:

a) Launching Application

b) Customer Registration

Navigation:

a) Select “Login” Link in jjperfumes.com homepage

b) Enter Email and Password

c) Select “Login Button”



Verify: Check existence of LogOut Link

—————–

Function Login(Email, Pwd)

Browser(“JJ Perfumes-Discount perfume”).Page(“JJ Perfumes-Discount perfume”).Link(“Login”).Click

Browser(“JJ Perfumes-Discount perfume”).Page(“JJ Perfumes-Discount perfume_2″).WebEdit(“username”).Set Email

Browser(“JJ Perfumes-Discount perfume”).Page(“JJ Perfumes-Discount perfume_2″).WebEdit(“password”).Set Pwd

Browser(“JJ Perfumes-Discount perfume”).Page(“JJ Perfumes-Discount perfume_2″).WebButton(“Login”).Click

If Browser(“JJ Perfumes-Discount perfume”).Page(“JJ Perfumes-Discount perfume_3″).Link(“Logout”).Exist(10) Then

Login=”Login Operation Sucessful”

Msgbox Login

Else

Login=”Login Failed”

Msgbox Login

End If

End Function

iv) Closing Application

————————

Navigation:

————

a) Check the Existence of jjperfumes.com Browser

b) Close the Browser window (If exists)

—————–

Function Launch_App()

SystemUtil.Run “C:\Program Files\Internet Explorer\IEXPLORE.EXE”,”",”C:\Documents and Settings\Administrator”,”open”

Browser(“Google”).Page(“Google”).Sync

Browser(“Google”).Navigate “http://www.jjperfumes.com/”

Wait (8)

Browser_Name = Browser(“Google”).GetROProperty(“title”)

If Browser_Name=”JJ Perfumes-Discount perfume cheap brand name perfumes, fragrance & cologne online” Then

Launch_App=”Jjperumes.com Browser Launched Sucessfully”

Msgbox Launch_App

Else

Launch_App=”Jjperumes.com Browser Not Launched”

Msgbox Launch_App

End If

End Function

**********************************************************

v) Login Operation In Flight Reservation Application

Function Login (Agent, Password)

SystemUtil.Run “C:\Program Files\HP\QuickTest Professional\samples\flight\app\flight4a.exe”,”",”C:\Program Files\HP\QuickTest Professional\samples\flight\app\”,”open”

Dialog(“Login”).Activate

Dialog(“Login”).WinEdit(“Agent Name:”).Set Agent

Dialog(“Login”).WinEdit(“Password:”).Set Password

wait 2

Dialog(“Login”).WinButton(“OK”).Click

If Window(“Flight Reservation”).Exist(12) Then

Window(“Flight Reservation”).Close

Login=”Login Operation Sucessful”

Msgbox Login

Else

SystemUtil.CloseDescendentProcesses

‘If Dialog(“Login”).Dialog(“Flight Reservations”).Exist(2) Then

‘Dialog(“Login”).Dialog(“Flight Reservations”).WinButton(“OK”).Click

‘Dialog(“Login”).WinButton(“Cancel”).Click

‘End if

Login=”Login Failed”

Msgbox Login

End if

End Function

———————————

vi) Open Order In Flight Reservation Application

Function Open_Order(Order_Number)

Window(“Flight Reservation”).Activate

Window(“Flight Reservation”).WinButton(“Button”).Click

Window(“Flight Reservation”).Dialog(“Open Order”).WinCheckBox(“Order No.”).Set “ON”

Window(“Flight Reservation”).Dialog(“Open Order”).WinEdit(“Edit”).Set Order_Number

Window(“Flight Reservation”).Dialog(“Open Order”).WinButton(“OK”).Click

OrdNum = Window(“Flight Reservation”).WinEdit(“Order No:”).GetVisibleText()

OrdNum=CInt(OrdNum)

If OrdNum=Order_Number Then

Open_Order= Order_Number& ” Opened sucessfully”

Msgbox Open_Order

Else

Open_Order= Order_Number& ” Not Opened”

Msgbox Open_Order

End If

End Function

——————————————

vii) Update Order In Flight Reservation Application

Function Update_Order(Tickets)

Window(“Flight Reservation”).Activate

Window(“Flight Reservation”).WinButton(“Button”).Click

Window(“Flight Reservation”).Dialog(“Open Order”).WinCheckBox(“Order No.”).Set “ON”

Window(“Flight Reservation”).Dialog(“Open Order”).WinEdit(“Edit”).Set “2″

Window(“Flight Reservation”).Dialog(“Open Order”).WinButton(“OK”).Click

Window(“Flight Reservation”).WinEdit(“Tickets:”).Set Tickets

Window(“Flight Reservation”).WinButton(“Update Order”).Click

Wait (10)

Message = Window(“Flight Reservation”).ActiveX(“Threed Panel Control”).GetROProperty(“text”)

If Message=”Update Done…” Then

Update_Order=”Order Updated Sucessfully”

Msgbox Update_Order

Else

Update_Order=”Order Not Updated”

Msgbox Update_Order

End If

End Function

—————————————–

viii) ‘Write Function to Count how many Browsers opened on desktop and close them all

Function Close_Browsers()

Dim oBrowser, Browsers, TotBrowsers, i

Set oBrowser=Description.Create

oBrowser(“micclass”).Value=”Browser”

Set Browsers=Desktop.ChildObjects(oBrowser)

TotBrowsers=Browsers.Count

Msgbox TotBrowsers

For i= 0 to TotBrowsers-1 Step 1

Browsers(i).close

Next

End Function

—————————

ix) ‘Write Function to Count how many Buttons available in FR Window

Function Count_Buttons()

Dim oButton, Buttons, TotButtons, i

Set oButton=Description.Create

oButton(“Class Name”).Value=”WinButton”

Set Buttons=Window(“text:=Flight Reservation”).ChildObjects(oButton)

TotButtons=Buttons.Count

Msgbox TotButtons

End Function

Call Count_Buttons()

—————————–

x) ‘Write Function to Count how many Objects available in FR Window by specified Test Object class

Function Count_Objects(Object)

Dim obj, Objects, TotObjects, i

Set obj=Description.Create

obj(“Class Name”).Value=Object

Set Objects=Window(“text:=Flight Reservation”).ChildObjects(obj)

TotObjects=Objects.Count

Msgbox TotObjects

End Function

Call Count_Objects(“WinRadioButton”)

Call Count_Objects(“WinButton”)

Call Count_Objects(“WinEdit”)

Call Count_Objects(“WinComboBox”)

——————————–

xi) ‘Write function to capture all button names one by one from Login Dialog Box

Function Capture_Buttons()

Dim oButton, Buttons, TotButtons, i, myButton

Set oButton=Description.Create

oButton(“Class Name”).Value=”WinButton”

Set Buttons=Dialog(“text:=Login”).ChildObjects(oButton)

TotButtons=Buttons.Count

For i= 0 to TotButtons-1

myButton=Buttons(i).GetRoProperty(“text”)

Msgbox myButton

Next

End Function

Call Capture_Buttons()

——————————————

xii) ‘Write function to Count Howmany Links available in Google Homepage

Function Count_Links()

Dim oLink, Links, TotLinks, i

Set oLink=Description.Create

oLink(“micclass”).Value=”Link”

Set Links=Browser(“title:=Google”).Page(“title:=Google”).ChildObjects(oLink)

TotLinks=Links.Count

Msgbox TotLinks

End Function

Call Count_Links()

 
 
  • Share This:  
  •  Facebook
  •  Twitter
  •  Google+
  •  Stumble
  •  Digg
Email ThisBlogThis!Share to TwitterShare to Facebook
Newer Post Older Post Home
popup

Popular Posts

  • How To Explain Project In Interview Freshers and Experienced
    “ Describe an important project you’ve worked on ” is one of the most common questions you can expect in an interview. The purpose of a...
  • MANUAL TESTING REAL TIME INTERVIEW QUESTIONS & ANSWERS
    1. How will you receive the project requirements? A. The finalized SRS will be placed in a project repository; we will access it fr...
  • API/Webservices Testing using RestAssured (Part 1)
    Rest Assured : Is an API designed for automating REST services/Rest API's Pre-Requisites Java Free videos: https://www.you...

Facebook Page

Pages

  • Home
  • Resumes
  • Job Websites India/UK/US
  • ISTQB
  • Selenium with Java
  • E-Books for Professionals
  • Manual Testing Tutorials
  • Agile Methodology
  • Manual Testing Projects

Live Traffic

YouTube


Blog Visitors

Copyright © SDET- QA Automation Techie | Powered by Blogger
Design by SDET | Blogger Theme by | Distributed By Gooyaabi Templates