URGENTE!!2 Bases de datos en una consulta SQL
Publicado por Manrique (3 intervenciones) el 18/11/2004 18:12:50
Estoy intentando Abrir un Recorset con un Join entre dos tablas que estan en dos bases de datos distintas de Access. Primero hago la conexion con ADO y luego el recorset pero me da un error.
Esta es la conexion:
Set Con = New ADODB.Connection
With Con
.Provider = "Microsoft.Jet.OLEDB.4.0"
.Properties("DataSource")= "C:\ARCHENT.mdb"
.Properties("User ID") = "Admin"
.Properties("Password") = ""
.CursorLocation = adUseClient
.Open
End With
Este es la consulta SQL:
sql = "SELECT ARCHENT.Orden, ARCHSAL.Orden AS Orden_1 " & _
"From " & _
Chr(34) & "N:\POUR-UP\SPAC\BASES\ARCHENT" & Chr(34) & ".ARCHENT ARCHENT, " & _
Chr(34) & "N:\POUR-UP\SPAC\BASES\ARCHSAL" & Chr(34) & ".ARCHSAL ARCHSAL " & _
"Where " & _
"ARCHENT.Orden = ARCHSAL.Orden " & _
"AND (ARCHENT.Orden = '2305600') "
Y luego abro el recorset:
Set Rec = New ADODB.Recordset
Rec.Open sql, Con
Pero en el Open me da este error:
-2147217900(80040e14)
Incomplete query clause
Que será lo que no estoy haciendo bien?
De antemano les agradezco su ayuda.
Esta es la conexion:
Set Con = New ADODB.Connection
With Con
.Provider = "Microsoft.Jet.OLEDB.4.0"
.Properties("DataSource")= "C:\ARCHENT.mdb"
.Properties("User ID") = "Admin"
.Properties("Password") = ""
.CursorLocation = adUseClient
.Open
End With
Este es la consulta SQL:
sql = "SELECT ARCHENT.Orden, ARCHSAL.Orden AS Orden_1 " & _
"From " & _
Chr(34) & "N:\POUR-UP\SPAC\BASES\ARCHENT" & Chr(34) & ".ARCHENT ARCHENT, " & _
Chr(34) & "N:\POUR-UP\SPAC\BASES\ARCHSAL" & Chr(34) & ".ARCHSAL ARCHSAL " & _
"Where " & _
"ARCHENT.Orden = ARCHSAL.Orden " & _
"AND (ARCHENT.Orden = '2305600') "
Y luego abro el recorset:
Set Rec = New ADODB.Recordset
Rec.Open sql, Con
Pero en el Open me da este error:
-2147217900(80040e14)
Incomplete query clause
Que será lo que no estoy haciendo bien?
De antemano les agradezco su ayuda.
Valora esta pregunta


0