1. Soruna Cevap: Tüm kayıtları çekmek istiyorsan;
<%
set rsCat= Server.CreateObject("ADODB.Recordset")
sql = "Select * From tablonuburayauaz order by isim desc"
rsCat.Open sql,baglantınıburaya,1,3

Do While not rsCat.eof %>

<select name="tablo" id="tablo">
<option value="<%=(rsCat.Fields.Item("isim_no").Value)%>"> <%=(rsCat.Fields.Item("isim").Value)%></option>
</select>

<%
rsCat.Movenext
Loop
%>

Burda yapmış olduğumuz Do While not rsCat.eof ile tüm tabloyu çekip sayfaya yansıtmak oldu.

2. Soruna Cevap: <input name="kim" type="checkbox" id="kim" value="1" /> tam olarak bu kodu nerde kullandığını anlamadım ama veriyi 1 olarak yolladıysan o verinin birde deaktifi olmalı yani sıfır hali. Bunu ister if komutuyla yapabilir istersen de

<input name="kim" type="radio" value="1" />Evet
<input name="kim" type="radio" value="0" />Hayır

bu komutla evet hayır şeklinde yapabilirsin. Hatta ki checked kodunu ikisinden birine koyarak ilk onun seçili olmasını sağlayabilirsin...