mmmmmmm asips
sub crea_select_con_valor_de_bd(valor_bd)
response.write "<select name=""nombre_aqui"">"
for X=1 to 24
if valor_bd = x then
response.write "<option selected>" & x & "</option>"
else
response.write "<option>" & x & "</option>"
end if
next
response.write "</select>"
end sub
call crea_select_con_valor_de_bd(rs.("tu_valor_de_la_bd "))
o algo por el estilo