<%kat_ID=request("kat_ID")%>
<% Set kd = Server.CreateObject("ADODB.RecordSet")
kd.Open "SELECT TOP 8 * FROM tblhaberler WHERE kat_ID=" & kat_ID & " ORDER BY puan/oy_sayisi DESC, haberID ASC",adoCon, 1, 3 %>
bu şekilde olursa sadece katgori idsi aynı olanları listeler
bu sekilde kat idyide...