Too few parameters

[Busbait]

when I run the below Code :

Dim dbsCurrent As Database
Set dbsCurrent = CurrentDb

dbsCurrent.Execute "INSERT INTO [Product information] ([Product Name]) VALUES " & "(" & [NewProdName] & ")"

I get the following error message " Too few parameters. Expected 1. (Error 3061)"
can some one help me with this issue?

[ChipR]

Where are you running this code?
What type of field is [Product Name]?

[ajalwaysus]

Try this:

DoCmd.RunSQL("INSERT INTO [Product information] ([Product Name]) VALUES ('" & [NewProdName] & "')")

And make sure that [NewProdName] has a value in it, to do this, put this before the code above:

Call MsgBox([NewProdName])

Also, don't forget to answer ChipR's questions.

-AJ

[Busbait]

I am running this code via the Forms of MS Access and [Product Name] is Text

[ChipR]

This tutorial has a section on Data Type Qualifiers that explains part of the problem. The rest of the page should also be helpful.

[Busbait]

Thanks to both of you , the code works fine now

[NeoPa]

Notice also how AJ included the opening parenthesis in the previous string literal, rather than adding a separate one. It works the same but is less cumbersome ;)