Mensajes

Pues creo que tienes razón.
Voy a probarlo.
Muchas gracias por tu ayuda, a veces se bloquea uno y no ve bien el camino.
Gracias de nuevo y un saludo.

y tbaccesos2 se refiere a la tabla de la segunda conexión, es que había cambiado los nombres de las tablas para que fuera más claro y al final ha resultado que no he liado.
No hay más instrucciones, da error al ejecutar la consulta, porque lo que no le gusta es la sintaxis de cómo llamo a la tabla de la segunda base para importarla a la primera.

Por ejemplo, la tabla clientes se creará vacía, pero la tabla tipos de cliente tiene que estar llena, y la tabla plan de cuentas también, y la tabla forma de pago, plazos de pago, etc. tienen que estar llenas y no vacías como la de clientes.
Como en otro servidor, tengo esas tablas llenas, pues la idea era copiar la tablas, en vez de pegar los registros uno a uno.

Es un procedimiento que se va a usar sólo en el caso de que se acaben de crear las bases de datos vacías y, de esa forma, se llenen las tablas que tienen que tener una serie de datos por defecto.
Si no me explico bien te ruego me disculpes, pero lo que necesito es que, al abrir el sistema, si se han tenido que crear las tablas porque no existen, además de crear las tablas que tienen que estar vacías, copie las que tienen que estar llenas desde otro servidor.
Y eso es lo que no consigo, porque registro a registro ya lo tengo, pero es muy muy muy lento.
Gracias.

Si hago un recordset de cada fila y la voy insertando a la otra base de datos, se me eterniza, porque hay muchos datos a pasar.
Por eso creí que haciando una copia de un servidor a otro, la operación sería bastante más rápida, no te parece?

Buenos días.
Soy nueva en elhacker, así que disculpadme si algo no hago bien.

Se me presenta un problema a la hora de obtener datos de una base situada en un servidor para pasarlos a otra base de otro servidor.

El código es el siguiente:

    On Error Resume Next
    strConexion1 = "DRIVER={MySQL ODBC 3.51 Driver};SERVER=zz.zzz.zzz.zz;DATABASE=NombreBase;USER=Usuario;PASSWORD=Psw"
    strConexion2 = "DRIVER={MySQL ODBC 3.51 Driver};SERVER=xx.xxx.xxx.xx;DATABASE=NombreBase;USER=Usuario;PASSWORD=Psw"
    Dim cAbantisDB As New ADODB.Connection
    Dim cABDat As New ADODB.Connection
    cABDat.open strConexion1
    cAbantisDB.open strConexion2
    If Err.Number <> 0 Then
     'error
     Exit Sub
    End If   
    cABDat.Execute "INSERT INTO Tabla SELECT * FROM cAbantisDB.dbo.Tabla"
    Debug.Print Err.Description

Devuelve error:
[MySQL][ODBC 3.51 Driver][mysqld-5.1.73]You have an error in your SQL syntax; check the manual that corresponds to your MySQL server version for the right syntax to use near '.tbAccesos2' at line 1

Sé que el problema lo tengo al llamar a cAbantisDB, pero no sé cómo incluirlo dentro de la consulta sql.
He mirado el manual, he buscado por la web, pero no consigo dar con la solución.

Alguien podría echarme una mano?