folder Tahribat.com Forumları
linefolder Asp - Php - Cgi - Perl
linefolder Asp"De Kategorileme Algoritması - Verileri Kategorileme



Asp"De Kategorileme Algoritması - Verileri Kategorileme

  1. KısayolKısayol reportŞikayet pmÖzel Mesaj
    angels_demos
    angels_demos's avatar
    Kayıt Tarihi: 03/Haziran/2006
    Erkek
    Öncelikle algoritmanın anlamını söyleyeyim. Algoritma bir sorunu çözmek için izlenen yollardır.

    En basitinden bir örnek vereyim. Bir satırda response.write komutuyla bir değişken birde normal yazı yazacağız. Yazının içine değişken koyarsak normal yazı gibi gözüdür. Değişken yazdırmak için tırnak kullanmamalıyız. Ama yazı yazdırmak için kullanmamız gerekir. Bir yol izleyelim. İlk olarak değişkenimizi yazalım. Sonra & (ve) işareti koyara iki tane tırnak açıp arasına yazımızı yazalım.
    <% response.write ""°isken&"yazı" %>

    Bu basit bir örnekti.

    şimdi kategorileme mantığına geçelim. Mantığını kurmaya çalışalım. Pek çok yöntemle kategorileme yapılır ama en kolayını ve en pratiğini bulmamız gerek.

    Kategoriler adında tablomuz olsun. (id: otomatiksayı, kategoriadi: metin)
    Bu tabloya kategorilerimizi yazalım;
    1. Temel Konular
    2. İçerikler
    3. Nesne Kütüphanesi

    şimdilik 3 kategori yeter. şimdi birde makaleler adında tablo açalım (id: otomatik sayı, kategori_id: sayı, makale: sayı)

    şimdi bir mantık kuralım. İlk olarak a.asp sayfasında kategorileri listeletelim.
    Listelenen kategorilerr b.asp?id=2 şeklinde link verelim.  b.asp'de bu adresteki id stringini çekelim. Bu string kategorinin kimliğidir. Ve bir sql cümleciği ile kategori_id sütunu bu string'e eşit olanları gösterelim. Bu şekilde kategoriya ait olan makaleleri listeletebiliriz. Birde kod olarak yazalım;

    a.asp için aşağıdaki kodları sayfanıza yazınız;

    --------------------
        Set baglanti=server.createobject("adodb.connection")
        baglanti.open "Provider=Microsoft.Jet.Oledb.4.0; data source=" & server.mappath("veritabani.mdb")
            Set rs=baglanti.execute("select * from kategoriler")
                While Not rs.eof
                    Response.write " <a href=""b.asp?id="&rs("id")&""">"&rs("kategoriadi")&"</a>"
                Rs.movenext
                Wend
            Rs.Close
        baglanti.close
    -----------


    b.asp için ise aşağıdaki kodları kullanabilirsiniz;

    --------------
        Set baglanti=server.createobject("adodb.connection")
        baglanti.open "Provider=Microsoft.Jet.Oledb.4.0; data source=" & server.mappath("veritabani.mdb")
        id=request.querystring("id")
            Set rs=baglanti.execute("select * from makaleler where kategori_id="&id&"")
                While Not rs.eof
                    Response.write " "&rs("makale")&"  <br>"
                Rs.movenext
                Wend
            Rs.Close
        baglanti.close
    ------------------
    yeter aq bugün 4 konu açtm . bunlardan 3ünü ben yazdım bu da son olsun belki brilerine yararlı olur =)
    //
Toplam Hit: 801 Toplam Mesaj: 1