Unknown error on connecting Oracle DB on WinR2 2008 64 Bit Machine

Hi ,



I am trying to connect Oracle DB with oraOLEDB provider, I facing unknown error on trying the same through Test Complete.



But when the same code is executed through VB Script(on 64 bit machine, 32 bit machine), I am able to execute code Successfully.



Please find below code with error number, suggestions are welcome



Err number :  -2147467259





--------------------------------------------

   strConnectionString ="Provider=OraOLEDB.Oracle;" & _

  "user id="&strGSIPdbUser&";password="&strGSIPdbPwd&";" & _

         "Data Source=(DESCRIPTION=" & _

         "(ADDRESS=(PROTOCOL=TCP)" & _

         "(HOST="&strGSIPdbHost&")(PORT="&strGSIPdbPort&"))" & _

         "(CONNECT_DATA=(SERVICE_NAME="&strGSIPDBServiceName&")));"

msgbox strConnectionString  

    Set objOConnection = CreateObject("ADODB.Connection")  

    'objOConnection.ConnectionString = strConnectionString    

    objOConnection.Open strConnectionString

If objOConnection.State = 1 Then

    msgbox Err.Number & " - Connected"

 objOConnection.Close

End If