How to connect to the Database from QTP?
Answers were Sorted based on User's Feedback
Through scripting this is way to connect the database
Example:-
set conn=Createobject("ADODB.Connection")
Srvname="Driver={Microsoft ODBC for
Oracle}:Server=DBserver,UID=Sa,Password=sa"
conn.open Srvname
Set Rec = CreateObject("ADODB.Recordset")
SQL="select * from Users"
Rec.open SQL ,conn
Username=Rec.fields("employee name")
Msgbox Username
| Is This Answer Correct ? | 86 Yes | 20 No |
Microsoft ADO (ActiveX Data Objects) is a Component object
model object for accessing data sources.The ADO Recordset
object is used to hold a set of records from a database
table. A Recordset object consist of records and columns
(fields).
In ADO, this object is the most important and the one used
most often to manipulate data from a database.
Srvname is a connection string.if u already installed
oracle in your system..using that path u can connect oracle
database...if u dont have oracle give the conncetion string
path..whatever connection string created used in database
checkpoint by
default...Example:DSN=QT_Flight32;DBQ=C:\Program
Files\Mercury Interactive\QuickTest
Professional\samples\flight\app\flight32.mdb;Driver=C:\WINDO
WS\system32\odbcjt32.dll;DriverId=281;FIL=MS
Access;MaxBufferSize=2048;PageTimeout=5;
| Is This Answer Correct ? | 39 Yes | 6 No |
Answer / ramireddy
Thru Self scripting:
set conn=createobject("adodb.connection")
set rs=createobject("adodb.recordset")
' Oracle client is required to be installed on your box
conn.open= "Provider=OraOLEDB.Oracle.1;Password=***;Persist
Security Info=True;User ID=****;SERVER=****;Data
Source=****;DBQ=****;"
sql="your sql"
rs.open sql,conn
rs.close
set rs=nothing
conn.close
set conn=nothing
| Is This Answer Correct ? | 25 Yes | 6 No |
Answer / sandipgami84
Dim ObjCon, ObjResult, ObjSQL
set ObjCon=Createobject("ADODB.Connection")
ObjCon.ConnectionString("DSN= ,UID= ,PWD= ")
ObjSQL="SELECT * FROM Emp"
ObjCon.Open()
ObjResult=ObjCon.Execute(ObjSQL)
ObjCon.Close()
ObjResult=Nothing
whtever ur data stored in ObjResult variable
| Is This Answer Correct ? | 31 Yes | 13 No |
Answer / manohar
Dim con,rs
set con=createobject("ADODB.Connection")
set rs=createobject("ADODB.Recordset")
con.provider="Microsoft.jet.oledb.4.o"
con.open"Path of the database"
rs.open "select * (table name),con
| Is This Answer Correct ? | 27 Yes | 10 No |
Answer / ss
Dim objConnection
'Set Adodb Connection Object
Set objConnection = CreateObject("ADODB.Connection")
Dim objRecordSet
'Create RecordSet Object
Set objRecordSet = CreateObject("ADODB.Recordset")
Dim DBQuery 'Query to be Executed
DBQuery = "Select NAME from dbo.EMPLOYEE where AGE = 29"
'Connecting using SQL OLEDB Driver
objConnection.Open "Provider=sqloledb.1;Server=.SQLEXPRESS;User Id=sa;Password=Password123;Database=Trial"
'Execute the Query
objRecordSet.Open DBQuery,objConnection
'Return the Result Set
Value = objRecordSet.fields.item(0)
msgbox Value
' Release the Resources
objRecordSet.Close
objConnection.Close
Set objConnection = Nothing
Set objRecordSet = Nothing
| Is This Answer Correct ? | 2 Yes | 0 No |
Answer / surendra adapa
For Sql-Server:
"provider=SQLOLEDB;Server=servername;Databae=dbname;Userid= ;Password= :"
or
"provider=SQLOLEDB;Server=servername;Databae=dbname;Trusted-Connection=yes;" (windows Authentication)
For MS-Access:
"provider=Microsoft.Jet.OLEDB.4.0;DataSoure=Path;uid= ;pwd= ;"
| Is This Answer Correct ? | 3 Yes | 2 No |
Answer / manjula b
Set odb=createobject("ADODB.connection")
Strpath="c:usershappydesktopdesktop31database2.mdb"
Odb.connection string="provider=microsoft.jet.oledb.4.0;datasource="&strpath
Odb.open
Sql1="select *from employees"
Set orec=odb.execute(sql1)
Dountil orec.eof=true
Print orec.fields("employee name")
Orec.move next
Loop
Odb.close
| Is This Answer Correct ? | 0 Yes | 0 No |
Answer / srikanth
Thanks murali...
What is 'ADODB', 'Recordset' and wht we have to give
in 'Srvname'?
| Is This Answer Correct ? | 10 Yes | 25 No |
Answer / francis
connect to database using database checkpoint,database
output value(connection string is needed)
| Is This Answer Correct ? | 21 Yes | 46 No |
Why VB scripts are used in QTP and TSL in Winrunner, is there any advantage of using VB Scripts
What are the methods used in UFT to handle exceptions or run-time errors?
How you can decide which type of object repository you have to use?
By default Action1 runs first in QTP. Is it possible to start the run with Action2?
What are the points to be taken into consideration while doing desktop testing?
What are the advantages of Object Repository?
Is it possible for QTP to capture the objects in word document.If so please give me the code.Thank you.
How to run a script from lines 50 - 100 alone (if the script has 1- 200 lines of code)?
After creating testcases, how do you start testing in QTP? what methodology will follow?
7 Answers Actran, American Well,
How can i store runtime value through vb script while using qtp
what is the difference between DP and keyword driven framework?
how do u manipulating INI, DLL and / or registry files in support of your test environment? actually what do u mean by INI and DLL or registry files. plzzz its urgent do answer