I have thousands of links are there, i want check each and
every funtionality of link by using descriptive programme,
retrive link name from excelsheet then operate in
application. Please anybody send me model script
Answer / tvsramakrishnachowdary
Soppose i Have excel file in the "D:\links.xls" which
contain all link names in the "Sheet1" with column
name "Link_Name".Let us assume Here link names i gathered
from Gmail Login Page ok....now my approach is as below..
pre req setting in the QTP:
1)Goto File
2)setting->run tab
3)check run one iteration only
datatable.import "D:\links.xls"
set mylink=description.create
mylink("mic class").value="Link"
mylink("html tag").value="A"
linkcoll=browser("name:=Gmail.*).page
("title:=Gmail.*).childobjects(mylink)
cnt=linkcoll.count
for i=1 to datatble.getrowcount
datatable.setcurrentrow(i)
explink=datatable.value("Link_Name",1)
msgbox explink
for j=1 to cnt-1
actlink=linkcoll(i).getroproperty("name")
if explink=actlink then
linkcoll(i).click
if (browser("name:=Gmail").page(<here new page
title>).exist then
msgbox "Link Pass"
else
msgbox "Link Fail"
End IF
End IF
Next
Next
| Is This Answer Correct ? | 0 Yes | 0 No |
Difference between copy to action and call to action?
How many lines of code in each script of QTP?
What is difference between WR and QTP?
What is the Diff between Image check-point and Bit map Check point?
How can i Save the snapshots in a specified folders using Scripting in QTP?
While spliting an action in QTP 10.0 getting an error : "This Line is a part of Script Block.You cannot split the action on this line." how to re-solve this and split the script into actions?
Is it possible to check the Run time value property of a field through a Database Checkpoint ? Further, is it possible to localize and mention a particular cell , in the database dynamically. My requirement is that I would need to check the status of a particular field , that would change from an "Active" state to a "Stopped" state dynamically.
we have one text box and one list box(list box appear in same page or another page) what ever the text enter in text box that must be displyed in list box as first one. for example if we enter 10 in text box that is the 1st item in list box . after that we enter 11 then 11 is the 1st item and 10 is 2nd item. the maximum limit of list box is 10 items. if we enter 11th item the 10th item is deleted and llth one is add as 1st one and 9th one goes to 10th position
Dim ExcelSheet Set ExcelSheet = CreateObject("Excel.Application") excelsheet.application.visible = true ExcelSheet.ActiveSheet.Cells(1,1).Value = "This is column A, row 1" ' Save the sheet. ExcelSheet.SaveAs "C:\DOCS\TEST.XLS" ' Close Excel with the Quit method on the Application object. ExcelSheet.Application.Quit after run this script i am getting error"The test cannot continue due to unrecoverable error"
How to get popup error message.
can anyone tell me what to say in interview when interviewer asks about "tell me about your framework in your project"?
How to capture a window in QTP?