Exit without saving Subform

[sk88]

I have a main form and a subform to it.
There is a command button in the main form for 'Exit without saving'. Some of the fields in the main form and subform is in required fields.
Here is the code I have so far:


Private Sub Command31_Click()

If MsgBox("Are you sure you want to exit without saving?", vbQuestion + vbYesNo, "Delete Record") = vbNo Then Exit Sub

Me.Undo

DoCmd.Close
DoCmd.OpenForm FormName:="fdlgSearch"


End Sub

The code works perfectly fine if I have started answering some questions in the main form only but it did not work when I start to answer questions in the subform and when I try to save and exit.

It tells me that I need to answer some fields before I exit. How do I get the subform to be working?

Please help.

Thanks in advance

[RuralGuy]

The SubForm *will* save any changes when you move the focus back to the MainForm. Does that help?

[sk88]

The SubForm *will* save any changes when you move the focus back to the MainForm. Does that help?

Hi RuralGuy... what do you mean by move the focus back to MainForm? Did you mean I should click on to a field in the Mainform then hit the EXIT command? If so, I tried that and it did not work. It tells me that some of the mandatory fields in the subform are not completed. :S

any other thoughts? thanks..

[RuralGuy]

Just attempting to press a button on the MainForm will move the focus to the MainForm and "save" any changes in the SubForm. You will need to think the problem through carefully.

[RuralGuy]

I'm sorry but I did not have a solution for you. My hopes were that with the additional understanding of Access you might be able to develop a better solution; transactions maybe.

[sk88]

I'm sorry but I did not have a solution for you. My hopes were that with the additional understanding of Access you might be able to develop a better solution; transactions maybe.

Thanks RuralGuy... I'll see what I can do..