Show a message without the prompts

[coach32]

I have a form that operatives enter details into and when they enter information
into the final field (which they must do), the database shuts down.
Is it possible to show a message "Record Added" just before the database closes


that doesn't require the operative to click okay?
I know I can create a small pop up form with 'Record added' on it, but I was just
wondering if a message box can show briefly before closing itself.

[ranman256]

you must click away to trigger the afterupdate event.
THEN the message can show.

sub txtFinalBox_afterupdate()
   msgbox "Record Added"
   docmd.quit
end sub

[Missinglinq]

The OP doesn't want the users to have to click to close the Messagebox...and the answer to that is 'no.' As you suggested, you'll have to create a Form and with a Timer event close it after X number of seconds.

The code to close it is simple. Assuming that the Form is named RecordAddedForm...

Private Sub Form_Load()
   TimerInterval = 3000
End Sub

Private Sub Form_Timer()
   DoCmd.Close acForm, "RecordAddedForm"
End Sub

An Interval of 3000 is for 3 seconds, but it sometimes takes a second or two before the Timer kicks in, so adjust that as you wish!

You'll need to open RecordAddedForm as you unload your primary Form.

Linq ;0)>

[ranman256]

Then you don't need the message.

[rpeare]

Just add a TEXT BOX to the bottom of your screen

when the record is saved just do something like


me.SaveMessageTextBox = "RECORD WAS SAVED"
doevents

then close your database.

Then the message isn't a message box, but the user can still see it before you close. Though as missling pointed out, it may be so fast the user won't see it and then you would have to add a timer event to the close function.

[coach32]

Thank you very much. I will give the new Form and Timer a go.