Problema con Traspaso datos

17/02/2005 - 19:15 por Bluemoon | Informe spam
Hola, tengo creada una base de datos en Acces que obtienia los registros
traspasandolos de otra base, en sql, mediante lo siguiente:

With QNotFacturacion
.Connect = "ODBC;DATABASEÞSPACHO;UID=sa;PWD=;DSN=MQIS"
Rem .SQL = "SELECT * FROM Facturacion WHERE ID_FACTURACION>449
ORDER BY ID_FACTURACION"
Rem FUNCIONA BIEN .SQL = "SELECT
ID_FACTURACION,ANIO,NUMERO,ID_GESTOR,FECHA_FACTURA,ID_CLIENTE,ID_DOCUMEN
TO,BASE_SIN_IVA,BASE_IVA,TIPO_IVA,CUOTA_IVA,BASE_RETENCION,TIPO_RETENCIO
N,IMPORTE_RETENCION FROM Facturacion WHERE ID_FACTURACION>=" & Str
$(UltimoIdTraspasado) & " ORDER BY ID_FACTURACION ASC"
.SQL = SQ1$ & SQ2$ & SQ3$
Set TNotFacturacion = .OpenRecordset()

Acabo de actualizar mi Office XP al SP 3 y este traspaso de registros,
que antes funcionaba correctamente, ahora ha dejado de funcionar y me
sale el siguiente mensaje (cuando intento el traspaso): "Se ha producido
el error '3151' en tiempo de ejecucion: ODBC: error al conectar con
'MQIS'. Si le doy a depurar, se me abre el Visual Basic y me marca en
amarillo Set TNotFacturacion = .OpenRecordset()

¿Alguna solucion? (al margen claro esta de desinstalar el SP3)

Un saludo
 

Leer las respuestas

#1 Pilar Mueckay [MVP - Office]
18/02/2005 - 03:22 | Informe spam
'MQIS'. Si le doy a depurar, se me abre el Visual Basic y me marca en
amarillo Set TNotFacturacion = .OpenRecordset()



Referencia DAO?

Mejor ayuda recibirás en el grupo especializado de Access
News://news.microsoft.com/microsoft....es.access

menteAtenta,
Pilar Mueckay
MVP - Office
Ecuador



"Bluemoon" wrote in message news::
Hola, tengo creada una base de datos en Acces que obtienia los registros

traspasandolos de otra base, en sql, mediante lo siguiente:

With QNotFacturacion
.Connect = "ODBC;DATABASEÞSPACHO;UID=sa;PWD=;DSN=MQIS"
Rem .SQL = "SELECT * FROM Facturacion WHERE ID_FACTURACION>449
ORDER BY ID_FACTURACION"
Rem FUNCIONA BIEN .SQL = "SELECT
ID_FACTURACION,ANIO,NUMERO,ID_GESTOR,FECHA_FACTURA,ID_CLIENTE,ID_DOCUMEN
TO,BASE_SIN_IVA,BASE_IVA,TIPO_IVA,CUOTA_IVA,BASE_RETENCION,TIPO_RETENCIO
N,IMPORTE_RETENCION FROM Facturacion WHERE ID_FACTURACION>=" & Str
$(UltimoIdTraspasado) & " ORDER BY ID_FACTURACION ASC"
.SQL = SQ1$ & SQ2$ & SQ3$
Set TNotFacturacion = .OpenRecordset()

Acabo de actualizar mi Office XP al SP 3 y este traspaso de registros,
que antes funcionaba correctamente, ahora ha dejado de funcionar y me
sale el siguiente mensaje (cuando intento el traspaso): "Se ha producido

el error '3151' en tiempo de ejecucion: ODBC: error al conectar con
'MQIS'. Si le doy a depurar, se me abre el Visual Basic y me marca en
amarillo Set TNotFacturacion = .OpenRecordset()

¿Alguna solucion? (al margen claro esta de desinstalar el SP3)

Un saludo

Preguntas similares