Answer / shyam.meghansh

Example for VB Script

Function fib(n)

Dim fab(70)

fab(0)=0
fab(1)=1

For j=2 to n

fab(j)=fab(j-1)+ fab(j-2)

Next

For i=0 to n-1

msgbox fab(i)
Next

end function


Next Save this function in .vbs file and call the function
in QTP Action

Example for Descriptive Programme

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 "testingwithshyam"
Browser(BRO).Page(PG).WebEdit(PWD).Set "shyamshyam"
Browser(BRO).Page(PG).WebButton(Login).Click





..................... Any More Querys mail to
testingwithshyam@gmail.com

Answer / senthilkumar

Hi
i am senthilkumar now i am working manual tester. i will
test windows application.

how will test application
pls send me small script

How can we count the no of rows are available in a data table ?

9 Answers   Kanbay,

---

How does qtp identify the object in the application?

0 Answers  

---

Suppose i have a script which is having 100 lines.I want to execute that script starting from line no 75.means first qtp should read the script from line no 75 how can u do it.

5 Answers   Lehman Brothers, rsystems,

---

What is Terminal Emulators”? Why we used in QTP.? How he works on QTP.

1 Answers  

---

How can I find out the cursor position through QTP suppose I am keep tabbing(Pressing the tab key continuously) and stoped at a position Now I want to find out where the cursor position is

0 Answers   HP, Livetek,

---

what do you call the window testdirector-testlab?

1 Answers  

---

What is iteration? How it is related to Test Results in QTP

3 Answers   Virinchi Technologies,

---

How to Analyze the Checpoint results by Text/Text Area Checkpoint?

1 Answers  

---

how to write code for to select all the checkboxs in the gmail i wrote code for my question but it didn't works any body suggest what wrong my code my code is Set chkboxDesc=Description.Create() chkboxDesc("type").value="chekbox" Set chboxcollection=Browser("name:=Gmail .*").Page("title:=Gmail .*").ChildObjects(chkboxDesc) For i=0 To chboxcollection.count-1 chboxcollection(i).set "ON" Next i was getting general run time error pls help me i am in learing stage

2 Answers  

---

Whats the realtime QTP testing process

0 Answers   IBM,

---

how we can know qtp has used smart identification machanism during the execution.

3 Answers   IBM,

---

What is descriptive Programming in qtp.

5 Answers  

---