Golgappa.net | Golgappa.org | BagIndia.net | BodyIndia.Com | CabIndia.net | CarsBikes.net | CarsBikes.org | CashIndia.net | ConsumerIndia.net | CookingIndia.net | DataIndia.net | DealIndia.net | EmailIndia.net | FirstTablet.com | FirstTourist.com | ForsaleIndia.net | IndiaBody.Com | IndiaCab.net | IndiaCash.net | IndiaModel.net | KidForum.net | OfficeIndia.net | PaysIndia.com | RestaurantIndia.net | RestaurantsIndia.net | SaleForum.net | SellForum.net | SoldIndia.com | StarIndia.net | TomatoCab.com | TomatoCabs.com | TownIndia.com
Interested to Buy Any Domain ? << Click Here >> for more details...

How can i open 5 multiple browser at once through QTP VB
script and i want to login with 5 different credentials i
already tried with this code but its entering credentials
only for first browser and am using datatable to
parameterize

Answer Posted / 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

Is This Answer Correct ?    2 Yes 3 No



Post New Answer       View All Answers


Please Help Members By Posting Answers For Below Questions

What is exact meaning of Database Checkpoint in QTP 9.2 and what are the different types of the database check points?

2702


hi guys, pls tell me for testing institution training hub, hitech city is best or not?

1772


I hav installed QTP8.2, im working on webapplication, while running the script giving error msg like "QTPro.exe generated errors and will be closed by windows. You will restart the program. An error log is being created". Pls anybody what is the problem, what i have to do for this? Thanks...

2142


Dear All , For UFT 12.02 which version QC or ALM will support ? Thanks Balaji

1332


What is use of object spy?

1027


What is the expert view?

940


Hi All , How can we decicde for pariticular frame(DataDriven or Keword Driven)in Project? Thanks Balaji

1783


what is keyword driven testing in qtp?n how is it useful?

1856


What is the latest version of qtp?

1033


can u please explain what is the exact difference between qtp8.2 and 9.0

2125


How to integrate the qualitycenter with qtp

2205


How do you capture tooltip using QTP?

1026


How to use descriptive programming?

1077


Explain the N-tire structure(process) for Funds Transfer ( means give N ways to funds Transfer in an Application)

2042


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

2984