整理一个asp多级树型分类问题的解决方法(4)
来源:csdn 时间:2007-10-17 18:38:00
修改后的GetChildren就可以完成显示FID分类的所有子分类的任务。要显示所有的分类,只需要如此调用就可以了:
<%
REM strConn--连接数据库的字符串,请根据情况修改
set oConn = Server.CreateObject("ADODB.Connection")
oConn.Open strConn
=GetChildren(oConn,-1)
oConn.Close
%>
如何查找某个分类的所有产品;
现在来解决我们在前面提出的第四个问题。我们假设产品的数据表如下定义:
Create Table Product(
[ID] [int] NOT NULL,
[Name] [nvchar] NOT NULL,
[FatherID] [int] NOT NULL
);
其中,ID是产品的编号,Name是产品的名称,而FatherID是产品所属的分类。
对第四个问题,很容易想到的办法是:先找到这个分类FID的所有子类,然后查询所有子类下的所有产品。实现这个算法实际上很复杂。代码大致如下:
<%
Function GetAllID(oConn,FID)
Dim strTemp
If FID=-1 then
strTemp = ""
else
strTemp =","
end if
strSQL = "select Name from catalog where FatherID="&FID
set rsCatalog = oConn.Execute(strSQL)
Do while not rsCatalog.Eof
strTemp=strTemp&rsCatalog("ID")&GetAllID(oConn,Catalog("ID")) REM 递归调用
Loop
rsCatalog.Close
GetAllID = strTemp
End Function
REM strConn--连接数据库的字符串,请根据情况修改
set oConn = Server.CreateObject("ADODB.Connection")
oConn.Open strConn
FID = Request.QueryString("FID")
strSQL = "select top 100 * from Product where FatherID in ("&GetAllID(oConn,FID)&")"
set rsProduct=oConn.Execute(strSQL)
%>
<UL><%
Do while not rsProduct.EOF
%>
<LI><%=rsProduct("Name")%>
<%
Loop
%>
</UL>
<%rsProduct.Close
oConn.Close
%>
标签:树,分类,asp
0
投稿
猜你喜欢
Python将8位的图片转为24位的图片实现方法
2021-07-31 12:11:42
Bootstrap实现提示框和弹出框效果
2023-07-02 05:25:33
SQL Server CROSS APPLY和OUTER APPLY的应用详解
2024-01-21 02:27:21
解密ThinkPHP3.1.2版本之独立分组功能应用
2023-11-20 09:06:02
基于信息排序的信息理解
2008-05-16 10:37:00
python内存监控工具memory_profiler和guppy的用法详解
2023-02-17 01:15:18
CSS3中的box-sizing属性
2010-04-05 21:52:00
在SQL Server 2005数据库中更改数据架构
2009-01-19 13:06:00
Python中的np.vstack()和np.hstack()详解
2022-05-09 03:06:56
一篇文章读懂Golang init函数执行顺序
2024-04-27 15:40:37
CentOS7安装MySQL 8.0.26的过程
2024-01-20 08:28:01
如何向scrapy中的spider传递参数的几种方法
2021-12-16 20:04:48
Python warning警告出现的原因及忽略方法
2021-10-16 10:59:02
js和php如何获取当前url的内容
2023-11-14 10:09:12
python爬虫爬取淘宝商品信息(selenum+phontomjs)
2022-07-07 05:40:52
Python之父谈Python的未来形式
2022-02-05 11:10:42
js实现微信聊天效果
2024-04-16 09:14:33
python实现创建新列表和新字典,并使元素及键值对全部变成小写
2023-12-30 00:24:26
python爬虫 模拟登录人人网过程解析
2023-06-18 18:42:19
用css3-tranistions实现平滑过渡
2009-12-23 19:24:00