ASP - problema con recordset

tengo el sgte codigo en vbscript
if (rs_cod.eof=true and rs_cod.bof=true) then
Codigo=1
else
Codigo=cint(rs_cod("Codigo"))
Codigo=Codigo + 1
end if
pero aun q el recordset de consulta se q no da resultado, q esta vacio sigue entrando al if, en ves de entrar al elseee .. por q?

ya revisaste que la consulta traiga datos?

Prueba cambiando :
if (rs_cod.eof=true Or rs_cod.bof=true) then
o en todo case
if not( rs_cod.eof Or rs_cod.bof) then

Espero te sirva

Hasta Pronto