When I run this code, I this error message.

Microsoft JET Database Engine (0x80040E10)
No value given for one or more required parameters.

The code is below:

strcounter = 1
do while not rs.eof
conn.execute "update customer set custID = " & strCounter & " "
strCounter = strCounter + 1
rs.movenext
loop

My existing table do not have incremental no as primary key. That's why I thought about having this code to add those number as primary key.

How do I fix it? Thanks.

First of all, not using the database function it is stupid. What about you have two simultaneous entries which will get them the same ID which might cause you some real problems.

As for the error you need to check the spelling of the names, the data type, things like that usually trigger this error.

Something like this may work too:

conn.execute "insert into customer (custID, column1, column2) (select MAX(custID) + 1, 'value1', 'value2' from customer)"

Where I have 'value1' and 'value2' you can put any text you want, just make sure its properly formatted for sql insertion. So for example you could have two variables storing the data you want to put into column1 and column2, and your insert statement would look like this:

conn.execute "insert into customer (custID, column1, column2) (select MAX(custID) + 1, '" & replace(var1, "'", "''") & "', '" & replace(var2, "'", "''") & "' from customer)"

of course, this methood will only work upon insertion, not when updating.