For sayi = 1 to 20
Set rs=db.Execute("SELECT * from veriler where sira_id="&sayi)
if rs.eof then
response.write "veri bulunamadı"
else

if sayi=rs("sira_id") then
Response.Write("<option disabled value=""kullanılamaz"">kullanılamaz</option>")
else
Response.Write("<option value="""& sayi &""">"& sayi &"</option>")
end if

end if
rs.close
set rs=nothing
Next


soruna çözüm bulunamadı ise bu şekilde yapabilirsiniz.