Şimdi Ara

Web Wiz Forum Son 10 Mesaj Çagırma

Daha Fazla
Bu Konudaki Kullanıcılar: Daha Az
2 Misafir (1 Mobil) - 1 Masaüstü1 Mobil
5 sn
5
Cevap
0
Favori
964
Tıklama
Daha Fazla
İstatistik
  • Konu İstatistikleri Yükleniyor
0 oy
Öne Çıkar
Sayfa: 1
Giriş
Mesaj
  • Merhabalar..
    Web Wiz Forum larını kullanmaktayım
    daha rahat bir kullanım ve daha hoş bir görüntü için
    forumda yollanan son 10 mesajı en hit 10 konuyu vb.. topic leri ana sayfamda göstermek istiyorum
    gugulda cok ayrıntılı aramalar yapmama rağmen bir döküman bulamadım.
    Kullanan veya bu işi daha onceden yapmış arkadaşlar varsa yardımcı olmalarını beklerim..
    ilginiz için teşekkürler.



  • Son versiyonunda zaten son mesajlar diye bir eklenti vardır.
  • Evet cevaplayalım bakalım uzun zaman arada sonra. Ben dediğin sistemi kendi sitemde yapmıştım.Kendi kodlarımla.Paylaşayım senle.

    Yapman gerekenler : ("../db/forum_db_.mdb") değerini kendine göre ayarla(Webwiz db'sine bağlancaksın).Neyse çakışmasına dikkat et(rs değerini verdim).Birde style ,image 'lar falan baya bir karışık ayarlarsın artık onları.
    ------------------
    <table width="169" height="73" border="1" cellpadding="0" cellspacing="0" bordercolor="#f9f9f9">
    <tr>
    <td height="14" bordercolor="#CCCCCC" bgcolor="#e5e5e5"><span class="style47">>></span> <span class="style33">Forumdan...</span></td>
    </tr>
    <tr>
    <%

    vt="DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & server.mappath("../db/forum_db_.mdb")
    set conn = Server.CreateObject("adodb.connection")
    set rs = Server.CreateObject("adodb.recordset")%>
    <%conn.open vt
    rssql = "Select * from tblTopic where Subject order by Topic_ID DESC"
    rs.open rssql, conn, 1, 3
    If rs.eof or rs.bof then
    Response.Write "<font face=verdana size=2 color=#ff3300><b><center><br>Forumda Mesaj Yok</br></center></b></font>"
    Response.end
    end if
    %>
    <%
    sayfa = Request.QueryString("sayfa")
    If sayfa="" Then sayfa=1
    rs.pagesize = 20
    rs.absolutepage = sayfa
    sayfa_sayisi = rs.pagecount
    for i=1 to rs.pagesize
    if rs.eof then
    exit for
    end if
    %>
    <br>
    <font size="1" face="Verdana, Arial, Helvetica, sans-serif"><img src="ico2.gif" width="9" height="9"> <a href="forum/forum_posts.asp?TID=<%=rs("Topic_ID")%>&PN=1" target="_blank">
    <% = Left(rs("subject"),17) %>
    .. </a></font>
    <%rs.movenext
    Next%>
    </span></td>
    </tr>
    </table>
    -------------------




  • Peki arkadaşlar bende şunu sormak istiyorum. Hiç anlamam bu yazma kodlama işlerinden ancak bir sitede adminlik yapıyorum ve arkadaşların bir isteğivar.
    Son 10 mesajın sayısını 20e çıkarabilirmiyim? Nasıl yapılır.?
    Şimdiden teşkkürler
  • kod kısmını aç bütün on yazan yerleri 20 yap :D
  • Yapay Zeka’dan İlgili Konular
    Daha Fazla Göster
    
Sayfa: 1
- x
Bildirim
mesajınız kopyalandı (ctrl+v) yapıştırmak istediğiniz yere yapıştırabilirsiniz.