Ver Mensaje Individual
  #1 (permalink)  
Antiguo 03/05/2015, 09:57
xc0d3
 
Fecha de Ingreso: mayo-2015
Ubicación: Santander
Mensajes: 2
Antigüedad: 9 años
Puntos: 0
Insert into dos bases de datos externas

Hola tengo un problema quiero hacer un ISERT INTO de dos bases de datos externas

Tengo la base de datos 1.mdb y 2.mdb
En la base de datos 1.mdb tengo Usuarios
En la base de datos 2.mdb tengo Usuario con los registros

Esto lo quiero hacer en VB.NET

He echo esto pero no hay manera de que funcione

Código:
Private Sub Migracion_Click(sender As Object, e As EventArgs) Handles Migracion.Click
        Dim conectar As New OleDb.OleDbConnection
        Dim conectar2 As New OleDb.OleDbConnection
        conectar.ConnectionString = "Provider=Microsoft.ACE.OLEDB.15.0;Data Source=E:\1.mdb;Persist Security Info=False"
        conectar2.ConnectionString = "Provider=Microsoft.ACE.OLEDB.15.0;Data Source=E:\2.mdb;Persist Security Info=False"
        Try
            conectar.Open()
            conectar2.Open()
            cmd = New OleDbCommand("INSERT INTO Usuarios SELECT * FROM  Usuario ", conectar)
            cmd.ExecuteNonQuery()
            conectar.Close()
            conectar2.Close()
        Catch ex As Exception
            MsgBox(ex.Message)
        End Try
    End Sub
Gracias