Add Next Number To A Field

[Ange Kappas]

Hi,
This is probably so simple I can't seem to figure it out.

I have a Table(tblACCOUNTNO) which has only one field called ACCOUNT NUMBER
and starts from number 1.

I want to add code to a form button which will add a new record to the
'tblACCOUNTNO' and it will be the next number in other words +1, which in
this case will be number 2.

How simple does that sound.

Thanks
Ange

 

[fredg]

Hi,
This is probably so simple I can't seem to figure it out.

I have a Table(tblACCOUNTNO) which has only one field called ACCOUNT NUMBER
and starts from number 1.

I want to add code to a form button which will add a new record to the
'tblACCOUNTNO' and it will be the next number in other words +1, which in
this case will be number 2.

How simple does that sound.

Thanks
Ange

Dim strSQL As String

strSQL = "Insert into tblAccoutino([Account Number]) values (" &
DMax("[Account Number]", "tblAccountino") + 1 & ");"

CurrentDb.Execute strSQL, dbFailOnError

 

[Ange Kappas]

Thanks Fred Appreciated
Ange

Hi,
This is probably so simple I can't seem to figure it out.

I have a Table(tblACCOUNTNO) which has only one field called ACCOUNT
NUMBER
and starts from number 1.

I want to add code to a form button which will add a new record to the
'tblACCOUNTNO' and it will be the next number in other words +1, which in
this case will be number 2.

How simple does that sound.

Thanks
Ange

Dim strSQL As String

strSQL = "Insert into tblAccoutino([Account Number]) values (" &
DMax("[Account Number]", "tblAccountino") + 1 & ");"

CurrentDb.Execute strSQL, dbFailOnError