> Hi,
> This is probably so simple I can't seem to figure it out.
[quoted text clipped - 10 lines]
> Thanks
> Ange
Dim strSQL As String
strSQL = "Insert into tblAccoutino([Account Number]) values (" &
DMax("[Account Number]", "tblAccountino") + 1 & ");"
CurrentDb.Execute strSQL, dbFailOnError

Signature
Fred
Please respond only to this newsgroup.
I do not reply to personal e-mail
Ange Kappas - 09 Feb 2008 08:19 GMT
Thanks Fred Appreciated
Ange
>> Hi,
>> This is probably so simple I can't seem to figure it out.
[quoted text clipped - 18 lines]
>
> CurrentDb.Execute strSQL, dbFailOnError