Ver Mensaje Individual
  #4 (permalink)  
Antiguo 07/09/2011, 12:26
Avatar de gasuton
gasuton
 
Fecha de Ingreso: octubre-2010
Ubicación: Abandonware
Mensajes: 132
Antigüedad: 14 años, 5 meses
Puntos: 2
Exclamación Respuesta: Mensaje VBYesNO al reponder

Ya lo solucione den por cerrado el tema, Muchachos sobre todo los nuevos como yo, usemos mas el MSDN de visual la ayuda realmente si funciona.

como lo solucione?, de la siguiente manera:

Código:
Private Sub guardar_Click()

mensaje = MsgBox("Esta seguro que quiere guardar los datos?", vbYesNo, "ABM Grupos")

If mensaje = vbYes Then
grupo.Recordset.Update
mensaje = MsgBox("Los datos han sido actualizados!", vbInformation, "ABM Grupos")
Else: grupo.Recordset.CancelUpdate
      grupo.Recordset.MoveNext
        If grupo.Recordset.EOF Then
        grupo.Recordset.MoveLast
        End If
End If

End Sub
Simplemente modifique la opcion delete por cancelupdate

Saludos.