AddNew buttom not work

[site]

Hi, All,

I have a Access project, and connect to SQL server.
In the form I create "Add New" buttom, but doesn't work.

The following are my codes:

Sub AddNew_Click()
On Error GOTO Err_AddNew_Click

Dim strDocName As String
strDocName = "frmComplaints"
Docmd.OpenForm strDocName, , , , acAdd

ExitAddNew_Click:
Exit Sub

Err_AddNew_Click:
Msgbox Err.Description
Resume Exit_AddNew_Click

End Sub

Hope help.

Thanks a lot.
Jing

 

[jgoodman00]

What message do you get when you try to run this function?

Have you actually assigned the code to the command button so that when it is clicked it actuates this code?? James Goodman
j.goodman00@btinternet.com

 

[site]

Hi, James,

When I click this buttom, nothing come out. What's wrong??

Thank you very much for your advance.
Jing

 

[Chyld]

where you have the text acadd, this needs to change to acaddnewrec!! (if it doesn't work, email me!!)

craig@chyld.co.uk

I wasn't embarrassed by tripping and falling face first, but rather that I forgot to tie my laces in the first place.