mainform and subform (entering data)

[mseo]

hi,
I have mainform with two cmdbuttons:
1- Save
2- Add Detail
the mainform has subform which is set to invisible, if I click Add Detail the subform appears, if not and user clicked Save the fields in the mainform will move to new blank record without having any details
what I need to do, when the user click save and the fields in the subform is not filled, In this case I need the save action (moving to next blank record) to be cancelled
I had some suggestion that prompt me to write the code. if the subform visible make the save button enabled if invisible make it disabled , but when I did so, I found that the user click Add Detail to make the subform appeared then click Save
so I need to cancel or delete the data saved in the mainform if the subform has no record.
because when I move the focus from the mainform to the subform the data in the mainform will be already saved after the focus on the subform, even if the user click exit the data in the mainform will be still saved, and this will be big problem for me.because of two reasons:
1- as soon as the user click save record selector will move to new record.
2- if click Exit the form will be closed and mainform data will be still saved
so I need to do this:
1- if click save and subform with no data then setfocus the subform, if subform filled , move to add new record
2- if click exit and subform with no data then delete the data saved in the mainform, if not, delete all the data in mainform and subform
please I need any help with this
appreciate any suggestions

[slenish]

Hi Mseo,

I will try to help you out with some of this. What you can do is try this code in your main form or your subform on close or if a command button is clicked to close the form. You set it to check if any boxes are left blank, if so then it will propt the user that it if they close the form it will delete all the information, and you wont get a blank record. The middle line that starts with (Forms! ) this is so you can reset the focus of the cursor back to your main form or sub form and a text box/ combo box you choose.

Hope this helps :)

Private Sub Form_Close()
On Error GoTo Err_Form_Close
 
If Me.(TextBox) = "" Then
DoCmd.RunCommand acCmdUndo
Cancel = True
Response = acDataErrContinue
End If
 
Forms!YourMainForm!YourTextBox.SetFocus
 
Exit_Form_Close:
    Exit Sub
 
Err_Form_Close:
    MsgBox Err.Description
    Resume Exit_Form_Close
 
 
End Sub
 

[mseo]

@slenish
ok, slenish
thank you
but as soon as I lost the focus of the mainform and moved to the subform, that means that the data that inserted into the mainform is saved, and setfocus back to mainform that doesn't mean that i can easly delete the data saved or cancel the action.

[mseo]

I need any suggestion about if I click Exit I want to delete the data entered in the mainform and sub form if I setfocus on the subform which means cancel the entire data entry operation
appreciate any suggestions

[slenish]

Mseo,

Try using this same code in your Private Main Form_Close function.

Just take out the SetFocus part since you dont need to set any focus. Try using it in both parts so if you close either the main form or just the sub form it should delete the information for both.

[mseo]

hi,
I need to do this on Exit cmdbutton
if I click Exit and mainform is filled then undo the entred data in the mainform and it is quite simple to be done
but the dilemma, what about if i setfocus on the subform after filling the mainform?
as soon as I setfocus on the subform the data in the mainform is already saved, so if I want to click Exit to cancel the entire data entry operation ( mainform and subform)how can I delete the entered data in the mainform on click exit
in other words
on click exit I need to delete the data in mainform and subform
thanks