abrir 2 bases de datos paralelas at. Miguel A Nievas

miguel gracias por tu interes este es el codigo, te que comentaba,

Dim myconexion1 As New MySqlConnection()
myconexion1.ConnectionString = "server=miservidorenred;initial
catalog=mibase1;user id=root;password=;"
myconexion1.Open()


Dim myconexion2 As New MySqlConnection()
myconexion2.ConnectionString = "server=localhost;initial
catalog=mibase2;user id=root;password=;"
myconexion2.Open()

Dim comando As New MySqlCommand()



comando.CommandText = "INSERT INTO mibase1.tabla( No_Tienda, Upc,
Existencia ) SELECT No_Tienda,Upc,Existencia FROM mibase2.tabla"



comando.ExecuteNonQuery()

myconexion1.Close()
myconexion2.Close()