Actualizar BD con otra BD desde VB6
Publicado por Sebastian (1 intervención) el 18/02/2005 18:48:21
Hola Amigos!
Como puedo hacer para actualizar (agregar o modificar) una base de datos access con otra base de datos.
Las dos bases de datos son iguales.
Lo que necesito es ir pasando la informacion de las nuevas ventas a la base central, como tambien cambiar algun dato ya existente.
Hasta el momento estoy agregando la informacion nueva bien, pero cuando hace el Refresh salta un error ("La operacion no esta permitida si el objeto esta cerrado").
les paso la consulta
AdoNuevos.ConnectionString = "Provider=Microsoft.Jet.OLEDB.3.51;Persist Security Info=False;Data Source=" & lblUbicacionBoletaDestino.Caption
AdoNuevos.RecordSource = "INSERT INTO [SER-BRE1] SELECT [SER-BRE1].* FROM [SER-BRE1] IN '" & lblUbicacionBoleta.Caption & "' WHERE [SER-BRE1].[BRE-NUMERO] Not In (SELECT [BRE-NUMERO] FROM [SER-BRE1])"
AdoNuevos.Refresh
lblUbicacionBoleta.Caption es la ubicacion de la base Origen
lblUbicacionBoletaDestino.Caption es la ubicacion de la base Destino
Tambien me falta hacer la consulta para actualizar la informacion ya existen (si es que tiene cambios).
Espero que alguien me pueda ayudar, Saludos a todos
Como puedo hacer para actualizar (agregar o modificar) una base de datos access con otra base de datos.
Las dos bases de datos son iguales.
Lo que necesito es ir pasando la informacion de las nuevas ventas a la base central, como tambien cambiar algun dato ya existente.
Hasta el momento estoy agregando la informacion nueva bien, pero cuando hace el Refresh salta un error ("La operacion no esta permitida si el objeto esta cerrado").
les paso la consulta
AdoNuevos.ConnectionString = "Provider=Microsoft.Jet.OLEDB.3.51;Persist Security Info=False;Data Source=" & lblUbicacionBoletaDestino.Caption
AdoNuevos.RecordSource = "INSERT INTO [SER-BRE1] SELECT [SER-BRE1].* FROM [SER-BRE1] IN '" & lblUbicacionBoleta.Caption & "' WHERE [SER-BRE1].[BRE-NUMERO] Not In (SELECT [BRE-NUMERO] FROM [SER-BRE1])"
AdoNuevos.Refresh
lblUbicacionBoleta.Caption es la ubicacion de la base Origen
lblUbicacionBoletaDestino.Caption es la ubicacion de la base Destino
Tambien me falta hacer la consulta para actualizar la informacion ya existen (si es que tiene cambios).
Espero que alguien me pueda ayudar, Saludos a todos
Valora esta pregunta
0