I assumed you're using a bound form.
'// Save Record
DoCmd.DoMenuItem acFormBar, acRecordsMenu, acSaveRecord, , acMenuVer70
'// Confirm if wish to continue to add new record
Dim intMsg As Integer
intMsg = MsgBox("Record has been saved. Do you want to continue to add
new
record?", vbQuestion + vbYesNo, "Confirm")
If intMsg = vbNo Then
'// no more action
Else
DoCmd.GoToRecord , , acNewRec
me.txtYourCommentsField.setfocus
End If
HTH,
George
-----Original Message-----
From: AccessDevelopers@yahoogroups.com
[mailto:[EMAIL PROTECTED] Behalf Of Margaret
Sent: Wednesday, November 02, 2005 2:32 AM
To: AccessDevelopers@yahoogroups.com
Subject: [AccessDevelopers] Command Button Question
I am designing a very, very simple "comment sheet" that people will
type a comment in and then hit the "Submit" button to save their
comments. This I have done fine - even with my EXTREMEMLY limited
Access experience. However, the way my form is right now, it merely
saves the record and just sits there. I want the command button to
save the record and then refresh the screen so a new record can be
added. I don't want to have another command button, is there anyway
to have all of those operations exist on one button?? - Many thanks -
ME
Please zip all files prior to uploading to Files section.
Yahoo! Groups Links
------------------------ Yahoo! Groups Sponsor --------------------~-->
Get Bzzzy! (real tools to help you find a job). Welcome to the Sweet Life.
http://us.click.yahoo.com/A77XvD/vlQLAA/TtwFAA/q7folB/TM
--------------------------------------------------------------------~->
Please zip all files prior to uploading to Files section.
Yahoo! Groups Links
<*> To visit your group on the web, go to:
http://groups.yahoo.com/group/AccessDevelopers/
<*> To unsubscribe from this group, send an email to:
[EMAIL PROTECTED]
<*> Your use of Yahoo! Groups is subject to:
http://docs.yahoo.com/info/terms/
