Discuz!NT官方社区

坛里朋友们提供的五格都不错的，但是在调用发帖排行时是总排行！而且是先加载型。使得五格内容出来了才出现下面的版块。

今天又把PHP版的界面打开看了一下，真是让人开心！（界面美美）

。NET程序刚起步，时间又来不及，所以就用ASP的写了一个。让朋友们见笑了！

小鱼写的这个垃圾程序是后加载型，是等所有版块出来以后再加载五格内容。当然也可以自行调整加载先后。

2008-03-25　11:29 　重新发布　已兼容　FIRFOX

演示网址：http://bbs.kshot.net







下载地址：(　2008-03-25　11:29 　重新发布　已兼容　FIRFOX　)

文件说明：

1、Fish（文件夹）　两个用到的小图片
2、conn.asp　　　　　数据库连接文件
3、focus.swf　　　　　　FLASH图片展示
4、pic.asp　　　　　　　　　图片主控文件（随机形式）
5、show.asp　　　　　　　　　　帖子调用主控文件
6、focus.swf源文件（文件夹）　　　内含focus.swf的FLA源文件，备用。（不用上传至服务器）

一、设置数据库连接

打开：conn.asp



修改成您的数据库连接属性

二、上传文件
 
修改好CONN。ASP的数据库连接后，将包内的文件上传到论坛的当前目录下

三、模板修改

1、在模板管理中找到forumindex文件，同时打开　forumindex　在里面找到下面两句
<%template _pagewordadlist%>
<%template _newpmmsgbox%>
在其下插入代码

<!-- 首页五格代码开始 -->
<div class="mainbox forumlist" style="padding:0;">
<table width="100%" cellpadding="0" cellspacing="0">
<thead class="category">
<tr>
<td align="center" class="titlebar" style="padding:0 1px 0 0"><h3>昆山论坛图片</h3></td>
<td align="center" class="titlebar" style="padding:0"><h3>社区最新帖子</h3></td>
<td align="center" class="titlebar" style="padding:0 1px 0 1px"><h3>论坛最新回复</h3></td>
<td align="center" class="titlebar" style="padding:0"><h3>一周热门话题</h3></td>
<td align="center" class="titlebar" style="padding:0 0 0 1px"><h3>今日发帖之星</h3></td>
</tr>
</thead>
<tr>
<td width="24%">
<script src="pic.asp" type="text/javascript"></script>
</td>
<td width="21%">
<table border="0" cellpadding="0" cellspacing="0" width="100%">
<tr valign="top">
<td width="24" style="padding:0;border-top:0px;"><img src="/Fish/list.gif" border="0" /></td>
<td background="images/listbg.gif" style="line-height:20px;padding:0;border-top:0px;background-repeat: repeat-y" width="100%" id="ShowNew"><img src="/Fish/loading.gif" width="16" height="16" style="margin-top: 10px;margin-left: 15px;"/></td>
</tr>
</table>
</td>
<td width="21%">
<table border="0" cellpadding="0" cellspacing="0" width="100%">
<tr valign="top">
<td width="24" style="padding:0;border-top:0px;"><img src="/Fish/list.gif" border="0" /></td>
<td background="images/listbg.gif" style="line-height:20px;padding:0;border-top:0px;background-repeat: repeat-y" width="100%" id="ShowRe"><img src="/Fish/loading.gif" width="16" height="16" style="margin-top: 10px;margin-left: 15px;"/></td>
</tr>
</table>
</td>
<td width="21%">
<table border="0" cellpadding="0" cellspacing="0" width="100%">
<tr valign="top">
<td width="24" style="padding:0;border-top:0px;"><img src="/Fish/list.gif" border="0" /></td>
<td background="images/listbg.gif" style="line-height:20px;padding:0;border-top:0px;background-repeat: repeat-y" width="100%" id="ShowHot"><img src="/Fish/loading.gif" width="16" height="16" style="margin-top: 10px;margin-left: 15px;"/></td>
</tr>
</table>
</td>
<td width="13%">
<table border="0" cellpadding="0" cellspacing="0" width="100%">
<tr valign="top">
<td width="24" style="padding:0;border-top:0px;"><img src="/Fish/list.gif" border="0" /></td>
<td background="images/listbg.gif" style="line-height:20px;padding:0;border-top:0px;background-repeat: repeat-y" width="100%" id="ShowPlace"><img src="/Fish/loading.gif" width="16" height="16" style="margin-top: 10px;margin-left: 15px;"/></td>
</tr>
</table>
</td>
</tr>
</table>
</div>
<!-- 首页五格代码结束 -->

2、再转到页面的最底部，找到 <%template _footer%>　

在其下插入：

<script src="show.asp?JsType=ShowNew" type="text/javascript" charset="Gb2312"></script>
<script src="show.asp?JsType=ShowRe" type="text/javascript" charset="Gb2312"></script>
<script src="show.asp?JsType=ShowHot" type="text/javascript" charset="Gb2312"></script>
<script src="show.asp?JsType=ShowPlace" type="text/javascript" charset="Gb2312"></script>

在最后插入调用是为了让论坛把版块全加载完以后再调用五格内容


四、完成

小鱼QQ：8190192　（验证： Discuz!NT五格）

希望朋友们能把改进后或修补的程序也发我一份，谢谢！

演示网址：http://bbs.kshot.net

写的匆忙，有错误的地方请朋友们指正！谢谢

问题：

1、其它的全调出来了，但是发帖排行没有调出来

因为我做的时候，我们的论坛已经启用：dnt_posts2　表

如果您没有或已启用dnt_posts3、dnt_posts4................

那么您要修改：show.asp的大概第71行

SQL = "SELECT top 10 posterid,poster,count(*) as postsnum FROM dnt_posts2 WHERE (CONVERT(varchar(10),postdatetime,120) = CONVERT(varchar(10),getdate(),120)) group by posterid,poster order by postsnum desc"

把其中的dnt_posts2　改成您的当前表。如您没有在后台启用第二表，刚改成：dnt_posts1

2、2008－03－25更新　图片调用时有旧图的问题

在PIC.ASP的大概34行
sql="SELECT top 5 postdatetime,tid,filename,count(*) as postsnum FROM dnt_attachments WHERE datediff(d,postdatetime,GetDate())<=7 and filetype='image/gif' or filetype='image/pjpeg' group by tid,filename order by newid()"

改成
sql="SELECT top 5 tid,filename,count(*) as postsnum FROM dnt_attachments WHERE datediff(d,postdatetime,GetDate())<=7 and  filetype='image/pjpeg' group by tid,filename order by newid()"

看了演示不错,图片调用上也显示主题了

支持小鱼！！！

支持，我的论坛马上使用~~~

我用ｆｉｒｅｆｏｘ看不到Ｆｌａｓｈ以外的４格内容，兼容问题吧？:_onion3:

看看先

楼上朋友说的是。我没有在ｆｉｒｅｆｏｘ里测

明天我会修改一下

让它兼容

支持，我的用上了
http://www.jiafish.com

:D :D :D

按你的说明调整以后，图片区和发帖显示区什么东西都没有。。
而且打开速度明显慢很多。

script src="show.asp?JsType=ShowNew" type="text/javascript" charset="Gb2312"></script>
<script src="show.asp?JsType=ShowRe" type="text/javascript" charset="Gb2312"></script>
<script src="show.asp?JsType=ShowHot" type="text/javascript" charset="Gb2312"></script>
<script src="show.asp?JsType=ShowPlace" type="text/javascript" charset="Gb2312"></script>

访问一下其中的任一个

如：http://网址/show.asp?JsType=ShowNew

看看

运行后提示
var ShowHot=''; ???conn.asp??
能详细说下
1、Fish（文件夹）　两个用到的小图片
2、conn.asp　　　　　数据库连接文件
3、focus.swf　　　　　　FLASH图片展示
4、pic.asp　　　　　　　　　图片主控文件（随机形式）
5、show.asp　　　　　　　　　　帖子调用主控文件
6、focus.swf源文件（文件夹）　　　内含focus.swf的FLA源文件，备用。（不用上传至服务器）
这些文件存放的目录吗。。

放到论坛的根目录

不错
终于搞定了
看www.jiafish.com

终于可以用了。。谢谢鱼儿。

能说一下你的具体原因及解决的方法吗？

收到

支持~~~~~~~~~~~~~~~~~~~~~~~

回复一个，我要下拉

net版今天突然出问题了 怎么都恢复不过来
试下asp的吧
谢谢楼主分享

还是数据库链接的问题，刚开始我忘记了数据库的密码。

回复一个，我要下拉:~ :~

呵
谢谢支持

lokklokklokklokklokklokk

ffffffffff

2008-03-25　11:29 　重新发布　已兼容　FIRFOX　

见第一帖的下载地址

我要下载

吼吼哈嘿～！
兼容好了我就用～　:_onion1: