Verbindungsstringsyntax für Classic ADO/ODBC/Oracle 10g EZConnect

Question

Ich versuche, verschiedene VBA-Projekte mit einem Oracle 10g-Back-End mit ADO (2.8) und keine TNS zu verbinden.

1. eine Oracle Instant Client
2. den begleitenden ODBC-Treiber
3. Installieren einrichten (Testen Sie die Verbindung mit EZConnect über: Nach verschiedenen Versuchen haben wir, dass die einfachste Reihe von Schritten für eine saubere Installation umfassen entschieden SQL plus)
4. (Testen Sie die Verbindung mit einem Windows DSN erstellen)

Alles bis hier funktioniert gut. Das Problem ist, kann ich nicht die Syntax herauszufinden, ADO zu sagen, die Instant Client ODBC-Treiber zu verwenden, die in meiner ODBC-Treiber-Liste erscheint als „Oracle in MyTest“ (ohne Anführungszeichen). Die Verwendung des MSFT ODBC-Treibers mit EZConnect als this post schlägt vor, dass es nicht besser funktioniert als vor dem Einrichten des Instant-Clients (was überhaupt nicht der Fall ist). Aber this post scheint es möglich vorzuschlagen, ohne Angabe genau, wie und connectionstrings.com nur sagt Ihnen, was die Datenquelle Teil der Zeichenfolge aussieht, dh EinUser/irgendein @ Aserver: Portnummer/InstanceName

Kurzversion: Was ist der Exakte Syntax einer klassischen ADO-Verbindungszeichenfolge, die auf einen Instant-Client-ODBC-Treiber verweist?

Vielen Dank im Voraus für Ihre Hilfe. Habe mir eine dumme lange Zeit mit SO gehend zu erhalten ...

Answer 1

Versuchen Sie, diese und die Werte gegebenenfalls ersetzen:

Set Connection = CreateObject("ADODB.Connection") 

blnTest = Connection.Open("Driver={Oracle in instantclient};Dbq=127.0.0.1:1521/SERVICENAMEHERE", "USERNAME", "PASSWORD") 

Wenn Oracle in instant funktioniert nicht die HKEY_LOCAL_MACHINE \ SOFTWARE überprüfen \ ODBC \ ODBCINST.INI \ ODBC Treiber Registrierungsschlüssel, um zu sehen, welcher Wert für den Oracle Instant Client ist (es kann eine Versionsnummer angehängt sein).

Wenn dies noch nicht für Sie arbeiten. Hinterlasse einen Kommentar mit den Details was passiert ist und ich werde versuchen, die Antwort für dich anzupassen.

Answer 2

' Create a connection object.' 
Dim cn As ADODB.Connection 
Set cn = New ADODB.Connection 

' Create a recordset object.' 
Dim rs As ADODB.Recordset 
Set rs = New ADODB.Recordset 

' Provide the connection string.' 
Dim strConn As String 
Dim str As String 

'Use the SQL Server OLE DB Provider.' 
strConn = "Driver=(Oracle in OraHome92);" & "Data Source=;Uid=;Pwd=;" 

'Now open the connection.' 
cn.Open strConn 
With rs 

    ' Assign the Connection object.' 
    ActiveConnection = cn 

    ' Extract the required records.' 
    .Open "SELECT ", cn 


End With 

Answer 3

Ähnlich ‚user1206604 Antwort - Ich habe eine ODBC-Verbindung mit ODBC-Datenquellen-Administrator bis (halber Beispiel werden wir es nennen‚DEMO‘) und schließen Sie wie folgt aus:

Dim conn As New adodb.Connection 
Set conn = New adodb.Connection 

connStr = "Provider=OraOLEDB.Oracle;Data Source=DEMO;User Id=yourUserID;Password=yourPassword;" 
conn.Open connStr 

Dim api As New adodb.Recordset 
Set api = New adodb.Recordset 

yourQueryString = "SELECT foo FROM bar" 
api.Open yourQueryString, conn, adOpenDynamic, adLockReadOnly 
'adjust above setting as needed 

while not api.EOF 
    'do interesting stuff here 
wend 

'clean up resources 
api.Close 
Set api = Nothing 

conn.Close 
Set conn = Nothing 

Die ODBC-Datenquellen-Administrator wird (auf meinem Rechner) im Startmenü> Programme gefunden> Oracle - oraClient10g> Konfiguration und Migration tools> Microsoft ODBC Administrator und sieht wie folgt aus: