Answer Posted / ashish srivastava

Copy and paste the Below code

dim CountItem

countItem=Browser().Page().Weblist().GetROProperty("Itemcount")

For i = 1 to CountItem
Browser(). Page(). Weblist().Select i
if i >5 then
Browser(). Page(). Weblist().ExtentedSelect i
end If
Next

how did u use automating testing tools in ur job?

1966

---

In an interview, what r the general questions asked in SQL which is realted to testing ?pls give me anwser to this question?

1998

---

How to export quicktest professional (qtp) results to an .xls file?

1175

---

What is the script for database check point, bitmapchek point, regular expression ?

2048

---

what is the difference btn risks & Therads in the Test plan documentation?

2118

---

Whats the realtime QTP testing process

2456

---

What is synchronization? What are the ways you can synchronize?

1156

---

what is vmodel?advantages and disadvantages of vmodel?

2156

---

Brief the process of testing with UFT?

1078

---

suppose in the middle of the project QTP will not work properly, then what do u do? and ur team?

1835

---

How can you send user defined messages to test report?

1046

---

i need qtp tutorial. pls send it to sridhar.k151@g mail.com

2072

---

Explain the concept of object repository?

980

---

when I try to run below script in QTP "totalPages" value is 2. But i am getting error message (Type mismatch: 'totalPages' Line (): "For i=1 to totalPages".) totalPages=Browser("Name:=User").Page("Title:=User").WebElem ent("innertext:=of.*").GetROProperty("InnerText") msgbox totalPages For i=1 to totalPages rnum=Browser("Name:=User").Page("Title:=User").WebTa ble("column names:=User Name;ID;Last Name;First Name").GetRowWithCellText("store4") If rnum>0 Then r=rnum Exit for End If Browser("Name:=User").Page("Title:=User").WebElement ("html tag:=A","x:=471").Click MsgBox "Exit" Next

3934

---

Are Shared ORs read-only?

1063

---