Sintaxis de la cadena de conexión para Classic ADO/ODBC/Oracle 10g EZConnect

Question

Estoy intentando conectar varios proyectos de VBA a un back-end de Oracle 10g usando ADO (2.8) y sin TNS. Después de varios intentos, hemos decidido que la serie paso más simple para una instalación limpia incluyen:

1. configuración de un cliente Oracle Instant
2. Instalar el controlador ODBC de acompañamiento
3. (Prueba de la conexión utilizando EZConnect a través SQL Plus)
4. (Probar la conexión mediante la creación de un DSN de Windows)

Todo hasta aquí funciona bien. El problema es que no puedo entender la sintaxis para decirle a ADO que use el cliente instantáneo controlador ODBC, que aparece en mi lista de controladores ODBC como "Oracle en MyTest" (sin comillas). El uso del controlador ODBC de MSFT con EZConnect como this post sugiere que no funciona mejor de lo que lo hacía antes de configurar el cliente instantáneo (es decir, no del todo). Pero this post parece sugerir que es posible, sin indicar exactamente cómo y connectionstrings.com sólo le dice lo que la parte de origen de datos de la cadena se parece, es decir CiertoUsuario/SomePassword @ ASERVER: PortNumber/nombreDeInstancia

versión corta: ¿Cuál es el sintaxis exacta de una cadena de conexión ADO clásica que hace referencia a un controlador ODBC de cliente instantáneo?

Gracias de antemano por su ayuda. Me llevó mucho tiempo estúpida para ponerse en marcha con SO ...

Answer 1

Prueba esto y reemplazar los valores según sea apropiado:

Set Connection = CreateObject("ADODB.Connection") 

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

Si Oracle en instantclient no funciona comprobar el HKEY_LOCAL_MACHINE \ SOFTWARE \ ODBC \ ODBCINST.INI \ ODBC Drivers clave de registro para ver cuál es el valor de Oracle Instant Client (puede haber un número de versión adjunto).

Si esto todavía no funciona para usted. Deja un comentario con los detalles de lo sucedido e intentaré ajustar la respuesta por ti.

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

similares a 'La respuesta de user1206604 - puedo configurar una conexión ODBC mediante el Administrador de orígenes de datos ODBC (por el bien de ejemplo vamos a nombramos 'DEMO') y conectar de esta manera:

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 

El administrador de orígenes de datos ODBC se encuentra (en mi máquina) en el menú inicio> Programas> Oracle - oraClient10g> configuración y migración Herramientas> administrador de ODBC Microsoft y se ve así: