Answer / raymond brown

OK so I was thinking I would just record the login part
(username and password) and then log off, but how do I make
this a reuseable action for all the other scripts that were
already created? I want all the other scripts that use this
same userid and password to call this action so how do I do
that?

Answer / srikanth

Create different userids and passwords in Datatable.
then..
Dialog("Login").Winedit("Userid:").set Datatable
("columnname",dtGlobalSheet)
Dialog("Login").Winedit("Password:").set Datatable
("columnname",dtGlobalSheet)
Dialog("Login").WinButton("OK").Click

Answer / ravindra

We write different userids and passwords in Datatable.
then..
Dialog("Login").Winedit("Userid:").set Datatable.value
("userid",dtGlobalSheet)
Dialog("Login").Winedit("Password:").set Datatable.value
("password",dtGlobalSheet)
Dialog("Login").WinButton("OK").Click

Here "Userid" and "Password" are the Column names of the
datatable

Answer / waqar ahmad

Set mySheet=myFile.Worksheets("Sheet1")
Rows_Count=mySheet.usedrange.rows.count


For i= 2 to Rows_Count step 1
SystemUtil.Run "http://qa.ktango.com"
'Browser("Knowledge Tango Login").Page("Knowledge Tango Login").("text:=Login").Activate
Dialog("text:=Login").WinEdit("attached text:=Agent Name:").Set mySheet.Cells(a,"A")
Dialog("text:=Login").WinEdit("attached text:=Password:").Set mySheet.Cells(i,"B")
Wait (2)
Dialog("text:=Login").WinButton("text:=OK").Click
Window("text:=Flight Reservation").Close
Next

Answer / deven

'Data driven Frame work script
Option Explicit
'define constants for web URL and browser name
executefile "C:\TestAutomation\openTAPS\Lib\Constants.vbs"
executefile "C:\TestAutomation\Common\Lib\UtilityFunctions.v
bs"
executefile "C:\TestAutomation\Common\Lib\SendingEmail.vbs"
executefile "C:\TestAutomation\openTAPS\Classes\Functions.vb
s"
'declare variables
Dim iRowcount, i, Username, Password
'
datatable.AddSheet("dtInvalidLogin")
'ValidLogin is the sheet name
datatable.ImportSheet "C:\TestAutomation\openTAPS\Data\TestD
ata.xls", "InValidLogin", "dtInvalidLogin"

'Get row count from datatable
iRowcount = datatable.GetSheet("dtInvalidLogin").GetRowCount

For i = 1 to iRowcount

'functions
OpenApp()

'set username and password
Username = trim(datatable.Value
("Username", "dtInvalidLogin"))
Password = trim(datatable.Value
("Password", "dtInvalidLogin"))

Login Username, Password

'Verification: check username should display on home page
If Browser("opentaps CRM").Page("opentaps CRM").WebElement
("DemoCSR").GetROProperty("outertext")=Username Then
'object.method to report events in HP Run Results
Viewer that Login is successful or not
'EventStatus - micPass shows under Results
'StepName - ValidLogin shows under Object
'UserName Login Successful shows under Details
reporter.ReportEvent micPass, "ValidLogin",
Username& " Login not successful"
WriteToFile "C:\QTP\TestAutomation\openTAPS\Logs\Tes
tResults.txt", Username & " Login successful"
Else
reporter.ReportEvent micFail, "ValidLogin",
Username& " Login successful"
WriteToFile "C:\QTP\TestAutomation\openTAPS\Logs\Tes
tResults.txt", Username & " Login not successful"
End If

'Logout
Browser("My Home | opentaps CRM").Page("My Home | opentaps
CRM").Link("Logout").Click @@ hightlight id_;_Browser("My
Home | opentaps CRM").Page("My Home | opentaps CRM").Link
("Logout")_;_script infofile_;_ZIP::ssf1.xml_;_

'close app
CloseApp()

datatable.SetNextRow
Next
'Gmail
SendMail "21deven@gmail.com", "jinideveloper@gmail.com", "QT
PTest Results", "Please find my qtp test results"
'Outlook
'SendMail("21deven@gmail.com", "QTPTest Results", "Please
find my qtp test
results" , "C:\QTP\TestAutomation\openTAPS\Logs\TestResults.
txt")

Answer / kalyan

Random Number Parameter Concept is there.

I wil give script later.

Any doubts call 9 66 66 757 66

Can anybody help me for vb script in qtp? give me examples for practice plz.

0 Answers  

How to count no of edit boxes on the page?

3 Answers   IBM,

what is the structure for the data driven framework

0 Answers   Wipro,

what is the difference between development and testing

1 Answers  

what is the difference between ClassName and class in QTP?

3 Answers  

How to take screenshots in qtp?

2 Answers   Sonata,

Hi All, we are using QTP Automation Scripts to test SAP. I recorded QTP Automation Scripts in English-based SAP GUI. Now we have to test a French-based SAP sytem and use the same scripts. The QTP scripts are failing when executed on the French-based SAP System due to Object Recognition Issues. What can we do? Do I re-record the scripts in the French-based SAP system?

0 Answers  

I want to open a text file and then search some specified text in it and then replace that text with some other text i found that text in .txt but do not know how to replace that text can any body help me. if possible put the code for qtp

2 Answers  

Explain the new feature of UFT regarding the export of test results?

0 Answers  

What are the types of properties that quick test learns while recording?

0 Answers  

CAN I CALL A FUNCTION IN ACTION.IF YES PLEASE HELP ME

2 Answers   TCS,

Suppose i have given 10 test cases all the test cases should be automated?

3 Answers   NTT Data,