Hi can anyone pls suggest how to fetch username(system
login name)and system name in to qtp.I am not using TD or
QC.Thx
Answer Posted / siva reddy (us)
var=dialog("Login").winedit("username").getvissibletext
| Is This Answer Correct ? | 0 Yes | 0 No |
Post New Answer View All Answers
can u explain the keyword driven framework with an example clearly how to create all the files and how to attach to main test.
What are the different types of recovery operation?
How to find the name of the machine where you are running your automation scripts in qtp?
What is an object repository?
What is checkpoint in qtp?
How to export quicktest professional (qtp) results to an .xls file?
How to capture dynamic values in load runner and how Each of the captured values are to be written to a text file (c:\temp\LoadRunner1.txt)
what is impact analysis on regression testing?
How to Upgrade or support firefox 2.0 version on QTP 9.0? I have installed QTP 9.0 and installed firefox 2.0. But in REcord and Run Settings, it shows firefox 1.5 in Web tab for browser selection.
How to find a window is minimized or not
i am looking job in perfomance testing using Loadrunner any one help me a project plz......?(Chandana) chs_29@rediffmail.com
how to idetfy which test cases are automated?who will deside that plz tell me
How can i check items sorted or not in a weblist ? Give me the script for this...
What is the Difference between test object and run time object?
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