无限级分类的简单算法实现

一、前言
       很多情况下二级分类已经不能满足需要了，而网上可用的多级分类的例子实在是不好找，故有此文。

代码:
(Access)sql="delete from T_Sort where Instr(sortPath,',"&parentID&",')>0"
复制内容到剪贴板代码:
(MS SQL)sql="delete from T_Sort where CHARINDEX(',"&parentID&",',sortPath)>0"
本算法的精华就在这里啦，仔细想想吧，sortPath最后那个逗号的作用也在这里啦。
                     <4>删除上述所有节点下的商品。同上，表名不同而已。
复制内容到剪贴板代码:
(Access)sql="delete from T_Product where Instr(sortPath,',"&parentID&",')>0"
复制内容到剪贴板代码:
(MS SQL)sql="delete from T_Product where CHARINDEX(',"&parentID&",',sortPath)>0"
<5>范例代码见图6。MS SQL的代码就不贴了。
[center]

图六
[/center]
              [4]移动节点
                     难点哦，睁大眼睛仔细看。
                     <1>选择要移动的节点parentID，选择目的节点toParentID（也就是把当前节点放到谁的下面）。
                     <2>如果parentID=0报错，根节点不能移动。
                     <3>如果toParentID=parentID，这是要把自己放到自己下面，报错。
                     <4>根据parentID，取得它的sortPath，我们叫它fromPath。
                     <5>如果toParentID=0，那么toPath="0,"，如果toParentID<>0，取得它的sortPath，叫它toPath。
                     <6>如果toParentID等于要移动节点的父节点，不需要移动，报错。判断方法是看toPath & parentID &","是否等于fromPath。
                     <7>如果toParentID是要移动节点的子节点，不能移动，报错。判断方法是看Instr(toPath,fromPath)是否大于0。
                     <8>组合要移动节点的新sortPath，也就是newPath=toPath & parentID &","。
                     <9>更新要移动节点及其所有子节点的sortPath（）。如"0,2,3,5,"移动到"0,1,"下，那么新的sortPath就是"0,1,5,"了（想想，对吧）。而"0,2,3,5,"的所有子节点的左半部分都是"0,2,3,5,"，那么只要把"0,2,3,5,"替换成"0,1,5,"就行了。

因为Access好像没有内置repalce函数，所以麻烦了一些。
                     <10>更新要移动节点的parentID。直接update就行啦。
                     <11>商品是跟随分类走的，所以商品的parentID不用更新，只要更新它的sortPath就行了。语句同<9>，只是表名换成T_Product。
                     <12>范例代码见图7。MS SQL的代码只有上面2个SQL语句不同，不贴了。
[center]
图七
[/center]
              [5]前台分类浏览商品
                     前台一般都不会把所有类别一下子都列出来，都是分级浏览的，一层一层的看。我们要做的只是浏览一个分类时，把它的下级分类列出来。
                     <1>取直接子类别，很简单啦。

就行啦。
                     <2>一般我们都会显示一个当前位置，就是分类所在的路径，怎么办呢？难道去递归查询吗？当然不，我这里用了一个小技巧。
                     浏览某一个分类的时候，我们会有一个sortID，可以根据它从T_Sort取得sortPath....不说了，大家看示范代码吧，不懂问我。
                     范例代码见图8。
[center]
图八
[/center]
                     显示的时候用

就OK了。getValueByID是我写的一个Function，见后。
                     <3>显示该类别及其所有子类别下的所有商品。

如果只显示该类别下的商品，那么就用parentID判断就行了。
              [6]前台检索商品
                     如果你的检索表单不包含商品类别，那么没有什么特殊的。如果有商品类别的话，也很简单，SQL的where条件里加一个

就行了。
              [7]后台商品添加、修改
                     添加是要选择所在的分类，这样就可以得到sortID，并能取得它的sortPath，保存到商品记录就行了。
                     修改类似。
              [8]后台商品删除
                     和分类不相关，直接根据productID删除就可。
五、附加信息
       目前还没有拆分出来的代码给大家（太麻烦），主要的东西都在上面啦。
       师傅领进门，修行在个人啦。