Programación General > Visual Basic 6.0 e inferiores

 Form_unload No Me Resulta!!!!

(1/2) > >>

mi69:
Hola.

Estoy trabajando con un Form que tiene un DataGrid. La idea es que si en el campo "Option" hay registros con el valor "Modificar registro", no permita que el usuario cierre el formulario hasta que el registro sea modificado, pero esto solo me resulta si el registro que tiene el foco presenta ese valor.
Como puedo hacer para que busque en todo el recordset antes de cerrar, no solo en el registro que tiene el foco?

Este es el código que uso.
Gracias :kicking:



Private Sub Form_Unload(Cancel As Integer)

If miRecordset.Recordset.Fields("Option").Value = "Modificar registro" Then
MsgBox "No puede cerrar este formulario" _
+ Chr(10) + "hay registros sin modificar", vbCritical, "Error"
Cancel = True
Else
Unload Me
End If
End Sub

Sagutxo:
Salu2. me resulta curioso esto:

si la funcion es:
Private Sub Form_Unload(Cancel As Integer)

para que un Unload me? se supone que eso es por si quieres hacer algo antes de que cierre el form. o Bien cancelar el cierre.

Por lo demas no se que te puede estar pasando lo siento.
 :comp:

RadicalEd:
DEJALO ASI:

--- Código: Text --- Private Sub Form_Unload(Cancel As Integer)If miRecordset.Recordset.Fields("Option").Value = "Modificar registro" ThenCancel = TrueMsgBox "No puede cerrar este formulario" _+ Chr(10) + "hay registros sin modificar", vbCritical, "Error"End IfEnd Sub  OJALA TE SIRVA.
CHAO

Anderea:
Yo creo que además de las otras cosas deberias probar con
miRecorset.recorset.find(("nombre del campo = Valor")
luego revisa así:
If miRecorset.recorset.EOF = False Then
    "no debes salirte"
else
    "salte"
End If
porque el find lleva al recorset a eof = true si no encuentras lo que andas buscando
ojala te sirva toda nuestra ayuda

Brroz:
Hola.

Como complemento a estas cosas, te recomendaría utilizar el evento QueryUnload del formulario que se desencadena justo antes del Unload pero que permite controlar la causa por la que el formulario es descargado mediante el parámetro UnloadMode, aunque en tu caso ésto tal vez te sea indiferente.

Abur.

Navegación

[0] Índice de Mensajes

[#] Página Siguiente