Once we get the Test Result from QTP.,I Have to convert
into Excel file format..Is it possible..Can any gudie me
regarding this...
For Example :
Total Test Case is : XXXXX
Test Case passed : XXX
Test Case Failed : XXX
--------
Total XXXXXX
---------
Answer Posted / hari
If u use this script the results are stored in u r excel
sheet in u r result column.
If browser("Yahoo").page("Yahoopage").webbutton("Login")
Exist Then
datatable.value("result",3)="Pass"
browser("Yahoo").page("Yahoopage").webbutton("Login").click
elese
datatable.value("result",3)="Fail"
End If
| Is This Answer Correct ? | 0 Yes | 5 No |
Post New Answer View All Answers
If u r using library files (Instead of Check Points) , How do u do bitmap check ?
What are the properties you would use for identifying a browser and page when using descriptive programming?
how to evalute defects in QTP script?
On the website, the protocol has been changed https: to https what you will do? Tell me your approach?
is there any addin for remedy user application
What are the trigger events in qtp?
How to test background color and dynamic images during run time can you put the check point for moving objects?
can u explain relative path architecture framework in qtp?
Explain Descriptive Programming Types with Examples?
Please provide specific examples of advanced/creative usage of QTP, including how impact & benefits for your project
What ate the Technologies supported by QTP?
1.Qtp suppots Unix& linx or not 2why qtp suppots shell script.
How many types of recording facility are available in quicktest professional (qtp)?
Where you are storing your script?
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