sayfa numaralandırma

sayfa numaralandırmaYaptığınız bir haber scripti ya da benzeri bir çalışma var ve bunu sayfalara bölerek göstermek istiyorsunuz. Bunu çok basit bir şekilde yapabilmeniz mümkün...Database tanımlamalarınızdan sonra öncelikle "Kod1"i ekleyin...Daha sonra, "Kod2" yi sayfanın en altına istediğiniz şekilde ekleyip görüntüsünü düzenleyebilirsiniz.Kod1 :<%sayfa = Request.QueryString("sayfa")If sayfa="" Then sayfa=1rs.pagesize = 4 'Sayfada kaç adet veri bulunacakrs.absolutepage = sayfasayfa_sayisi = rs.pagecountfor i=1 to rs.pagesizeif rs.eof then exit for end if %>Kod2:<% response.Write "Sayfalar: "%><%onceki = cint(sayfa) - 1sonraki = cint(sayfa) + 1%><%if onceki < 1 thenresponse.write ""elseresponse.write " Önceki"end if%> <%for g = 1 to sayfa_sayisiif g = cint(sayfa ) then 'eğer bulunduğumuz sayfa ise ona link vermiyoruzresponse.write "["response.write g& "] " %><% elseresponse.Write "" & g & " "end ifnext %> <%if sonraki > sayfa_sayisi thenresponse.write ""elseresponse.write "Sonraki" end if%>