find my comments in yellow...hope it works for u...

On Tue, Feb 23, 2010 at 9:19 AM, Vishnu V.Potti <[email protected]>wrote:

> Hi All,
>
> I tried to connect my DB via QTP. I used the below Script in QTP for
> connecting and querying DB.  Iam gettign this below error in dialog
> box
>
> "[Oracle][ODBC][Ora]ORA-12560: TNS:protocol adapter error
> Line (22): "conn1.Open".
>
> Note: First I used one host in connection string. Still I got the same
> error.   I also set up "MYDB" datasource in "System DSN" tab on
> Control Panel -> Administrative Tools ->Data Sources (ODBC) for
> "Oracle in OraClient10g_home1" driver.  I tested the connection after
> setting up here and the connection was successful. I am able to
> connect to MYDB through TOAD application.
>
> Please advice me how to correct the script.
>
> ************Starting of Script******************
>
> thisUser = username
> thisPW = password
> Environment("CURRENT_SERVICE_NAME") = "MYDB_APP.company.net"
> sql = "select * from my_table';"
> ConStr = "Driver={Oracle in OraClient10g_home1}; " & _
> "CONNECTSTRING=(DESCRIPTION=" & _
> "(ADDRESS = (PROTOCOL = TCP)" & _
> "(host = abcn01p.company.net || host = def03v2.company.net)
> (PORT=1521))" & _
> "(CONNECT_DATA=(SERVICE_NAME = " & Environment("CURRENT_SERVICE_NAME")& _
>  "))); uid=" & thisUser & ";pwd=" & thisPW & ";"
>
> Set conn1 = CreateObject("ADODB.Connection")
> Set thisObjRS = CreateObject("ADODB.recordset")
> conn1.ConnectionString = ConStr
> conn1.Open
> Set thisObjRS = conn1.Execute(query,,adExecuteNoRecords)
> varArray = thisObjRS.GetRows
>
> **************End of Script******************
>
> My TNS.Ora file is exactly same as below.
>
> MYDB =
>  (DESCRIPTION =
>    (ADDRESS_LIST =
>      (ADDRESS = (PROTOCOL = TCP)(host = abcn01p.company.net)(port =
> 1521))
>      (ADDRESS = (PROTOCOL = TCP)(host = def03v2.company.net)(port =
> 1521))
>    )
>    (CONNECT_DATA =
>      (service_name = MYDB_APP.company.net)
>    )
>    (source_route = yes)
>  )
>
> --
> 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]<mercuryqtp%[email protected]>
> For more options, visit this group at
> http://groups.google.com/group/MercuryQTP?hl=en




-- 
Mallipeddi Sreedhar
215-688-2456

-- 
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