新丰家园

标题: [分享]2.1论坛首页版块上面的新帖热帖 [打印本页]
作者: 科科    时间: 2006-4-29 00:01
标题: [分享]2.1论坛首页版块上面的新帖热帖
[分享]2.1论坛首页版块上面的新帖热帖

在论坛首页版块上面上调用新帖热帖，可以随时查看论坛的最新发帖。

１、打开index.asp在第6行处的：

If BBS94KK.Info(20)="1" then ShowInfo()

的下面加上一行代码：

ShowNewHot()

2、 在最后面的：

%>

的上面加上：

Function ShowNewHot()
BBS94KK.ShowTable"新帖<span style=''margin-left:50%''>热帖</span>","<table width=''100%'' border=''0'' cellspacing=''0'' cellpadding=''0''><tr><td style=''border-right:1px "&BBS94KK.SkinsPIC(0)&" dotted'' width=''50%''>"&GetNewTopic(1,5)&"</td><td width=''50%''>"&GetNewTopic(2,5)&"</td></tr></table>"
End Function
Function GetNewTopic(flag,Num)
Dim Rs,Sql,Noshow,i,S
Noshow=BBS94KK.NoShowTopic()
If BBS94KK.Cache.valid("IndexNewTopic"&Flag) then
GetNewTopic=BBS94KK.Cache.Value("IndexNewTopic"&Flag)
Else
If Noshow="" Then NoShow="0"
S="":I=0
If Flag=1 Then
Sql="select TopicID,Name,Face,Caption,boardid,lasttime,SqlTableID From [KK_topic] where isdel=False And BoardID not in("&Noshow&") order by lasttime DESC"
Else
Sql="select TopicID,Name,Face,Caption,BoardID,LastTime,SqlTableID From [KK_topic] where isdel=False And BoardID not in("&Noshow&") And DATEDIFF(''d'',[LastTime],''"&BBS94KK.NowBbsTime&"'')<7 order by ReplyNum DESC"
End If
Set Rs=BBS94KK.Execute(Sql)
Do while not Rs.eof
I=I+1
If I>Int(Num) Then Exit Do
S=S&"<tr><td height=25 width=1><img src=""pic/face/"&Rs("face")&".gif""></td><td><a href=""Show.asp?BoardID="&Rs("BoardID")&"&ID="&Rs("topicid")&"&TB="&Rs("SqlTableID")&""">"&BBS94KK.Fun.StrLeft(Rs("Caption"),40)&"</a></td><td><a href=UserInfo.asp?name="&Rs("Name")&">"&Rs("Name")&"</a></td></tr>"
Rs.movenext
Loop
Rs.Close
GetNewTopic="<table width=''100%'' border=''0'' cellspacing=''0'' cellpadding=''0''>"&S&"</table>"
BBS94KK.Cache.add "IndexNewTopic"&Flag,GetNewTopic,dateadd("n",20,now)
End If
End Function

3、最后为了使每次发帖刷新缓存，在SaySave.asp的大约290行处找到：

Session(CacheName & "MyInfo") = Empty

在下面加上：

BBS94KK.Cache.clean("IndexNewTopic1")
BBS94KK.Cache.clean("IndexNewTopic2")

如果您懒得修改的话，你可以下载已经修改好的附件

不过如果你没有安装社区明星的话，你还是自己手动修改，或你安装了其他插件，最好也手动修改哦

[attach][/attach]

「该帖子被 admin 在 2006-5-14 20:10:14 编辑过」
óó
作者: zgwlyy    时间: 2006-4-30 07:16
标题: 回复:[分享]2.1论坛首页版块上面的新帖热帖
..... ＡＡ
作者: aurora    时间: 2006-5-1 05:50
标题: 回复:[分享]2.1论坛首页版块上面的新帖热帖
叮叮咚咚叮叮咚咚叮叮咚咚 ze] [/url][/b]
作者: 阿XIN    时间: 2006-5-1 18:39
标题: 回复:[分享]2.1论坛首页版块上面的新帖热帖
<>看看怎么样</P>
作者: xjiao    时间: 2006-5-6 01:54
标题: 回复:[分享]2.1论坛首页版块上面的新帖热帖
<>看看!</P>
作者: 逍遥    时间: 2006-5-7 14:01
标题: 回复:[分享]2.1论坛首页版块上面的新帖热帖
看看///////
作者: 逍遥    时间: 2006-5-7 14:53
标题: 回复:[分享]2.1论坛首页版块上面的新帖热帖
老大用起要出这个问题啊。。。解决一下撒。。。
<>Microsoft VBScript 运行时错误<FONT face=\"宋体, MS Song\" size=3> </FONT><FONT face=宋体 size=2>错误 \'\'800a01b6\'\'</FONT><FONT face=\"宋体, MS Song\" size=3> </FONT>
<><FONT face=宋体 size=2>对象不支持此属性或方法: \'\'BBS94KK.GetTopicCham\'\'</FONT>
<><FONT face=宋体 size=2>/index.asp</FONT><FONT face=宋体 size=2>，行 222</FONT> </P>
作者: fly08站长    时间: 2006-5-8 22:55
标题: 回复:[分享]2.1论坛首页版块上面的新帖热帖
xiexie
作者: 260569    时间: 2006-5-9 00:04
标题: 回复:[分享]2.1论坛首页版块上面的新帖热帖
[color=Blue]強烈支持,嚴重支持,就是支持![/color]
作者: xxhhxxhh    时间: 2006-5-9 08:08
标题: 回复:[分享]2.1论坛首页版块上面的新帖热帖
sssssssssssssssssssss
作者: lin    时间: 2006-5-9 09:39
标题: 回复:[分享]2.1论坛首页版块上面的新帖热帖
[em10]
作者: Y2Kangel    时间: 2006-5-10 08:45
标题: 回复:[分享]2.1论坛首页版块上面的新帖热帖
^^谢谢分享
作者: 04hy    时间: 2006-5-14 01:23
标题: 回复:[分享]2.1论坛首页版块上面的新帖热帖
<>我就是在找这个</P>
作者: 1186    时间: 2006-5-18 20:50
标题: 回复:[分享]2.1论坛首页版块上面的新帖热帖
<>卡那可能还不行啊·······</P>
作者: 菠菜    时间: 2006-5-19 22:26
标题: 回复:[分享]2.1论坛首页版块上面的新帖热帖
111111111111
作者: fyty123    时间: 2006-5-22 15:28
标题: 回复:[分享]2.1论坛首页版块上面的新帖热帖
ddddddd
作者: wowstar    时间: 2006-5-23 17:02
标题: 回复:[分享]2.1论坛首页版块上面的新帖热帖
我要看看。。。。
作者: wowstar    时间: 2006-5-23 17:03
标题: 回复:[分享]2.1论坛首页版块上面的新帖热帖
我要看看  ～～～～～～～
作者: darkmice    时间: 2006-5-24 23:22
标题: 回复:[分享]2.1论坛首页版块上面的新帖热帖
dasdsadsa
作者: zhoufeng    时间: 2006-5-26 07:05
标题: 回复:[分享]2.1论坛首页版块上面的新帖热帖
gsdfgs
作者: 7758521    时间: 2006-5-27 15:43
标题: 回复:[分享]2.1论坛首页版块上面的新帖热帖
<>有要回复</P>
<>????</P>
作者: 科科    时间: 2006-6-4 22:44
标题: 回复:[分享]2.1论坛首页版块上面的新帖热帖
辛苦一下啦
作者: 艾飒    时间: 2006-6-8 14:36
标题: 回复:[分享]2.1论坛首页版块上面的新帖热帖
asdsadasdsad
作者: 莹莹    时间: 2006-6-8 22:12
标题: 回复:[分享]2.1论坛首页版块上面的新帖热帖
看不懂[em20]
作者: xj4156415    时间: 2006-6-9 17:11
标题: 回复:[分享]2.1论坛首页版块上面的新帖热帖
aasdasdasd
作者: 172652750    时间: 2006-6-11 13:16
标题: 回复:[分享]2.1论坛首页版块上面的新帖热帖
sadadassd
作者: hanbai    时间: 2006-6-11 18:22
标题: 回复:[分享]2.1论坛首页版块上面的新帖热帖
kan xia
作者: 790630    时间: 2006-6-17 03:18
标题: 回复:[分享]2.1论坛首页版块上面的新帖热帖
ddddddddd
作者: cmyky    时间: 2006-6-17 10:15
标题: 回复:[分享]2.1论坛首页版块上面的新帖热帖
kankan
作者: xuyimin0907    时间: 2006-6-22 09:37
标题: 回复:[分享]2.1论坛首页版块上面的新帖热帖
tyyyyyy
作者: myg520    时间: 2006-6-23 23:22
标题: 回复:[分享]2.1论坛首页版块上面的新帖热帖
喜欢~顶了~
作者: plasnow    时间: 2006-6-24 03:44
标题: 回复:[分享]2.1论坛首页版块上面的新帖热帖
<>回复个看看</P>
作者: yegenius    时间: 2006-6-26 13:53
标题: 回复:[分享]2.1论坛首页版块上面的新帖热帖
<>安完会不会总出错啊。。。。？？？</P>
作者: bhwjg    时间: 2006-6-29 21:17
标题: 回复:[分享]2.1论坛首页版块上面的新帖热帖
ok
作者: 122281555    时间: 2006-6-30 19:44
标题: 回复:[分享]2.1论坛首页版块上面的新帖热帖
0d d d d d
作者: 122281555    时间: 2006-6-30 20:11
标题: 回复:[分享]2.1论坛首页版块上面的新帖热帖
<>不行呀。出现问题</P>
作者: stheng123    时间: 2006-7-1 02:15
标题: 回复:[分享]2.1论坛首页版块上面的新帖热帖
asdsdfasdfasdfdafdsf
作者: 来一个    时间: 2006-7-1 22:27
标题: 回复:[分享]2.1论坛首页版块上面的新帖热帖
看看
作者: 邋遢大王    时间: 2006-7-5 13:35
标题: 回复:[分享]2.1论坛首页版块上面的新帖热帖
顶顶
作者: cncing    时间: 2006-7-9 00:16
标题: 回复:[分享]2.1论坛首页版块上面的新帖热帖
good
作者: 41600590    时间: 2006-7-13 23:30
标题: 回复:[分享]2.1论坛首页版块上面的新帖热帖
dddddddddddddddddddd
作者: a6289510    时间: 2006-7-17 12:22
标题: 回复:[分享]2.1论坛首页版块上面的新帖热帖
6666666666
作者: 梦想照进现实    时间: 2006-7-18 09:40
标题: 回复:[分享]2.1论坛首页版块上面的新帖热帖
ggggggggggggg
作者: sunnybbs    时间: 2006-7-20 02:36
标题: 回复:[分享]2.1论坛首页版块上面的新帖热帖
<>[em53]</P>
作者: HiFi儿    时间: 2006-7-20 12:48
标题: 回复:[分享]2.1论坛首页版块上面的新帖热帖
看起来就复杂、头痛的感觉，不知道是否喝了啤酒而...
作者: 默默爱你    时间: 2006-8-3 18:11
标题: 回复:[分享]2.1论坛首页版块上面的新帖热帖
<>可以让它只显示新发的主题吗？</P>
<>而新的回复帖不算在新帖范围内？</P>
<>行吗？</P>
作者: 默默爱你    时间: 2006-8-5 04:31
标题: 回复:[分享]2.1论坛首页版块上面的新帖热帖
<>没人知道吗？</P>
作者: ko29    时间: 2006-8-5 10:38
标题: 回复:[分享]2.1论坛首页版块上面的新帖热帖
fghfhfg
作者: 小妖    时间: 2006-8-9 14:02
标题: 回复:[分享]2.1论坛首页版块上面的新帖热帖
土土土土土土土
作者: 41600590    时间: 2006-8-12 22:51
标题: 回复:[分享]2.1论坛首页版块上面的新帖热帖
ggggggggggggggggggggggggggggggggg
作者: 礼尚    时间: 2006-8-13 11:45
标题: 回复:[分享]2.1论坛首页版块上面的新帖热帖
[em4]好方便啊
作者: sunarrow    时间: 2006-8-15 11:22
标题: 回复:[分享]2.1论坛首页版块上面的新帖热帖
.....................................
作者: 紫苏    时间: 2006-8-20 10:17
标题: 回复:[分享]2.1论坛首页版块上面的新帖热帖
这样都行啊~~~~~~~~~`
作者: HiFi儿    时间: 2006-8-20 21:06
标题: 回复:[分享]2.1论坛首页版块上面的新帖热帖
<>55555555555555，支持。</P>



欢迎光临 新丰家园 (https://xinfengbbs.com/) Powered by Discuz! X3.2