|
puedes crear una funcion que te devuelva el correlativo
private function Correla() as integer
dim rs as new adodb.recordset
sql="select top 1 id_ciudad from ciudad order by id_ciudad desc"
if rs.state=1 then rs.close
rs.open sql,cn,3,1
if rs.recodcount>0 then
correla= rs!id_ciudad +1
end if
end function
algo asi, pruebalo pq lo escribi de frente aca en la web y no lo he probado, pero asi te deberia salir, la funcion te devuelve el correlativo.
|
