如何实现论坛的树状记录表展开技术?
发布时间:2010-05-19 21:37:00
请问论坛的树状记录表是怎么展开的?如何做?论坛的这种展开技术一般采用两种方法实现,一种是采用递归的方法,优点是逻辑简单,编程简单,缺点是速度慢,占用系统资源大;另一种是采用堆栈技术,优点是速度快,省资源,缺点当然是编写麻烦了。
下面我们来介绍一下后者。具体设计方法是
1、读出所有父结点为“0”的记录,即“主贴”,全部放入堆栈;
2、输出位于栈顶的一条记录(“主贴”)数据,并清空栈顶,使栈顶下移一格;
3、查找所有父结点为该栈项结点(“主贴”)的记录(“回贴”),也把它们都放于栈顶。这样,我们完成了输出一条父记录,并展开其子结点的操作;
4、按上面2、3的方法,依次类推,直到栈为空为止。
5、根据操作要求,还要取得到记录的层数、回复数等。
看看具体操作的代码和说明:
<%
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
%>
表结构(article):
序号 | 字段 | 类型 | 说明 |
1 | self | int | 本记录ID号。自动增长的字段 |
2 | father | int | 父记录ID号。若该记录内容为“回贴”则此字段值为“主贴”的ID号;若该记录为“主贴”则它的父结点应该为“0” |
3 | title | char | 贴子标题 |
4 | author | char | 贴子作者 |
5 | datetime | date | 发贴日期时间 |
6 | hits | int | 点击数 |
7 | reply | int | 回复数 |
猜你喜欢
- 分离结构与表现的另一个重要方面是使用语义化的标记来构造文档内容。一个 XHTML 元素的存在就意味被标记内容的那部分有相应的结构化的意义,没
- 使用ENUM代替字符串类型有时候, 可以通过使用ENUM来代理常规的字符串类型。一个ENUM列能够存储65535个不同的字符串值,MySQL
- 解决方法:1。 改表法。可能是你的帐号不允许从远程登陆,只能在localhost。这个时候只要在localhost的那台电脑,登入mysql
- 由于需求没有做好或者客户是外行,不能很好的配合你做好需求,我在使用asp+access的时候非常头疼,遇到数据结构的改动,就必须修改acce
- 论坛有人问起如何获取读取CSS属性值,就写了下面这段兼容各浏览器的获取HTML元素的css属性值函数:function getSt
- 这个效果前些日子有人在论坛问起,今天有空研究了下。我打了原创标记,因为我在写这个方法时的确没有参考过别人的代码。我的方法其实就是层遮罩加AL
- 各大云计算提供商(亚马逊、谷歌和微软)目前都使用了键/值存储方式。然而,在San Francisco召开的MSDN开发者大会上,微软宣布他们
- 原文地址:30 Days of Mootools 1.2 Tutorials - Day 8 - Input Filtering Part
- 但是,具有identity特性的字段,不需要具有唯一性,更不必须是主键。 可以通过,set identity_insert tablenam
- 哲学上有种说法,“运动是绝对的,静止是相对的”。我们在编写各样的效果时,时常会碰到动画。下面的章,将讨论动画的原理以及实现。动画,简而言之就
- 从MySQL 5.0.2开始,通过mysql_stmt_attr_set() C API函数实现了服务器端光标。服务器端光标允许在服务器端生
- XML是一个精简的SGML,它将SGML的丰富功能与HTML的易用性结合到Web的应用中。XML保留了SGML的可扩展功能,这使XML从根本
- ASP中从数据库读取二进制文件数据代码:<%driver_name1="DRIVER={Microsoft&n
- asp之家注:防止表单重复提交的方法,在客户端其实很容易实现,只要使用js让用户第一次点击提交按钮后,把提交按钮设置为disabled,这样
- 首先安装WSH,NT(SERVER、WORKSTATION)、W2K服务器上需要安装WSH2.0或者更高版本。然后,参照下列代码即可:<
- 错误号 错误信息5 &n
- 在MySQL中有两种方法1、create table t_name select ...2、create table t_name like
- 到目前为止,我已经开发了两个HTML编辑器了,一个用在公司的CMS项目,另一个用在这个Blog(TidyEditor,暂时没有单独发布)。下
- 设计中文网站的朋友都会有这样的体会,Dreamweaver功能虽然强大,但要按照中文的行文习惯实现每个
- 阅读上一篇:什么是名字空间<meta http-equiv="Content-Type" co