Try using OLEDb. I find that that database driver works best with QTP. More info http://www.connectionstrings.com/oracle
On Feb 24, 4:02 pm, Vishnu V Potti <[email protected]> wrote: > Hi Ganesh, > > I am running QTP on my system and I already have TNS.ora file in my system. > I am successfully able to query my database through TOAD. > > On Tue, Feb 23, 2010 at 9:36 PM, Ganesh muralidharan > <[email protected]>wrote: > > > > > > > Please chk availability of TNSNAME.ora file on the PC on which you are > > running your script. > > > 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%2bunsubscr...@googlegrou > >> ps.com> > >> For more options, visit this group at > >>http://groups.google.com/group/MercuryQTP?hl=en > > > -- > > Ganesh Muralidharan > > > 'God Never Forgets' > > -- > REGARDS > VISHNU V POTTI -- 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
