Skip to Main Content

Oracle Database Discussions

Announcement

For appeals, questions and feedback about Oracle Forums, please email oracle-forums-moderators_us@oracle.com. Technical questions should be asked in the appropriate category. Thank you!

"Provider = MSDAORA..." fails on 64-bit Windows 7

user6684836Apr 14 2015 — edited Apr 14 2015

Hi, I have an application with data in an SQL Database that also needs to get data from my Oracle 9i database.  The vb code snippets below work fine on a 32-bit PC, but fail on a 64-bit PC (Windows 7).  I have indicated the line where the failure occurs below in bold.  Actual failure screenshot attached.  My 32-bit Oracle client is 11.2.0.3.  I have successfully created a system DSN; and confirmed this by accessing data in Excel with this DSN.  I had to download a 32-bit ODBC Admin to create the DSN since Oracle ODBC drivers do not appear in 64-bit Data Source Administrator.  So I have the ODBC working.  I have tried installing the Oracle providers, updated my PATH, and tried " Provider=OraOLEDB.Oracle;...." which have not worked.  I realize MSDAORA was decremented, but any help would be greatly appreciated to get the correct provider working.

Beginning of Code:

Option Explicit On
'Option Strict On

Imports System
Imports Microsoft.VisualBasic
Imports Mongoose.IDO.Protocol
Imports Mongoose.Scripting
Imports System.Text

Namespace SyteLine.FormScripts
    Public Class live_SSSFSSROs
        Inherits FormScript

......................

Beginning of Sub that has failing code:

Sub CheckForCustNotes()

Dim oraConn As Object
Dim rsCustNotes As Object
Dim strSQLStatement As String
Dim strCustomerNotes As String
Dim strCustomerNumber As String

oraConn = CreateObject("ADODB.Connection")
rsCustNotes = CreateObject("ADODB.Recordset")

oraConn.ConnectionString = "Provider=MSDAORA;Data Source=<dbname>;User ID=xxxxxxxx;Password=xxxxxxxx;"
oraConn.Open() '***** FAILURE OCCURS HERE *****
 
strCustomerNumber = Trim(ThisForm.Components("HeaderCustNumEdit").Value)


strSQLStatement = "SELECT BITS FROM vtg_customer_binary WHERE CUSTOMER_ID = '" & strCustomerNumber & "'"

rsCustNotes = oraConn.Execute(strSQLStatement)

Thanks

Tony

tsantaniello@biodex.com

Comments
Locked Post
New comments cannot be posted to this locked post.
Post Details
Locked on May 12 2015
Added on Apr 14 2015
1 comment
1,877 views