Add a new record then open the next form with the same button.

[abradab]

Hi all
I am having a problem in getting my Access 2000 program to work in the way I need it to the source code below is to enter data in a table (simple stuff) but I need it to open the next form ONLY if DoCmd.GoToRecord , , acNewRec = TRUE. I have tried different source codes and even looking at MS Access guilds with no luck


Private Sub Command224_Click()
On Error GoTo Err_Command224_Click


DoCmd.GoToRecord , , acNewRec

Exit_Command224_Click:
Exit Sub

Err_Command224_Click:
MsgBox Err.Description
Resume Exit_Command224_Click

End Sub


VISUAL IDEA OF WHAT I NEED (this code doesn’t work it’s just to give an idea).

Private Sub Command224_Click()
On Error GoTo Err_Command224_Click

DoCmd.GoToRecord , , acNewRec

IF DoCmd.GoToRecord , , acNewRec = True then

DoCmd.OpenForm "Preparation"

Exit_Command224_Click:
Exit Sub

Err_Command224_Click:
MsgBox Err.Description
Resume Exit_Command224_Click

End Sub

Any Help will be great thank you :)

[pks00]

If this is a bounded form then u can use Me.NewRecord

If Me.NewRecord = True then
msgbox "Yo, we are in add mode"
end if

[abradab]

Thanks for your help

i got it working using this code:

Private Sub Command224_Click()
On Error GoTo Err_Command224_Click


DoCmd.DoMenuItem acFormBar, acRecordsMenu, acSaveRecord, , acMenuVer70

DoCmd.OpenForm "Preparation"

Exit_Command224_Click:
Exit Sub

Err_Command224_Click:
MsgBox Err.Description
Resume Exit_Command224_Click

End Sub

It aollows the user to save the record and open the next form with one button PERFECT! only took me 2hrs to figure it out :)