<% '===================================== ' ' ' ' CoDeD ßy iBoSoFT ' Eğitim Amaçlıdır ' ' ibrahimakbalci@hotmail.com ' ' all_right_reserved© ' ' by_iBoSoFT HaBeR Script ' ' '===================================== %>
<% set lojik=server.createobject("Adodb.Recordset") sql="select * from haberler order by tarih desc" lojik.open sql,by_iBoSoFT,1,3 shf = Request.QueryString("shf") if shf="" then shf=1 end if if lojik.eof or lojik.bof then response.write "Kayıtlı Haber Bulunamadı." response.end end if lojik.pagesize = 5 'ekranda gösterilecek haber sayısı lojik.absolutepage = shf sayfa = lojik.pagecount for i=1 to lojik.pagesize if lojik.eof then exit for %>  <%=lojik("tarih")%>
<%=lojik("haber")%>

<% lojik.movenext next %>