Hi,

I am using the following code to query DB using ADODB connections.

I get the following error:

ORA-12560 TNS :protocol adapter error

Here is my code:
Dim rs,sql,pkey
set conn=createobject("adodb.connection")
set rs=createobject("adodb.recordset")
' Oracle client is required to be installed on your box
conn.open= "Provider=msdaora;Server=server_ip;sid=XXXX;User
Id=YYY;Password=XXX;"
sql="select * from t_table"
rs.open sql,conn
Set rs =conn.Execute(sql)
Do Until rs.EOF
msgbox rs("EE_TRANSACTION_ID")

rs.MoveNext
Loop


Can some one give me a solution for this.

Thanks


rs.close
set rs=nothing

conn.close
set conn=nothing

--~--~---------~--~----~------------~-------~--~----~
You received this message because you are subscribed to the Google
"QTP - HP Quick Test Professional - Automated Software Testing"
group.
To post to this group, send email to [email protected]
To unsubscribe from this group, send email to
[email protected]
For more options, visit this group at
http://groups.google.com/group/MercuryQTP?hl=en
-~----------~----~----~----~------~----~------~--~---

Reply via email to