MERGE NO FUNCIONA... URGENTE, LLEVO UNA SEMANA CON EL PROBLEMA

21/03/2005 - 17:20 por kirck | Informe spam
Hice un proyecto desde 0 con un solo formulario y 3 botones

Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As
System.EventArgs) Handles MyBase.Load

Me.OleDbDataAdapter1.Fill(Me.DsMdb1) ' Este guarda mi tabla hecha en access

Me.SqlDataAdapter1.Fill(Me.DsSQL1, "CtrlEmb") 'Este guarda mi tabla heca en
sqlServer

End Sub

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As
System.EventArgs) Handles Button1.Click

Me.DsSQL1.Merge(Me.DsMdb1)

End Sub

Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As
System.EventArgs) Handles Button2.Click

Me.DsSQL1.AcceptChanges()

End Sub

Private Sub Button3_Click(ByVal sender As System.Object, ByVal e As
System.EventArgs) Handles Button3.Click

Me.SqlDataAdapter1.Update(Me.DsSQL1, "CtrlEmb")

End Sub

Preguntas similare

Leer las respuestas

#1 Marcos Mellibovsky
26/03/2005 - 15:04 | Informe spam
No entiendo bien que queres hacer, si presionas el boton 1 hacer el Merge.
Si luego presionas el 2 al hacer el acceptchanges estas impiediendo que el
update del boton 3 actualice registros porque con acceptchages le decis que
ya estan actualizados

si lo que queres es pasar registros
Marcos Mellibovsky
MCAD - MCSD - MCSE - MCDBA
Cordoba - Argentina del msb as sql presiona el 1 y luego el 3

Saludos

"kirck" escribió en el mensaje
news:
Hice un proyecto desde 0 con un solo formulario y 3 botones

Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As
System.EventArgs) Handles MyBase.Load

Me.OleDbDataAdapter1.Fill(Me.DsMdb1) ' Este guarda mi tabla hecha en


access

Me.SqlDataAdapter1.Fill(Me.DsSQL1, "CtrlEmb") 'Este guarda mi tabla heca


en
sqlServer

End Sub

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As
System.EventArgs) Handles Button1.Click

Me.DsSQL1.Merge(Me.DsMdb1)

End Sub

Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As
System.EventArgs) Handles Button2.Click

Me.DsSQL1.AcceptChanges()

End Sub

Private Sub Button3_Click(ByVal sender As System.Object, ByVal e As
System.EventArgs) Handles Button3.Click

Me.SqlDataAdapter1.Update(Me.DsSQL1, "CtrlEmb")

End Sub


Respuesta Responder a este mensaje
#2 kirck
28/03/2005 - 17:43 | Informe spam
efectivamente, el segundo boton no lo utilizo y solo lo hice para probar,
pero aun cuando uso los botones 1 y 3 no se actualiza la base de datos
podrias probar haciendo esto con una tabla acces y una de SQLServer2000 y
verás que el update no hace la operacion
no sé a que se debe, yo lo he probado con otras tablas que tengo y además
he hecho la prueba con el SQLBuilder y el Merge se realiza bien(lo he
comrobado vaciando el DataSet en una Grilla) pero el Update no actualiza mi
tabla.
He estado intentando solucionar este problema ya mas de una semana y media y
aunque sé que podria resolverlo utilizando otros métodos(dataTable agregando
datarow), necesito que sea de esta forma porque debo leuego hacer este
proceso con 30 tablas apróx. y con otras variantes del proceso.
Gracias por la atención prestada ojalá puedas ayudarme a resolver el
problema.


"Marcos Mellibovsky" escribió en el mensaje
news:
No entiendo bien que queres hacer, si presionas el boton 1 hacer el Merge.
Si luego presionas el 2 al hacer el acceptchanges estas impiediendo que el
update del boton 3 actualice registros porque con acceptchages le decis
que
ya estan actualizados

si lo que queres es pasar registros
Marcos Mellibovsky
MCAD - MCSD - MCSE - MCDBA
Cordoba - Argentina del msb as sql presiona el 1 y luego el 3

Saludos

"kirck" escribió en el mensaje
news:
Hice un proyecto desde 0 con un solo formulario y 3 botones

Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As
System.EventArgs) Handles MyBase.Load

Me.OleDbDataAdapter1.Fill(Me.DsMdb1) ' Este guarda mi tabla hecha en


access

Me.SqlDataAdapter1.Fill(Me.DsSQL1, "CtrlEmb") 'Este guarda mi tabla heca


en
sqlServer

End Sub

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As
System.EventArgs) Handles Button1.Click

Me.DsSQL1.Merge(Me.DsMdb1)

End Sub

Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As
System.EventArgs) Handles Button2.Click

Me.DsSQL1.AcceptChanges()

End Sub

Private Sub Button3_Click(ByVal sender As System.Object, ByVal e As
System.EventArgs) Handles Button3.Click

Me.SqlDataAdapter1.Update(Me.DsSQL1, "CtrlEmb")

End Sub






email Siga el debate Respuesta Responder a este mensaje
Ads by Google
Help Hacer una preguntaRespuesta Tengo una respuesta
Search Busqueda sugerida