Forms and cancelling updates

[Samuel Hon]

Hi All

I'm trying to add an Save/Cancel feature to my forms so that users can
make changes and then reverse them if they so decide.

I've disabled the close button and blocked the Alt-F4 combination so
that the only way to exit the form is to the use the Save/Cancel
buttons

The Save button is straight-forward using DoCmd.Close....

However, the Cancel button is proving to be a bit of a pig. I'm using
ideas from
http://support.microsoft.com/?kbid=197103
but it doesnt mention a Cancel so I'm using

MsgBox("Do you want to save?", vbInformation + vbYesNoCancel, "Save
Record")

The Yes/No is easy to do, but the vbCancel response is not. As one of
the guys says in
http://www.experts-exchange.com/Data..._20810844.html

"if you close the form and hit Cancel and the record is in reality
saved. " ... "in the meantime you will get the message box but if you
hit no you will be stuck with the record that was saved when you hit
cancel."

Does anyone have any ideas on how to implement a decent cancel
rountine?

Thanks in advance

Sam

[MGFoster]

-----BEGIN PGP SIGNED MESSAGE-----
Hash: SHA1

Seems easy to me:

const strMSG = "Do you want to save?"

dim intAnswer as integer

intAnswer = MsgBox(strMSG, vbInformation + vbYesNoCancel)

Select Case intAnswer
Case vbYes
DoCmd.RunCommand acCmdSave
Case vbNo
Me.Undo
Case vbCancel
' Don't do anything
End Select
If Cancel is selected - that means cancel the save and cancel close -
in effect - Don't Do Anything.

HTH,

MGFoster:::mgf00 <at> earthlink <decimal-point> net
Oakland, CA (USA)

-----BEGIN PGP SIGNATURE-----
Version: PGP for Personal Privacy 5.0
Charset: noconv

iQA/AwUBQAwuPYechKqOuFEgEQKfegCfWabiRAjNRe2LFoq8qPiQbm bB0cUAoIt5
/S21b/pu47hctjfyqbpPieWA
=OlBD
-----END PGP SIGNATURE-----
Samuel Hon wrote:

Hi All

I'm trying to add an Save/Cancel feature to my forms so that users can
make changes and then reverse them if they so decide.

I've disabled the close button and blocked the Alt-F4 combination so
that the only way to exit the form is to the use the Save/Cancel
buttons

The Save button is straight-forward using DoCmd.Close....

However, the Cancel button is proving to be a bit of a pig. I'm using
ideas from
http://support.microsoft.com/?kbid=197103
but it doesnt mention a Cancel so I'm using

MsgBox("Do you want to save?", vbInformation + vbYesNoCancel, "Save
Record")

The Yes/No is easy to do, but the vbCancel response is not. As one of
the guys says in
http://www.experts-exchange.com/Data..._20810844.html

"if you close the form and hit Cancel and the record is in reality
saved. " ... "in the meantime you will get the message box but if you
hit no you will be stuck with the record that was saved when you hit
cancel."

Does anyone have any ideas on how to implement a decent cancel
rountine?

Thanks in advance

Sam