Ayuda con base de datos

[annacopi]

Hola chicos

Tengo una tabla en mi base de datos llamada cargos de la cual el campo codigo del cargo es una variable texto.
Este campo en realidad le estamos colocando valores numericos los cuales se los incluye la forma ingresar cargos, los cuales se incrementan de uno en uno.

Incluyo perfectamente hasta el cargo numero 10, pero el cargo 11 no se puede ingresar ya que el contador no pasa de 10.

El codigo es el siguiente:
Para incrementar el codigo del cargo en la base de datos:

<%set revisar2=server.createObject("ADODB.recordset ")
sql2="select MAX(codigo) as codigito FROM cargos"
revisar2.open sql2,conn
if revisar2("codigito")<> 0 then
codigoclt=revisar2("codigito")+1
else
codigoclt="1"
end if%>

y para incluir en la base de datos es el siguiente:


validar= codigoclt
set valida = server.createobject ("Adodb.recordset")
consulta = "Select * from cargos where codigo = '"&validar&"'"
valida.open consulta,conn
if valida.eof and valida.bof then
set repr= server.createobject("Adodb.command")
repr.commandtext = "Insert into cargos (codigo,nombre) values (?,?)"
set repr.activeconnection = conn
repr.parameters.append repr.createparameter("as",200, ,255)
repr.parameters.append repr.createparameter("cs",200, ,255)
repr("as") = request.form("codigo")
repr("cs") = request.form("nombre")
repr.execute
%>
Alguien podría decirme como soluciono ese problemilla sin cambiar el campo texto en la base de datos?
Habrá necesidad depasar el campo en la base de datos a numerico.......?
Agradezco me colaboren con esto