asp mysql sayfalama kodu varmı ?
forumda kategorinin yeni oldugunu neye göre belirliyorsun ?
birde ilk başta kategorileri listelerken bir kategoriler diye tablo açıp
orada durum adında bir stun açıp
durum 1 olanlar başlık
durum 0 olanlar bolumler durum sıfır olanların baglantı idleri durum 1 in id sine eşitse alt alta sırala mantıgımı var ?

Asp ve mysql listeleme için :

Kod Alanı:

<%
SayfalamaKayitSayi = 15

iSayfa = Request.QueryString("sayfa")
if Not Isnumeric(iSayfa) OR iSayfa = "" Then
iSayfa = 1
iBaslangic = 0
else
iBaslangic = (iSayfa-1)*SayfalamaKayitSayi
end if

strSQL = "SELECT * FROM tbl order by id desc Limit "& iBaslangic &", "& SayfalamaKayitSayi

Set rs = baglan.execute(strSQL)

if rs.EOF Then
response.write "kayıt bulunamadı."
else
Do While Not rs.EOF
response.write sutun
rs.MoveNext
Loop

Set TopKayit = baglan.Execute("SELECT COUNT(id) FROM tbl")
iToplamSayi = TopKayit(0)

for i = 1 To cint(replace(iToplamSayi,",","."))/SayfalamaKayitSayi+1
Response.Write "<a href="?sayfa="&i&">"&i&"</a>"
next

end if
%>



Kategori yeni mi değil mi için de aşağıdaki ne kadar zaman geçmiş fonksiyonundan yararlanabilirsin.
Kod Alanı:

<%

Function GecenZamaniBul(strVeri)
If strVeri = "" Then Exit Function
GecenSaniye = DateDiff("s", strVeri, now())
if GecenSaniye = 0 then
GecenZamaniBul = "Biraz önce"
elseif GecenSaniye >= 1 and GecenSaniye < 60 then
GecenZamaniBul = ""&GecenSaniye &" saniye önce"
elseif GecenSaniye >= 60 and GecenSaniye < 3600 then
GecenZamaniBul = ""& int(GecenSaniye/60) &" dakika önce"
elseif GecenSaniye >= 3600 and GecenSaniye < 86400 then
GecenZamaniBul = ""& int(GecenSaniye/3600) &" saat önce"
elseif GecenSaniye >= 86400 and GecenSaniye < 604800 then
GecenZamaniBul = ""& int(GecenSaniye/86400) &" gün önce"
elseif GecenSaniye >= 604800 and GecenSaniye < 2592000 then
GecenZamaniBul = ""& int(GecenSaniye/604800) &" hafta önce"
elseif GecenSaniye >= 2592000 and GecenSaniye < 31104000 then
GecenZamaniBul = ""& int(GecenSaniye/2592000) &" ay önce"
elseif GecenSaniye >= 31104000 then
GecenZamaniBul = ""& int(GecenSaniye/31104000)&" yıl önce""
end if
End Function

strGecmisTarih = "24.02.2008"
response.write GecenZamaniBul(strGecmisTarih)
%>



Alıntı:

birde ilk başta kategorileri listelerken bir kategoriler diye tablo açıp
orada durum adında bir stun açıp
durum 1 olanlar başlık
durum 0 olanlar bolumler durum sıfır olanların baglantı idleri durum 1 in id sine eşitse alt alta sırala mantıgımı var ?

Evet aynen öyle..

teşekkrüler :)

Sayfalama kodu Hatalı :S

Hatalı değil, gerekli yerleri değiştirmemişsinizdir.

değiştirdim mesela 5 veri olunca2. sayfaya geçsin ayarladım orada 3 5 gibi şeyler yazıyor tıkaldıgım zamanda
kayıt bulunamadı yazısı çıkıyor