How to find the number the number of Links, Brolken Links
in a webpage?
Answer Posted / rayudu
By using childobject method
Set linkDescObj=description.Create()
linkDescObj("micclass").value="Link"
Set Links=browser("Gmail: Email from Google").Page("Gmail -
Inbox -srikrishna").ChildObjects(linkDescObj)
NoOfLinks=Links.count()
msgbox NoOfLinks
For i=0 to NoOfLinks-1
linkName=Links(i).getROProperty("name")
msgbox linkName
Next
| Is This Answer Correct ? | 3 Yes | 0 No |
Post New Answer View All Answers
WHAT IS THE DIFFERENCE BETWEEN QTP SCRIPT AND VB SCRIPT? HOW MUCH PERCENTAGE WE USE IN QTP SCRIPT REAL TIME AND HOW MUCH PERCEN OF VB SCRIPT,,,,,,,
hou can we use vb script in qtp could u tell me breafly
Key word driven framework
how can you do retesting (datadriven test) using notepad amd by using functions NOTE u should not use datatable methods
Can you write a script to check if the folder exists or not?
What is the use of Debug Viewer?
What is a checkpoint? How many check points are there in qtp?
what is supply chain management?
Hi All, How to Compare two strings character by character in QTP
how to find that tools work well with your existing system?
How many types of recording facility are available in quicktest professional?
How can we retrieve the Bug Ids which are open&Reopen in status through QTP scrit?Please find the script which i tried... Dim objBugFactory, objBug Dim BugId Set TDConnection = QCUtil.TDConnection Set objBug = TDConnection.BugFactory If QCUtil.IsConnected then Reporter.ReportEvent 0, "Connected", "Connected to server: " + QCUtil.TDConnection.ServerName + chr (13) +"Project: " + QCUtil.TDConnection.ProjectName + chr (13) + "Domain: " + QCUtil.TDConnection.DomainName Reporter.ReportEvent 0, "Current time on server is","==>" & TDConnection.ServerTime Else Reporter.ReportEvent 1, "Not connected", "Not connected to Quality Center" End If If mybug.Status="Open" Then BugId=mybug.DefectId MsgBox BugId End If 'OR**********************************--------------------- -----********************************** If Bug_Fields("BG_STATUS").Value ="Open" Or "Re Open"Then BugId=Bug_Fields("BG_BUG_ID").Value MsgBox BugId End If
Why qtp always start action1 and does not start action?
How can I use Call dlls in QTP ?
what type of automation is follwed in the project?