• 14-11-2006, 17:29:28
    #1
    arkadaşlar ufak bir yardıma ihtiyacım var gerçi ne kadar ufak bilmiyorum ama

    toplist sitemde www.maxialem.net te hitleri sıralama işleminde problem yaşıyorum kodlar aşagıda benim istedigim ise siteye tıklama ile gelen ziyaretçilerin sıralamasından sonra siteden çıkışların büyükten küçüge dogru sıralanması yani tek sıralama ayrı iki veriyle olacak bunun çözümü varmıdır acaba ben 2 gündür kafa patlattım bulamadım bir türlü

    Set RS = Server.Createobject("ADODB.Recordset")
    RS.open "SELECT * FROM site WHERE onay='Y' ORDER BY click desc",BAG,1,3
    n = RS.RecordCount
    For i = 1 to n
    RS("sira") = i
    RS.Update
    RS.movenext
    Next
    RS.Close
    Set RS = Nothing
  • 14-11-2006, 19:12:16
    #2
    Misafir
    Belirmek istediğini tam olarak anlamadım. Ayrı ayrı iki tablo olsun. Birinde gelenler birinde gidenlermi listelensin yoksa Gelen/Giden yerine Gelen | Giden şeklinde farklı bölümlerdemi yazsın? Yada bir sayfa gelene göre, diğer sayfa gidene göremi sıralasın. Net olarak ne istediğini anlatabilrsen yardımcı olmaya çalışırım. Az sonra uyuycam. Uyandığımda okuyup yapabilirsem cevaplarım. Yazdıkların tam olarak açıklayıcı değil.
  • 14-11-2006, 19:29:29
    #3
    SweetDreams adlı üyeden alıntı: mesajı görüntüle
    Belirmek istediğini tam olarak anlamadım. Ayrı ayrı iki tablo olsun. Birinde gelenler birinde gidenlermi listelensin yoksa Gelen/Giden yerine Gelen | Giden şeklinde farklı bölümlerdemi yazsın? Yada bir sayfa gelene göre, diğer sayfa gidene göremi sıralasın. Net olarak ne istediğini anlatabilrsen yardımcı olmaya çalışırım. Az sonra uyuycam. Uyandığımda okuyup yapabilirsem cevaplarım. Yazdıkların tam olarak açıklayıcı değil.

    aslında konu o kadar karışık degil ama bir türlü bulamıyorum :d

    şöyle anlatıyım

    Set RS = Server.Createobject("ADODB.Recordset")
    RS.open "SELECT * FROM site WHERE onay='Y' ORDER BY click desc" ,BAG,1,3
    n = RS.RecordCount


    burada databaseye baglanıp verileri çekiyoruz asıl işimiz burayla kodun gerisinde 1 arttırark sıra isimli bölüme yazıyo işte benim yapmak istedigimde bundan önceki bölüm yanı sıralama

    sıralama nasılmı olucak öncelikle

    n = RS.RecordCount
    kodunda önce öyle bir kod yazmalıyımki ilkin siteme hit yollayan yani click isimli tablodaki verileri büyükten küçüge sıralasın hemen pesine benim gönderdigim ziyaretçilerde büyükten küçüge sıralasın
    olay bu ama olmuyo bir türlü sıralamada and kullanırsamda 2yada daha fazla aynı sırada site çıkıyo deli olucam ya

    yani sıralama önce gelen büyüklük sırasına başlıcak gelen site bittikten sonra giden siyeye geçicek ve büyükten küçüge sıralıyacak
  • 14-11-2006, 20:30:37
    #4
    Misafir
    olayı şöyle yapıcan.

    iki tablo olacak.

    sol kısımda

    RS.open "SELECT * FROM site WHERE onay='Y' ORDER BY click desc",BAG,1,3

    şeklinde gelene göre sıralamalısın.

    en altında rs.close yapıp sorguyu kapamalısın.

    yan tarafta yeni tabloda tekrar db bağlantısı yapıp

    RS.open "SELECT * FROM site WHERE onay='Y' ORDER BY out desc",BAG,1,3

    diyip bu şekilde sıralatıp yine altında sorguyu kapatmalısın.
  • 14-11-2006, 21:04:48
    #5

    for i=1 to 10
    Yazan kısmı Değiştire bilirsin kendine Göre son 10 en çok click alan hit alan siteleri gösteirr ben kendim bunu kullanıodum o yuzdne yukardan aşağıya Dogru kayan yazı seklinde Gösterilir <%= rs("tablo")%> Burayada db dn sıralamak istediğin tablo yu yazarsın bitti linki felanda kendine göre ayarladın mı bitti

    Alıntı
    <table width="31%" height="96" border="1" cellpadding="0"
    cellspacing="0" bordercolor="#CCCCCC" style="BORDER-COLLAPSE: collapse">
    <tbody>
    <tr>
    <td align="middle" width="60%" bgcolor="#ffffff">
    <strong><font color="#000000" size="1" face="Verdana">Son 10 </font>Referans</strong>
    <marquee onmouseover="this.stop()" onmouseout="this.start()"
    scrollamount="1" direction="up" width="98%" height="85"
    border="0">
    <table width="300"><%


    set bag=server.createobject("adodb.connection")
    bag.open= "DRIVER={Microsoft Access Driver (*.mdb)};DBQ=" & server.mappath ("veritabani.mdb")
    Set rs=server.createobject("adodb.recordset")
    sql="SELECT * FROM site WHERE onay='Y' ORDER BY click desc",BAG,1,3

    rs.open sql,bag,1,3
    %>

    <%
    for i=1 to 10
    %>
    <tr>
    <td><a href="siteyegit.asp?id=<%=rs("id")%>" target="_blank"><%= rs("tablo")%> </a></td>
    <% rs.movenext %>
    <% next %>
    </tr>
    </table>

    </marquee></td>
    </tr>
    </tbody>
    </table>
    </div>
    <%
    rs.close()
    set rs=nothing
    bag.close:set bag=nothing%>
  • 15-11-2006, 08:57:33
    #6
    SweetDreams adlı üyeden alıntı: mesajı görüntüle
    olayı şöyle yapıcan.

    iki tablo olacak.

    sol kısımda

    RS.open "SELECT * FROM site WHERE onay='Y' ORDER BY click desc",BAG,1,3

    şeklinde gelene göre sıralamalısın.

    en altında rs.close yapıp sorguyu kapamalısın.

    yan tarafta yeni tabloda tekrar db bağlantısı yapıp

    RS.open "SELECT * FROM site WHERE onay='Y' ORDER BY out desc",BAG,1,3

    diyip bu şekilde sıralatıp yine altında sorguyu kapatmalısın.

    bunu daha önce denedim aslında sonuçta sadece outu sıralıyo

    Set RS = Server.Createobject("ADODB.Recordset")
    RS.open "SELECT * FROM site WHERE onay='O' ORDER BY click desc" ,BAG,1,3
    RS.Close
    Set RS = Server.Createobject("ADODB.Recordset")
    RS.open "SELECT * FROM site WHERE onay='O' ORDER BY out desc" ,BAG,1,3
    n = RS.RecordCount
    For i = 1 to n
    RS("sira") = i
    RS.Update
    RS.movenext
    Next
    RS.Close
    Set RS = Nothing

    benim dedigimde ise önce click sütününü sıralıyacak eger sıfır dan büyük veri kalmamışsa sıralamaya kaldıgı yerden aynı usulle out sutununa devam edecek sonuç böyle olmuyo aslında çogu toplistte bu problemi yaşıyo hhaata hiç birinde bulunmuş bir çözüm göremedim

    :nasıl bir işe girdim bende anlamıyom
  • 16-11-2006, 19:39:57
    #7
    gerek kalmadı hallettim ilgilenenlere teşekkürler gerçi bu kod düzeni diger toplistlerde yok ama idare edin artık