entonces tendrias que hacer alguna consulta SQL mas compleja
Código:
select MAX( CAMPO_ID ) FROM Tabla --esto recuperaria el ID mas alto
var_IDMaximo = rs("CAMPO_ID")
If NOT Exists (SELECT ID_CAMPO FROM TABLA WHERE CAMPO_ID = var_IDMaximo+1 )
INSERT INTO TABLA(CAMPO_ID, ....) VALUES(var_IDMaximo+1)
ELSE
select MAX( CAMPO_ID ) FROM Tabla --esto recuperaria el ID mas alto
var_IDMaximo = rs("CAMPO_ID")
INSERT INTO TABLA(CAMPO_ID, ....) VALUES(var_IDMaximo+1)
saludos