Yardımcı olursanız sevinirim
<head>
<meta http-equiv="Content-Type" content="text/html; charset=utf-8" />
<%
Dim strCon
Const strVeriTabaniYolu = "db/mdb.mdb"
strCon = "Provider=Microsoft.Jet.OLEDB.4.0; Data Source="& Server.MapPath(strVeriTabaniYolu) &";"
katid=5
set haber=Server.CreateObject("Adodb.Recordset")
haber.open "Select * from tblhaberler where kategori="&katid,strCon,1,3
%>
<%
for i=1 to 5
%>
<table style="width: 23%; height: 153px">
<tr>
<td style="height: 133px"><a href="haber_detay.asp?haberID=<%=haber("haberID")%> "><img src="<%= haber("resim")%>" </a> </td>
</tr>
<tr>
<td style="height: 36px"><a href="haber_detay.asp?haberID=<%=haber("haberID")%>"><%= haber("baslik")%></a></td>
<%
haber.movenext
next
%>
</tr>
</table>