Cannot Add New Record

[Anthony Law]

Using: Access 2000
----------------------------
When in run mode, my cmdAddNew button dosen't work.
Here's my code:

------------------------------------
Private Sub cmdAddNew_Click()
On Error GoTo Err_cmdAddNew_Click


DoCmd.GoToRecord , , acNewRec
DoCmd.Requery

Exit_cmdAddNew_Click:
Exit Sub

Err_cmdAddNew_Click:
MsgBox Err.Description
Resume Exit_cmdAddNew_Click

End Sub
-----------------------------------------------
My database has 1 table, 2 forms (one is a switchboard)
and 1 query. Prior to this problem I had tried setting
the locking paramenters for my form so that when a user is
editing a record, said record is locked to everyone else.
Well that didn't work and as a result of my tampering, I
cannot add a new record while in run mode.


........this is what happens when I don't use the K.I.S.S.
approach to database programming! ;-)

 

[Allen Browne]

Drop the Requery.
It will send the form back to the first record again.