ADO provider and VB

From: Beaux <bo_young_at_stuller.com>
Date: 26 Sep 2002 08:15:36 -0700
Message-ID: <e95636da.0209260715.70fa5238@posting.google.com>

I am trying to connect to Oracle using ADO and the provider is giving me an error. I thought I had everything downloaded and installed. I connect with Toad fine. I get the error &#8216;Provider cannot be found. It may not be properly installed&#8217;. This is an example of how I am trying to connect. I get the error at Ora_Rs.Open. The Me.Fg stuff is a Flex Grid. Where can I find the correct version of Oracle provider and install it?

Dim Ora_Conn As ADODB.Connection

    Dim Ora_Rs As ADODB.Recordset

    Set Ora_Conn = New ADODB.Connection
    Set Ora_Rs = New ADODB.Recordset     

    With Ora_Conn

.Provider = "OraOLEDB.Oracle.1"
.ConnectionString = "Password=apps;Persist Security
Info=True;User ID=apps;Data Source=crp1"

.Open

    End With     

    Ora_Rs.Open "Select Name From qp_Price_Formulas Order by Name", Ora_Conn, adOpenStatic, adLockOptimistic     

    Set Me.Fg.DataSource = Ora_Rs

My Oracle version.
RDBMS : 8.1.7.2.0
Oracle Applications : 11.5.3

This does work but I did not want to use the Microsoft provider for Oracle product.

Dim Ora_Conn As ADODB.Connection

    Dim Ora_Rs As ADODB.Recordset

    Dim Ora_ConnStr As String

    Set Ora_Conn = New ADODB.Connection
    Set Ora_Rs = New ADODB.Recordset     

    Ora_ConnStr = "UID=apps;" & _

              "PWD=apps;" & _
              "DRIVER={Microsoft ODBC for Oracle};" & _
              "SERVER=CRP1;"

    Ora_Conn.ConnectionString = Ora_ConnStr     Ora_Conn.Open     

    Ora_Rs.Open "Select Name From qp_Price_Formulas Order by Name", Ora_Conn, adOpenStatic, adLockOptimistic     

    Set Me.Fg.DataSource = Ora_Rs Received on Thu Sep 26 2002 - 10:15:36 CDT