网络编程
位置：首页>> 网络编程>> Asp编程>> asp分类算法要解决的问题（5）

asp分类算法要解决的问题（5）

　　发布时间：2009-09-10 16:49:00　

标签：分类,树,算法

第四个问题

现在我们回头看看第四个问题：怎样得到某个分类下的所有产品。由于采用了位编码，现在问题变得很简单。我们很容易推算：某个产品属于某个类别的条件是Product.FatherID&（Catalog.ID的特征码）=Catalog.ID。其中“&”代表位与算法。这在SQL Server中是直接支持的。

举例来说：产品所属的类别为：1092787200，而当前类别为1092780032。当前类别对应的特征值为：4294950912，由于1092787200&4294950912=8537400，所以这个产品属于分类8537400。

我们前面已经给出了计算特征码的公式。特征码并不多，而且很容易计算，可以考虑在Global.asa中Application_OnStart时间触发时计算出来，存放在Application(“Mark”)数组中。

当然，有了特征码，我们还可以得到更加有效率的算法。我们知道，虽然我们采用了位编码，实际上还是一种顺序编码的方法。表现出第I级的分类编码肯定比第I+1级分类的编码要小。根据这个特点，我们还可以由FID得到两个特征码，其中一个是本级位特征码FID0，一个是上级位特征码FID1。而产品属于某个分类FID的充分必要条件是：

Product.FatherID>FID0 and Product.FatherID<FID1

下面的程序显示分类FID下的所有产品。由于数据表Product已经对FatherID进行索引，故查询速度极快：

<％

REM oConn---数据库连接，已经打开

REM FID---当前分类

REM FIDMark---特征值数组，典型的情况下为Application(“Mark”)

REM k---数组元素个数，也是分类的级数

Sub GetAllProduct(oConn,FID,FIDMark byref,k)

REM 根据FID计算出特征值FID0,FID1

for i=k to 1

if (FID and FIDMark = FID ) then exit

next


strSQL = "select Name from Product where FatherID>"FIDMark(i)&" and FatherID<"FIDMark(i-1)

set rsProduct=oConn.Execute(strSQL)％>

<UL><％

Do While Not rsProduct.Eof％>

<LI><％=rsProduct("Name")

Loop％>

</UL><％

rsProduct.Close

End Sub

％>

关于第5个问题、第6个问题，就留作习题吧。有了上面的位编码，一切都应该迎刃而解。

第一页 上一页 1 2 3 4
5
0
投稿

猜你喜欢

手机版 网络编程 asp之家 www.aspxhome.com