Visual Basic - tablas

Life is soft - evento anual de software empresarial
 
Vista:

tablas

Publicado por alexis robayna hernandez (17 intervenciones) el 16/09/2003 13:38:42
quiero pasar los datos de una tabla de una base de datos a otra tabla de otra base de datos como hacerlo
urgente
gracias
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder
sin imagen de perfil
Val: 109
Ha mantenido su posición en Visual Basic (en relación al último mes)
Gráfica de Visual Basic

RE:tablas

Publicado por Yamil Bracho (226 intervenciones) el 16/09/2003 17:25:17
Creas dos objetos Connection cada uno apuntado a su BD respectiva. EN base a estas conexiones creas dos recordsets, uno de lectura y el otro actualizable. Seria algo como

Set cnOrigen = new ADODB.Connection
Set rsOrigen = new ADODB.Recordset
Set cnDestino = new ADODB.Connection
Set rsDestino = new ADODB.Recordset

cnOrigen.Open("ConnectionString_Base_Datos_Origen")
cnDestino.Open( "ConnectionString_Base_Datos_Destino")

rsOrigen.Open "SELECT * FROM TablaOrigen", cnOrigen, adOpenForwardOnly, adLockreadOnly
rsDestino.Open "SELECT * FROM TuTablaDestino", cnDestino,adOpenStatic, adLockOptimistic

Do Until rsOrigen.EOF
rsDestino.AddNew
rsDestino.Fields("Campo1" ) = rsOrigen.Fields("Campo1")
...
rsDestino.Update
rsOrigen.Update
Loop
rs.Origen.Close : Set rsOrigen = nothing
rsDestino.Close : Set rsDestino = nothing
cnOrigen.Close: Set cnOrigen = nothing
cnDestino.Close: Set cnDestino = Nothing

Otra manera de hacerlo es armando un SQL y ejecutando contra la conexion destino

Saludos
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar