WEB BASED APPLICATION SCRIPTS

For Login ....

browser("XXXX").page("XXXX").webedit("hgshad").set "hdsfajf"

browser("XXXX").page("XXXX").webedit("dsadsagd").set "dlskajdl"

browser("XXXX").page("XXXX").webImage("dasada").click

to count No. Of Links in WebPage..

set objlink = description.create

objlink('html tag").value = "A"

set n = browser("XXXX").page("XXXX").childobjects(objlink)

c = n.count

msgbox c

like this we write script for testing web applications..

 these are the  sample scripts only...

If any queries..

nanda.dreddy@gmail.com

 

systemutil.Run("http://www.rediffmail.com")

set BRO =Description.Create()

BRO("title").Value = "Welcome to Rediff.com India"

BRO("name").value ="Welcome to Rediff.com India"

BRO("openedbytestingtool").value= true

Set PG =Description.Create()

PG("title").value="Welcome to Rediff.com India"

PG("url").value="http://www.rediff.com/index.html"

Set UN =Description.Create()

UN("name").value= "login"

UN("Class Name").value ="WebEdit"

UN("type").value= "text"

UN("html tag").value="INPUT"

Set PWD =Description.Create()

PWD("name").value ="passwd"

PWD("Class Name").value="WebEdit"

PWD("type").value="password"

PWD("html tag").value="INPUT"

Set Login =Description.Create()

Login("name").value ="Go"

Login("Class Name").value="WebButton"

Login("type").value="submit"

Login("html tag").value="INPUT"

Login("value").value="GO"

Login("class").value="rmailgobtn"

temp= Browser("Welcome to Rediff.com").Page("Welcome to 

Rediff.com").WebElement("ShockwaveFlash1").Exist

If temp= true Then

    'Browser("Welcome to Rediff.com").Page("Welcome to 

Rediff.com").WebElement("ShockwaveFlash1").

End If

Browser(BRO).Page(PG).WebEdit(UN).Set "shyam_sad" 

Browser(BRO).Page(PG).WebEdit(PWD).Set "shyam" 

Browser(BRO).Page(PG).WebButton(Login).Click

QTP REAL TIME GUIDE

http://akhilreddytechnologies.blogspot.in/2015/09/qtp-real-time-guide.html