Questa

codice:
set objRS=server.createObject("ADODB.Recordset")
è superflua e quindi è da eliminare.

Per il resto incrementa il campo a prescindere, senza una WHERE come se la tabella avesse un solo campo. Ma di per sé non è un errore dipende da quello che devi fare.

Roby