请问树型结构论坛的界面怎么做阿

amfmsm 2002-09-09 04:21:32
大家好 我搜索以前的帖子,看过有人给过类似的代码 但看得我还更茫然 主页有这么多的数据库连接 怎么可以十来行代码就搞掂呢 有谁帮帮我阿
...全文
29 11 打赏 收藏 转发到动态 举报
写回复
用AI写文章
11 条回复
切换为时间正序
请发表友善的回复…
发表回复
yonghengdizhen 2002-09-09
  • 打赏
  • 举报
回复
在服务端处理帖子的展开我并不认为是一个好主意..
我比较喜欢客户端逐层展开无页面刷新的方式.
类似msdn的左侧展开菜单
amfmsm 2002-09-09
  • 打赏
  • 举报
回复
我看了一下 是不是宝宝理解错了阿 其实我的问题没这么难的 我只是要求论坛主页的界面是分页的 用树型来显示论坛名称 而不是把记录用树状来显示
amfmsm 2002-09-09
  • 打赏
  • 举报
回复
阿,看到我眼都傻了 怎么办阿 没想到这么难的 我可能没时间去研究了 有没有首页是树型结构的论坛下载阿 虽然很多人都说“搜索吧 大把”其实是没有阿,全部都是平面型的
cat_hsfz 2002-09-09
  • 打赏
  • 举报
回复
你要求的是用<ul>和<li>标记做出来的树(参考bbs.yesky.com),还是用table分隔行,然后用前面加空格的方式作出来的树(参考www.dvbbs.net)?

你现在需要的是数据库结构方面的资料还是界面输出方面的资料?
数据库方面主要就是每一条留言给一个ParentID,指向他的父留言的ID,如果是顶端的ParentID就是0。那么你可以搜索出ParentID为0的,然后再开始递归出留言。
fbj007 2002-09-09
  • 打赏
  • 举报
回复
在很多资料都有介绍展开树状记录的程序,但是很多是采用递归的方法。我們知道,递归的方法逻辑比较简单,实际操作起来比较容易。但是递归有一个最大的缺点就是占用资源太多,速度太慢。如果在互联网的"论坛"上采用此种方法,在表记录很多的情况下将是一个非常严重的问题。下面的程序在笔者的工作中解决了一个大问题并将应用于本人小站(yuking.126.com)的论坛。
我这里采用速度非常快的堆栈来实现这种操作,但是操作起来相对而言难度加大。我们就以论坛记录表为例讲解这一过程,首先了解一下表结构:

一、表结构(article)
self int '本记录ID号
father int '父记录ID号
title char '贴子标题
author char '贴子作者
datetime date '发贴日期时间
hits int '点击数
reply int '回复数
..... '根据具体的情况我们还可以有更多的字段
1)关键说明:self是记录本记录的ID号,这应该是一个自动增长的字段,不充许重复。father是记录本结点的父结点ID号的字段,若该记录内容为"回贴"此字段值应该为"主贴"的ID号。若该记录为"主贴"则它的父结点应该为"0"
2)如下两条记录是父子记录:
self father title author .....
1 0 '谁能帮帮我' '三脚猫'
2 1 '我能帮你什么忙吗?' '网上飞'

二、操作方法
首先,我们读出所有父结点为"0"的记录也就是"主贴",统统放入堆栈中。然后输出位于栈顶的一条记录("主贴")数据,并清空栈顶,栈頂下移一格。接着查找所有父结点为该栈项结点("主贴")的记录("回贴"),也统统放于栈顶。注意到没有,就这两步我们就完成了把一条父记录输出并展开其子结点的工作。余下的工作只是依次类推而已了,直到栈为空为止。
当然实际操作时可能还会有一些要求,比如要求得到记录的层数,回复数等等问题,我们只需稍加改进就能实现。

三、这里是整理后的原代码
<%
set RS=server.CreateObject("ADODB.Recordset")

sql_text="select * from article where father=0 order by datetime desc"
RS.Open sql_text,Bbs_ConnectionString '查找所有父结点为'0'的结点,即"主贴"。

Dim Stack(100,8) '定义堆栈,我这里是100('8'是指每个栈元素分别存放8个字段值)。'可根据实际情况定义堆栈大小,可以按这个公式计算"最多层数*最多展开数"。
while not Rs.eof
Stack(0,0)=RS("self")
Stack(0,1)=RS("father")
Stack(0,2)=RS("title")
Stack(0,3)=RS("author")
Stack(0,4)=RS("datetime")
Stack(0,5)=RS("hits")
Stack(0,6)=RS("reply")
Stack(0,7)=0
Top=1
do until Top=0
Sql_text="select * from article where father="&StackTop&"
RS1.Open Sql_text,MyConn '查找所有父结点为栈顶结点的记录
'输出栈项元素,我这里是直接输出,实际做的时候可以产生表格等等效果
for i=0 to 7
Response.write stack(top-1,i)
next

ParentLevel=stack(top-1,7) '清空堆栈之前获得父记录的层数
for i=0 to 7 '清空堆栈项部
Stack(top-1,i)=""
next
Top=top-1 '栈顶向下移动一格
'将查找到的栈项结点"派生出"的全部子记录存入堆栈
While not RS1.eof
Stack(Top,0)=RS1("self")
Stack(Top,1)=RS1("father")
Stack(Top,2)=RS1("title")
Stack(Top,3)=RS1("author")
Stack(Top,4)=RS1("datetime")
Stack(Top,5)=RS1("hits")
Stack(Top,6)=RS1("reply")
Stack(Top,7)=ParentLevel+1
Rs1.movenext
Top=Top+1 '栈项向上移动
Wend
Rs1.close
loop
Rs.MoveNext '移动到下一条记录
Wend
Rs.close
set Rs=nothing
set Rs1=nothing
%>
amfmsm 2002-09-09
  • 打赏
  • 举报
回复
谢谢,一个html文件 一个js文件,看来挺详细,但可以说说怎么用法吗,就是说怎样套到我得论坛主页里面去呢(大概就可以了)
yonghengdizhen 2002-09-09
  • 打赏
  • 举报
回复
其实无非就是表设计的问题.
结合一些DHTML技术实现.
表通常以id title parent_id形式出现.
DHTML技术实现根据数据量有不同的实现方式.
agefworld 2002-09-09
  • 打赏
  • 举报
回复
knakan ba
amfmsm 2002-09-09
  • 打赏
  • 举报
回复
好阿 呵呵 谢谢先啦 amfmsm@21cn.com
agefworld 2002-09-09
  • 打赏
  • 举报
回复
一个简单的,不知道你用的是否这样,
留下你的mail.
twtetgso 2002-09-09
  • 打赏
  • 举报
回复
观注。。

604

社区成员

发帖
与我相关
我的任务
社区描述
PowerBuilder 控件与界面
社区管理员
  • 控件与界面社区
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧