| Navigation |
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
| |
Verileri harfe göre sıralama |
|
| |
| Kod Alanı: |
// harfleri sıralıyoruz.
For harfler = 65 To 90 Step 1
Response.Write ("<a href=?harf=" & Chr(harfler )&">" & Chr(harfler ) &"</a> " )
Next
// gelen q.string boş değilse ve bir karakterse işleme başlıyoruz.
harf=trim(request.querystring("harf" ) )
if harf <> "" and len(harf )=1 then
//VERİ TABANIMIZDA UYELER ADINDA BİR TABLO VE;
// ÜYE ADLARININ SERGİLENDİĞİ UYE_ADI ŞEKLİNDE BİR FIELDİMİZ VE ID NUMARAMIZ OLSUN
//VERİ TABANI BAĞLANTIMIZI YAPTIĞIMIZI VARSAYALIM
//KAYIT SETİNİ AÇIYORUZ
set rs= db.execute("select ID,UYE_ADI from UYELER where UYE_ADI like "&harf&"% order by ID asc" )
if not rs.eof then
//kaydın varlığını doğrulayıp döngüyü başlatıyoruz.
do while not rs.eof
Response.Write(" "&rs("UYE_ADI" )&" <br/>" )
rs.movenext
loop
end if
set rs=nothing
end if |
|
|
|
|
|
|
|
|
|
|
| |
Bugün 57 ziyaretçi (70 klik) buradaydı |
|
|
|
|
|
|
|
