1.3.2的修改

1. 对 InsertNode进行了修改，不会再发生传送的节点id有错误而默认插入到根下的行为。 （出于安全考虑而去掉）
   
2. 完善了SubTree函数
   
3. 添加了path函数可以得到路径
   
4. 添加了alterNode可以修改节点名称以及在兄弟节点中的位置。

许可：GUN LGPL

测试地址：http://lxbzj.com/product/dbtree/index.asp

DBTree使用说明

目录

1. 简介
   
2. 特点
   
3. 如何使用

简介

DBTree是database tree的缩写。意思是数据库中的树形结构。

DBTree是一个勇于数据库服务器环境中的，在数据库中记录树形数据结构的快速解决方案，即人们通常说的无限级目录问题，本文档统称为树，而且是树结构在数据库中的实现。

DBTree包含了各种不同的版本：asp+access、等等。

特点

通常情况下，树在数据库中实现的时候采用的是树的双亲表示法，设一个编号字段id,和一个父亲编号字段parent_id,来实现树形结构。这种数据结构的特点是：操作简单，几乎不用维护，然而优点带来的问题是对树进行遍历的时候系统开销极大，需要进行递归操作，因此不能够无限制的增加树的深度。普遍采用了异步读取的方式来减少系统开销。一些改进的方法也避免不了这一问题。

在绝大多数情况下，服务器上要求对树的遍历任务占据了对树的操作的任务的大部分，可见如果针对数遍历来做优化能极大地提高效率减轻服务器负担。

或者还是采用双亲表示法，采用异步读取才减轻系统开销，但是这样依然不能解决例如树的深度、路径、删除等的问题

在本程序中采用了更适应遍历的数的表示结构。能极大地降低系统开销，也能很优秀的解决一些树的高级操作，更适应于数据库。

如何使用

使用本程序，需要预先准备一个数据库，且设置好数据库联接。

1.数据库的定义：

2.在需要使用的页面使用服务器包含命令：<!--#include file="dbtree.asp" -->

3.初始化一个对象实例，然后初始化数据库联接字符串和其他变量

<%@ LANGUAGE="VBSCRIPT" CODEPAGE="936"%>
<% option explicit 'TRANSACTION = Required%>
<!--#include file="dbtree.asp" -->
<%
Dim MM_btree_STRING '数据库联接字符串
MM_btree_STRING = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source= "&server.mappath("tree.mdb")
%>
<%
dim tree
set tree=new DBtree
tree.conn=MM_btree_STRING '指定联接字符串
tree.table="tree"'制定表名
tree.id="id"'制定列名
tree.p_id="p_id"
tree.porder="porder"
%>


4接下来就可以对树进行各种操作了：

实例：

1.将树显示为列表：

<%
Dim arr1(1,0),arr2(1,0),cache
arr1(0,0) = "<ul>"
arr1(1,0) = "</ul>"
arr2(0,0) = "<li>{name}"
arr2(1,0) = "</li>"
cache = tree.display(0,-1,arr1,arr2,"relative")
response.write(cache)
%>

2.插入，删除等

select case request.Form("submit")
case "移动"
msg =tree.moveNode(request.Form.Item("src"),request.Form.Item("des"))
case "删除"
msg =tree.delNode(request.Form("node"),false)
case "永久删除"
msg =tree.delNode(request.Form("node"),true)
case "恢复"
msg =tree.undel(request.Form("undel"))
end select

3.其他的操作请参见实例

4.API

整个程序是一个类，提供插入、移动、删除、显示、输出为列表控件等接口，以后功能还会不断完善。

©linzsoft.com2006-05-26