VBA INSERT INTO statement (MS Access)

Question

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.

Check your database. The error seems to indicate Order is a long int and I'd suspect NewOrderNumber is an integer or similar. In any event its a data type mismatch — Andrew, Jan 22 '14 at 12:35

score 2 · Answer 1 · answered Jan 22 '14 at 12:31

2

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

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

answered Jan 22 '14 at 12:31

parakmiakos

2,994
9
29
43

VBA INSERT INTO statement (MS Access)

1 Answers1

Linked