No entiendo bien tu pregunta, si lo que quieres es generar un campo autoincremental mediante una sentencia de SQL, el tipo de dato es counter
strSQL = "ALTER TABLE tabla ADD COLUMN contador counter"
Si lo que quieres es controlar un campo ya creado en una tabla, que sea por ejemplo un entero y quieres tu hacer los incrementos, yo crearía una función que me regresara el máximo valor de dicho campo, lo incremento en uno y lo inserto...
Function RegresaMax(tabla, campo)
Set rsRegresaMax = Server.CreateObject("ADODB.Recordset")
strSQLRegresaMax = "SELECT MAX(" & campo & ") AS mi_max FROM " & tabla
rsRegresaMax.Open strSQLRegresaMax, ObjConn, 3, 3
mi_max = rsRegresaMax("mi_max")
rsRegresaMax.CLose
Set rsRegresaMax = Nothing
RegresaMax = mi_max
End Function
Y la invocas así
maximo = RegresaMax("una_tabla", "campo_numerico")
maximo = maximo + 1
Ya nada mas insertas el valor, ahora dentro de la función considera que te puede regresar un null en caso de EOF, en este caso regresas un 0 y listo, creo que mas o menos sería así
Salu2,