| Navigation |
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
| |
Verileri Nasıl Sayfalarım? Sayfalama nedir? |
|
| |
Sayfalama
Veri tabanımızdaki verilerimiz belli başlıklar altında veya belli veri gçekişinden sonra sayfalara bölmektir...
1 2 3 4 5 6 .... vs Gibi...
Gözde Büyütlcek kadar olmasada yeni başlayanlar için zorluğu var tabiki...
Döngüleri çok iyi öğrenmeniz lazım..
KODLARIN YANINDA AÇIKLAMALARI YAZMIŞ DURUMDAYIM...
db.mdb miz in içeriği
fullasp adında tablomuz ve
id = otomatik sayı
ad = not
url= not
adlarında sütunlarımız var...
db mizi oluşturdukran sonra dosyamızla aynı klasörde olacak veya değiştirebilirsiniz...
Çalışacaktır..Onaylanmıştır...
| Kod Alanı: |
<%
// Coded & Drawing By Magnet
//İzinsiz Yayınlanamaz Kullanılamaz
//Mail destek hattı : magentic_t@hotmail.com
// Evet arkadaşlar 14 Temmuz Cuma 2006 saat 14:00
// Sayfalamayı anlatmış bulunuyoruz aslında büyütülecek birşey yok 3-5 kod cambazlığı ve mantık okadar: )
%>
<%
//Db Bağlantımızı Yapıyoruz
Set Bag = Server.CreateObject("ADODB.Connection" )
Bag.Open "DRIVER={Microsoft Access Driver (*.mdb )}; DBQ=" & Server.MapPath("db.mdb" )
%>
<%
set rs = Server.Createobject("ADODB.Recordset" )
Sql = "select * from fullasp url order by url asc" fullasp tablomuzu açtık ve ad a göre sıralattık
rs.open Sql, Bag, 1, 3
sayfa = request.Querystring("sayfa" ) sayfamızı stringle çağırdık
if sayfa="" then sayfa değerimiz boş ise
sayfa=1 sayfa değerimize 1 diyoruzki 1. safada lsun : )
end if
rs.pagesize = 5 1 sayfada kaç adet veri olacağını seçiyoruz ben 5 dedim
rs.absolutepage = sayfa absolutepage sayfa bölme demektir
Sayfa_top = rs.pagecount toplam sayfamızı aldık
for i=1 to rs.pagesize 1 den pagesize değeri kadar verimizi sayfada gösereceğimiz döngümüz...
if rs.eof then exit for eğerkayıt yoksa sayfalamayı durdur dedik: )
a=a+1 ben kayıtları numaralandırcam ondan a değişkeni atadım ve her kayıt için 1 arttırdım
%>
<font size=1 face=verdana><b><%=a%> -</b> <%=rs("ad" )%> <%=rs("url" )%></FONT><br><br>
<%
rs.movenext
next for döngümüzü sonlandırdık
response.write "<font size=1 face=verdana>Sayfa :</font>"
for y=1 to sayfa_top y değişkeni atadık 1 den toplam sayfaya kadar sayfaları yazdıracak
if sayfa=y then sayfamız y ye yani bulunduğumuz sayfaya eşitse sadece sayfa adını yazdırıyoruz
bulunduğumuz sayfada link olmuyor yani
response.write y y değerimizi yazdııyoruz
else değilse
response.write "<font size=1 face=verdana>"
response.write "<a href=""?sayfa="& y &" ""> "& y &"</a> " diğer sayfaları yazdırıyoruz
response.write "</font>"
end if ifi kapat
next for döngüsünü sonlandır
%> |
|
|
|
|
|
|
|
|
|
|
| |
Bugün 78 ziyaretçi (93 klik) buradaydı |
|
|
|
|
|
|
|
