Thread Rating:
  • 0 Vote(s) - 0 Average
  • 1
  • 2
  • 3
  • 4
  • 5
How to use same script for multiple URLs
#1
Solved: 10 Years, 7 Months, 4 Weeks ago
Please answer my below question urgently..

Consider that my healthcare web application is surving 100+ clients. For all of these 100 clients, URL is different and login credential is also different.

I need to login into all 100+ clients and needs to test few main pages (10 - 15 pages) are working fine or not.

Using QTP 10.0 version, I have script prepared to test few main pages for ONE client.

Now my question is how can I use above script for rest of 99 clients? Can data table help me? OR should I need to use looping. If yes, pls provide me the code.

As I am QTP beginner, Please suggest me best option in detail urgently..
Reply
#2
Solved: 10 Years, 7 Months, 4 Weeks ago
Hi,
To pass the url and username, password use datasheet and navigate to each row to pick the values.
Let me know in case of any help required.

Regards,
Sankalp
Reply
#3
Solved: 10 Years, 7 Months, 4 Weeks ago
Sankalp, thanks a lot for your quick reply.. As I am beginer, I haven't used datasheet till now.. Can you please help me step by step to use datasheet in my case? How can I navigate each row to pick the value using datasheet?
Reply
#4
Solved: 10 Years, 7 Months, 4 Weeks ago

.doc   forum.doc (Size: 27 KB / Downloads: 254)
.doc   forum.doc (Size: 27 KB / Downloads: 254) [quote='mansis' pid='22369' dateline='1346232386']

Hi,
Refer to the attachment

Regards,
Sankalp
Reply
#5
Solved: 10 Years, 7 Months, 4 Weeks ago
Hi Sankalp,

Thanks for providing code. Using it, when I was running attached script in QTP and received error "The test run cannot continue due to a syntax error. Expected end of statement Line(1): "System Util.run DataTable("URL",dtGlobalSheet)". Can you please help me?

Script is ------


Code:
Datatable. Import"C:\Documents and Settings\mansi.shah\Desktop\book1.xlsx"
For i=1 to DataTable.RowCount
    System Util.run DataTable(“URL”,dtGlobalSheet)
    Browser().Page().Webedit().Set DataTable(“Username”,dtGlobalSheet)
    Browser().Page().Webedit().Set DataTable(“Password”,dtGlobalSheet)
             Browser("InSync :: Login").Page("InSync :: Login").WebButton("Login").Click
          
'Select facility'
Browser("InSync :: Login").Page("InSync :: Login_2").WebButton("Ok").Click

'Open Scheduler page'

Browser("InSync :: Login").Page("InSync :: Dash Board").Image("ctl00$Header1$Image2").Click
Wait (3)

'Access Patient Search page'

Browser("InSync :: Login").Page("InSync :: Dash Board_2").Image("ctl00$Header1$Image3").Click
Browser("InSync :: Login").Page("InSync :: Patient Search").Image("Edit Patient").Click
Wait (3)


''Access Facesheet'
Browser("InSync :: Login").Page("InSync :: Patient Search").Image("ctl00$Header1$Image4").Click
Wait (3)

'Access New charge page'
Browser("InSync :: Login").Page("InSync :: Dash Board_2").Image("ctl00$Header1$Image5").Click

'Access Document Manager'
Browser("InSync :: Login").Page("InSync :: Dash Board_2").Image("ctl00$Header1$ibtndocumnetmgr").Click
Wait (3)

Browser("InSync :: Login").Close
Next
------------

Please review attached zip file for details

Thanks,
Mansi.


Hi,
Refer to the attachment

Regards,
Sankalp
[/quote]


Attached Files
.zip   DS.zip (Size: 29.05 KB / Downloads: 152)
Reply
#6
Solved: 10 Years, 7 Months, 4 Weeks ago
Please try below code

Code:
Set ObjExcel = CreateObject("Excel.Application")
ObjExcel.Visible = TRUE


Set oWorkbook = ObjExcel.Workbooks.Open "C:\Documents and Settings\mansi.shah\Desktop\book1.xlsx"
Set oWorksheet = oWorkbook.Worksheets("Sheet1")
rCnt = oWorkbook.Worksheets("Sheet1").UsedRange.Rows.Count

For i=2 to rCnt
URL = oWorkbook.Worksheets("Sheet1").Cells(i,1).Value
UserName = oWorkbook.Worksheets("Sheet1").Cells(i,2).Value
Password  = oWorkbook.Worksheets("Sheet1").Cells(i,3).Value
    System Util.run URL
    Browser().Page().Webedit().Set UserName
    Browser().Page().Webedit().Set Password
    Browser("InSync :: Login").Page("InSync :: Login").WebButton("Login").Click
'Select facility'
Browser("InSync :: Login").Page("InSync :: Login_2").WebButton("Ok").Click

'Open Scheduler page'

Browser("InSync :: Login").Page("InSync :: Dash Board").Image("ctl00$Header1$Image2").Click
Wait (3)

'Access Patient Search page'

Browser("InSync :: Login").Page("InSync :: Dash Board_2").Image("ctl00$Header1$Image3").Click
Browser("InSync :: Login").Page("InSync :: Patient Search").Image("Edit Patient").Click
Wait (3)


''Access Facesheet'
Browser("InSync :: Login").Page("InSync :: Patient Search").Image("ctl00$Header1$Image4").Click
Wait (3)

'Access New charge page'
Browser("InSync :: Login").Page("InSync :: Dash Board_2").Image("ctl00$Header1$Image5").Click

'Access Document Manager'
Browser("InSync :: Login").Page("InSync :: Dash Board_2").Image("ctl00$Header1$ibtndocumnetmgr").Click
Wait (3)

Browser("InSync :: Login").Close
Next
Reply
#7
Solved: 10 Years, 7 Months, 4 Weeks ago
ssvali - again syntax error. please review attched snapshot.


Attached Files Image(s)
   
Reply
#8
Solved: 10 Years, 7 Months, 4 Weeks ago
Hi,

Keep the datasheet in some drive instead of desktop.
SystemUtil.run DataTable(“URL”,dtGlobalSheet)
pass the value of URL in datasheet
and please pass the browser and page name under the code which i provided.

Regards,
Sankalp

Regards,
Sankalp
Reply
#9
Solved: 10 Years, 7 Months, 4 Weeks ago
Hi,

Sorry to say, Still it is Not working by giving attached syntax error.. Please review below updated script and attached zip file having script, datasheet and error screen shot.

------

Code:
Datatable.Import"D:\Datasheet\book1.xlsx"

For i=1 to DataTable.RowCount
    SystemUtil.run DataTable(“URL”,dtGlobalSheet)
    Browser(“InSync :: Login”).Page(“InSync :: Login”).Webedit().Set DataTable(“Username”,dtGlobalSheet)
    Browser(“InSync :: Login”).Page(“InSync :: Login”).Webedit().Set DataTable(“Password”,dtGlobalSheet)
              Browser("InSync :: Login").Page("InSync :: Login").WebButton("Login").Click
'Select facility'
Browser("InSync :: Login").Page("InSync :: Login_2").WebButton("Ok").Click

'Open Scheduler page'

Browser("InSync :: Login").Page("InSync :: Dash Board").Image("ctl00$Header1$Image2").Click
Wait (3)

'Access Patient Search page'

Browser("InSync :: Login").Page("InSync :: Dash Board_2").Image("ctl00$Header1$Image3").Click
Browser("InSync :: Login").Page("InSync :: Patient Search").Image("Edit Patient").Click
Wait (3)


''Access Facesheet'
Browser("InSync :: Login").Page("InSync :: Patient Search").Image("ctl00$Header1$Image4").Click
Wait (3)

'Access New charge page'
Browser("InSync :: Login").Page("InSync :: Dash Board_2").Image("ctl00$Header1$Image5").Click

'Access Document Manager'
Browser("InSync :: Login").Page("InSync :: Dash Board_2").Image("ctl00$Header1$ibtndocumnetmgr").Click
Wait (3)

Browser("InSync :: Login").Close
Next
------
Thanks,
Mansi.


Attached Files
.zip   Script - Datatable - Error screen.zip (Size: 84.83 KB / Downloads: 146)
Reply
#10
Solved: 10 Years, 7 Months, 4 Weeks ago
Hi,
Import .xls file instead od .xlsx

Regards,
Sankalp
Reply


Possibly Related Threads…
Thread Author Replies Views Last Post
  How to run same script for different URLs when loading time is different mansis 5 4,461 09-21-2012, 12:42 PM
Last Post: mansis
  Multiple users executing QTP script using Excel Input vinodindia 0 3,115 07-05-2012, 11:41 PM
Last Post: vinodindia
  Switching between URLs sqadri 1 2,559 02-01-2012, 07:36 AM
Last Post: rajpes
  Multiple input values from a reusable action call from main script knightofdawn 0 3,180 08-30-2010, 01:23 PM
Last Post: knightofdawn
Exclamation How to access multiple SAP sessions by script? Osprey 1 7,555 06-24-2010, 04:11 PM
Last Post: Osprey

Forum Jump:


Users browsing this thread: 1 Guest(s)