SoloCodigo
CLR: .Net / Mono / Boo / Otros CLR => VB .NET => Mensaje iniciado por: dubiweb en Sábado 4 de Julio de 2009, 06:27
-
Try
Dim pregunta As String
pregunta = MsgBox("Desea Actualizar sus Datos", MsgBoxStyle.YesNo + MsgBoxStyle.Information, "Manteni")
If pregunta = vbYes Then
Me.DbProdBindingSource.EndEdit()
Me.DbProdTableAdapter.Update(Me.VistaProductosMant eni.dbProd)
Me.VistaProductosManteni.AcceptChanges()
MsgBox("Datos Actualizados Perfectamente", MsgBoxStyle.Information, "Manteni")
Call Me.DesabilitadosManteni()
ElseIf pregunta = vbNo Then
Call Me.DesabilitadosManteni()
End If
Catch ex As Exception
MsgBox("Error " + ex.ToString, MsgBoxStyle.Critical, "Error")
End Try
cuando lo ejecuto da la impresion de actualiza pero en la base no se almacena ningun cambio agradeberia la ayuda