CODEWITHSUNDEEP
vba
mrtn
mrtn

Reputation: 13

VBA INSERT INTO statement (MS Access)

I am having a problem with below and getting a runtime error 3134

LastOrderNumber = DMax("Order", "Model_types")
NewOrderNumber = CLng(LastOrderNumber + 1)

CurrentDb.Execute "INSERT INTO Model_types (Order) " _
            & "VALUES (" & NewOrderNumber & ")"

The field 'Order' in Model_types is a Long Integer.

Any help would be appreciated.

Upvotes: 1

Views: 28995

Answers (1)

parakmiakos
parakmiakos

Reputation: 3020

Order is a reserved word. You should change your statement to :

CurrentDb.Execute "INSERT INTO Model_types ([Order]) " _
        & "VALUES (" & NewOrderNumber & ")"

Upvotes: 2

Related Questions