Web Wiz Forum Son 10 Mesaj Çagırma

Aşağı Git Tüm Forumlar Web Tasarım - Programlama Hazır forum ve portallar Web Wiz Forum Son 10 Mesaj Çagırma

Bu konudaki kullanıcılar: 1 misafir

4
Cevap 1135
Tıklama 0
Öne Çıkarma

1. sayfa

Web Wiz Forum Son 10 Mesaj Çagırma

Cevap Yaz

ertuciftci

21 yıl (108 mesaj)

Çavuş

Konu Sahibi

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.

DH forumlarında vakit geçirmekten keyif alıyor gibisin ancak giriş yapmadığını görüyoruz.

Üye olduğunda özel mesaj gönderebilir, beğendiğin konuları favorilerine ekleyip takibe alabilir ve daha önce gezdiğin konulara hızlıca erişebilirsin.

Üye Ol Şimdi Değil

Bir Daha Gösterme

teknokristal

21 yıl (3757 mesaj)

Yarbay

Son versiyonunda zaten son mesajlar diye bir eklenti vardır.

ok34137

21 yıl (1216 mesaj)

Yüzbaşı

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">>> Forumdan...</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 "<center> Forumda Mesaj Yok</center>"
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
%>
 
<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>
<%rs.movenext
Next%>
</td>
</tr>
</table>
-------------------

Bu mesaja 1 cevap geldi.

beykozlumustafa

13 yıl (2 mesaj)

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

Bu mesaja 1 cevap geldi.

vitrinlikseo

13 yıl (69 mesaj)

Çavuş

kod kısmını aç bütün on yazan yerleri 20 yap :D

Cevap Yaz

1. sayfa

Tüm Forumlar Web Tasarım - Programlama Hazır forum ve portallar Web Wiz Forum Son 10 Mesaj Çagırma