Answer / ruby

For i = 1 to 5
SystemUtil.Run "iexplore","www.gmail.com"
Next
For i = 0 to 4
Browser("title:=Google","Creationtime:=" & i).Page("title:=Google").WebEdit("name:=Usname").Set Datatable("Username")
Browser("Title:=Google","Creationtime:=" & i).Page("title:=.*").WebEdit("name:=Pwd").Set Datatable("Password")
Browser("Creationtime:=" & i).Page("title:=.*").WebButton
("name:=Submit").Click
Next

Answer / amarendra kothuru

Using Data parameterization, we can do that or in other
purpose also

Method1:
var_RowCount = DataTable.GetSheet("Action1").GetRowCount
For i = 1 to var_RowCount
DataTable.SetCurrentRow(i)
SystemUtil.Run "iexplore","www.abcd.com"
uname = DataTable("Username",dtLocatSheet)
psd = DataTable("Password",dtLocatSheet)
Browser("index:=0").Page("title:=.*").WebEdit
("name:=Usname").Set uname
Browser("index:=0").Page("title:=.*").WebEdit
("name:=Pwd").Set psd
Browser("index:=0").Page("title:=.*").WebButton
("name:=Go").Click
Next

Method2:
For i = 1 to 5
SystemUtil.Run "iexplore","www.abcd.com"
Next
For i = 1 to 5
Browser("index:=" & i).Page("title:=.*").WebEdit
("name:=Usname").Set uname
Browser("index:=" & i).Page("title:=.*").WebEdit
("name:=Pwd").Set psd
Browser("index:=" & i).Page("title:=.*").WebButton
("name:=Go").Click
Next

Can I record on netscape browser does it require any special settings ?

2 Answers  

---

What r the advantages of automation?

3 Answers  

---

your doing one project testing then how u know itis wheather web based application or windows based application?

2 Answers  

---

Do we get any issues if we run the test script on differentbrowsers?what are the options we need to set in QTP?

3 Answers   CTS,

---

What is a Run-Time Data Table? Where can I find and view this table?

4 Answers  

---

What is Descriptive Programing? In which cases, we will go for descriptive programing?

2 Answers   CTS,

---

VM1 = "Invalid username or password. Please try again. " VM2 = "Email id is required.Password is required. " VM3 = "Email id is an invalid e-mail address.Password is required. " VM4 = "Password is required. " VM5 = "Email id is required. " VM6 = "Email id is an invalid e-mail address. " 'Rowcount of the Local sheet Rowcount = DataTable.GetSheet("Invalid login transactions").GetRowCount 'Valid emailid and Password Emailid = "test@iteamic.com" Password = "Password0" 'For i = 1 to Rowcount 'Parameterised Email_id Browser("Browser").Page ("Page").WebEdit("emailAddress").Set DataTable("Email_id", dtLocalSheet) EID = Browser("Browser").Page ("Page").WebEdit("emailAddress").GetRoProperty("value") 'Parameterised Password Browser("Browser").Page ("Page").WebEdit("password").Set DataTable("Password", dtLocalSheet) PWD = Browser("Browser").Page ("Page").WebEdit("password").GetROProperty("Value") If EID = Emailid And PWD = Password Then Reporter.ReportEvent micPass, "EID & PWD check", "Email id and Password is correct, One iteration of Invalid login attempts is not being executed" Else Browser("Browser").Page("Page").WebButton ("Sign-In").Click 'Output value exported to the local sheet Browser("Browser").Page ("Page_2").Output CheckPoint("Home page_Sign in") 'Storing the output value in a variable(OUTPUT OUTPUT = Datatable.GetSheet ("Invalid login transactions").Getparameter ("Validation_message_signin").value 'comparing the Variable Output and the Validation message for a given input If OUTPUT = VM1 Then Reporter.ReportEvent micPass, "VM1", "Invalid username or password. Please try again. " else if OUTPUT = VM2 Then Reporter.ReportEvent micPass, "VM2", "Email id is required.Password is required. " else if OUTPUT = VM3 Then Reporter.ReportEvent micPass, "VM3", "Email id is an invalid e-mail address.Password is required. " else if OUTPUT = VM4 Then Reporter.ReportEvent micPass, "VM4", "Password is required. " else if OUTPUT = VM5 Then Reporter.ReportEvent micPass, "VM5", "Email id is required. " else if OUTPUT = VM6 Then Reporter.ReportEvent micPass, "VM6", "Email id is an invalid e-mail address. " else Reporter.ReportEvent micFail, "EID & PWD check_FAIL", "Validation message checkpoint failed. The captured v msg is not required" End if End if I am getting syntax error saying "Expected 'End If'" at the last line, Why is this? Kindly explain...

1 Answers  

---

what is test data

4 Answers   Wipro,

---

What is Object Spy in QTP?

11 Answers   vsworx,

---

what is the extension of new local object repository?

5 Answers  

---

tell me QTP standards ?plz

0 Answers   Kanbay,

---

what are the different kinds of frameworks in automation?

1 Answers   Accenture,

---