how we connect oracle or sql data server database to qtp
Answers were Sorted based on User's Feedback
Answer / kamal
I think, in database testing we connect oracle or sql data
server database by using odbc(connectivity).
if it's wrong plz give correct answer
Is This Answer Correct ? | 5 Yes | 0 No |
Answer / kiran
Dim conConnection As New ADODB.Connection
Dim cmdCommand As New ADODB.Command
Dim rstRecordSet As New ADODB.Recordset
'Defines the connection string for the Connection. Here we have used fields
'Provider, Data Source and Mode to assign values to the properties
' conConnection.Provider and conConnection.Mode
conConnection.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & _
App.Path & "\" & "database.mdb;Mode=Read|Write"
'Define the location of the cursor engine, in this case we are opening an Access database
'and adUseClient is our only choice.
conConnection.CursorLocation = adUseClient
'Opens our connection using the password "Admin" to access the database. If there was no password
'protection on the database this field could be left out.
conConnection.Open
'Defines our command object
' .ActiveConnection tells the command to use our newly created command object.
' .CommandText tells the command how to get the data, in this case the command
' will evaluate the text as an SQL string and we will return all
' records from a table called tabTestTable
' .CommandType tells the command to evaluate the .CommandText property as an SQL string.
With cmdCommand
.ActiveConnection = conConnection
.CommandText = "SELECT * FROM tabTestTable;"
.CommandType = adCmdText
End With
'Defines our RecordSet object.
' .CursorType sets a static cursor, the only choice for a client side cursor
' .CursorLocation sets a client side cursor, the only choice for an Access database
' .LockType sets an optimistic lock type
' .Open executes the cmdCommand object against the data source and stores the
' returned records in our RecordSet object.
With rstRecordSet
.CursorType = adOpenStatic
.CursorLocation = adUseClient
.LockType = adLockOptimistic
.Open cmdCommand
End With
'Firstly test to see if any records have been returned, if some have been returned then
'the .EOF property of the RecordSet will be false, if none have been returned then the
'property will be true.
If rstRecordSet.EOF = False Then
'Move to the first record
rstRecordSet.MoveFirst
'Lets move through the records one at a time until we reach the last record
'and print out the values of each field
Do
'Access the field values using the fields collection and print them to a message box.
'In this case I do not know what you might call the columns in your database so this
'is the safest way to do it. If I did know the names of the columns in your table
'and they were called "Column1" and "Column2" I could reference their values using:
' rstRecordSet!Column1
' rstRecordSet!Column2
MsgBox "Record " & rstRecordSet.AbsolutePosition & " " & _
rstRecordSet.Fields(0).Name & "=" & rstRecordSet.Fields(0) & " " & _
rstRecordSet.Fields(1).Name & "=" & rstRecordSet.Fields(1)
'Move to the next record
rstRecordSet.MoveNext
Loop Until rstRecordSet.EOF = True
'Add a new record
With rstRecordSet
.AddNew
.Fields(0) = "New"
.Fields(1) = "Record"
.Update
End With
'Move back to the first record and delete it
rstRecordSet.MoveFirst
rstRecordSet.Delete
rstRecordSet.Update
'Close the recordset
rstRecordSet.Close
Else
MsgBox "No records were returned using the query " & cmdCommand.CommandText
End If
'Close the connection
conConnection.Close
'Release your variable references
Set conConnection = Nothing
Set cmdCommand = Nothing
Set rstRecordSet = Nothing
End Sub
Is This Answer Correct ? | 0 Yes | 0 No |
Answer / srinivasmohan
I think, in database testing we connect oracle or sql data
server database by using ADODB.connection
Is This Answer Correct ? | 0 Yes | 1 No |
What is keyword driven framework, what is "key" in It.
Hello, I am facing problem to check textpoint for mercury application . I have inserted checkpoint to check flight summary for place of departure and arrival with datatable and script look like "Browser("Find a Flight: Mercury").Page("Book a Flight: Mercury").Check CheckPoint("Book a Flight: Mercury_4")" but while I am executing this script at last my check point gets fail and display Text Checkpoint: captured "" between Summary and 4/31/2008FLIGHT , expected "Acapulco" Match case: ON Exact match: OFF Ignore spaces: ON I think value from data table is not fatched so please guide me what I have to do to overcome this problem.. Thanks
How to execute a WinRunner Script in QTP?
What is error handled other than recovery scenario manager?
How to load the object repository at run time?
What is the use of environment variables?
What is the difference between keyword view and expert view?
how do u import the test cases written in excel sheet to qtp? and how do u generate the script in qtp for the testcase in excel sheet? plzzzz do answer this question thanks in advance
Why we have to import data from excel sheet to data table?becoz v can directly use test data directly from xl know. can u all pls explain me clearly
What will be happen if i load object repository at run time, but it has already associated.
Hi,Every one,my name is RAHUL,aim wondering if any one got QTP software? If yes,can u plz knock on to gchinthakindhi@gmail/yahoo.com. THANK U.
What is recovery scenario manager? When you go for recovery scenario manager?