Ver Mensaje Individual
  #5 (permalink)  
Antiguo 29/05/2009, 04:42
Pinty
 
Fecha de Ingreso: febrero-2009
Mensajes: 472
Antigüedad: 15 años, 11 meses
Puntos: 14
Respuesta: Actualizar en dos bases de datos en diferente servidor

Por supuesto que te explico, para eso estamos jejeje. Pues mira lo que se puede hacer es una consulta de selección de dos tablas en dos bases de datos cuando amba estan en el mismo servidor. Seria asi:

Código:
SELECT * FROM BaseDatos1.dbo.TuTabla T1 
INNER JOIN BaseDatos2.dbo.TuTabla T2 
ON T1.Campo = T2.Campo
Pero en tu caso lo que querias hacer si mal no entiendo es esto mismo pero con dos servidores diferentes. Hay una forma de hacerlo viculando el segundo servidor al primero y haciendo la consulta de seleccion, pero yo creo que es mas sencillo hacer dos comandos por separado tal que asi.

Código:
IMPORTS system.data
IMPORTS system.data.sqlclient

sub cargar_datos()
 Dim comando As New SqlCommand
 Dim conexion1 As New SqlConnection
 Dim conexion2 As New SqlConnection
 Dim ds As New DataSet
 Dim da As New SqlDataAdapter
 Dim ds2 As New DataSet
 Dim da2 As New SqlDataAdapter

 conexion1.ConnectionString = "cadena de conexion a la primera base de datos"
 conexion2.ConnectionString = "cadena de conexion a la segunda base de datos"

 comando.Connection = conexion1
 comando.CommandText = "SELECT * FROM tabla1"
 conexion1.Open()
 ds.SelectCommand = comando
 da.Fill(ds, "datos")
 conexion1.Close()

 'con esto ya tendrias los datos de la base de datos 1, ahora harias lo mismo para la segunda base de datos

 comando.Connection = conexion2
 comando.CommandText = "SELECT * FROM tabla1"
 conexion2.Open()
 ds2.SelectCommand = comando
 da2.Fill(ds2, "datos")
 conexion2.Close()

end sub
Mas o menos esta es la idea, espero que te sirva de ayuda. Mucha suerte

Un saludo.

Pinty