你是否遇到需要把无限级分类循环出来,是不是很头痛。
比如,要循环出一个SELECT,或一个TABLE,要写一大堆判断。
我的做法是生成数组,可以重复调用,直接循环数组就行了。为了方便,把它写成了类:class.asp。
返回所有分类的数组,并按顺序排列
有4个属性:
set aa=new classlist
aa.id="id"//编号的名称
aa.classname="classname"//分类名称
aa.pid="pid"//父ID名称
aa.db_name="class"//表名
list=aa.arrylist()
?>
类:classlist
class classlist
private c_id
private c_db_name
private c_pid
private c_classname
public property let id(str)
c_id = str
end property
public property let db_name(str)
c_db_name = str
end property
public property let pid(str)
c_pid = str
end property
public property let classname(str)
c_classname = str
end property
dim list()
dim i,n
Private Sub Class_Initialize()'初始化变量
i=0
n=0
End Sub
public function classarry(thisid,pid)'取得下级ID
if pid>0 then
sql="select * from "&c_db_name&" where "&c_pid&"="&thisid
else
sql="select * from "&c_db_name&" where "&c_id&"="&thisid
end if
set rs_c=conn.execute(sql)
n=n+1
do while not rs_c.eof
list(0,i)=rs_c(c_id)'装入数组中
list(1,i)=rs_c(c_classname)
list(2,i)=n
'n=n+1
i=i+1
thisid=classarry(rs_c(c_id),1)'这里递归调用,直到最后一个子类
rs_c.movenext
loop
n=n-1
rs_c.close
end function
public function arrylist()'循环出所有根类
set rs_c=conn.execute("select count("&c_id&") from "&c_db_name)
lenght=rs_c(0)
rs_c.close
redim list(2,lenght)'设置数组
set rs1=conn.execute("select "&c_id&" from "&c_db_name&" where "&c_pid&"=0")
do while not rs1.eof
call classarry(rs1(c_id),0)
'n=1
rs1.movenext
loop
rs1.close
arrylist=list
end function
end class
%>
实例测试:
表class
字段
id:自动编号
classname:名称
pid:父ID
文件名:test.asp
<%
Set conn=Server.CreateObject("ADODB.connection")
Set Rs = Server.CreateObject("ADODB.Recordset")
StrDSN = "Driver={Microsoft Access Driver (*.mdb)}; DBQ="
StrDSN = StrDSN & Server.MapPath("test.mdb")
conn.Open strDSN
function ins(num)
str=""
for ii=1 to num
str=str&"|-"
next
ins=str
end function
set aa=new classlist
aa.id="id"
aa.classname="classname"
aa.pid="pid"
aa.db_name="class"
list=aa.arrylist()
response.write "<table border=1><tr><td>ID</td><td>名称</td>< td>第几类</td></tr>"
for j=0 to ubound(list,2)
response.write "<tr><td>"&list(0,j)&"</td><td>"&list(1,j)&"</td><td>"&list(2,j)&"</td></tr>"
next
response.write "</table>"
'response.write list(1,3)
%>
<select name="">
<% for i=0 to ubound(list,2)%>
<option value=""><%
response.write ins(list(2,i))
response.write list(1,i)%></option>
<%next%>
</select>
循环结果:
www./code/class/test.asp
基本可以满足通常的需要啦。
您可能感兴趣的文章:
php将地区分类排序的算法
使用php数组实现的无限分类(不使用数据库与用递归)
php写的一个递归实现无限分类生成下拉列表的函数
php与mysql实现的无限级分类
对ecshop中的无限级分类的分析
php用递归方法实现无限级分类的代码
php实现的无极分类(递归)的代码
自PHP 4.2.0 开始,register_globals 的默认值为 off,如此,以前很多可以直接使用的变量,如 $PHP_SELF 或设定的SESSION变量都不能用 “$变量名”的形式访问了,可能会带来诸多不便,但却有助于安全性的提高。访问这些变量,你需要使用PHP 超全局变量,如下:
$_SERVER
变量由 Web 服务器设定或者直接与当前脚本的执行环境相关联。类似于旧数组 $HTTP_SERVER_VARS 数组。以前的$PHP_SELF对应$_SERVER['PHP_SELF'],你可以使用phpinfo来查看你的$_SERVER变量。
$_GET
经由 HTTP GET 方法提交至脚本的变量。类似于旧数组 $HTTP_GET_VARS 数组。
$_POST
经由 HTTP POST 方法提交至脚本的变量。类似于旧数组 $HTTP_POST_VARS 数组。
$_COOKIE
经由 HTTP Cookies 方法提交至脚本的变量。类似于旧数组 $HTTP_COOKIE_VARS 数组。
$_SESSION
当前注册给脚本会话的变量。类似于旧数组 $HTTP_SESSION_VARS 数组。
$_FILES
经由 HTTP POST 文件上传而提交至脚本的变量。类似于旧数组 $HTTP_POST_FILES 数组。
$_ENV
执行环境提交至脚本的变量。类似于旧数组 $HTTP_ENV_VARS 数组。
对于$_FILES变量:(文件域字段为“myfile”)
$_FILES['myfile']['name']
客户端机器文件的原名称(包括路径)。
$_FILES['myfile']['type']
文件的 MIME 类型,需要浏览器提供该信息的支持,例如“image/gif”。
$_FILES['myfile']['size']
已上传文件的大小,单位为字节。
$_FILES['myfile']['tmp_name']
文件被上传后在服务端储存的临时文件名(包括路径)。
$_FILES['myfile']['error']
和该文件上传相关的错误代码。['error'] 是在 PHP 4.2.0 版本中增加的。
当 php.ini 中的 register_globals 被设置为 on 时,$myfile_name 等价于 $_FILES['myfile']['name'],$myfile_type 等价于 $_FILES['myfile']['type']等。
对ecshop中的无限级分类的分析,其算法比较精典,且不难理解。
以下的代码配了详细的注释,建议大家仔细阅读,定可提高自己的水平。
<?php
function cat_options($spec_cat_id, $arr)
{
static $cat_options = array();
if (isset()($cat_options[$spec_cat_id]))
{
return $cat_options[$spec_cat_id];
}
/*
初始化关键参数:
$level:当前子节点深度
$last_cat_id:当前父节点ID
$options:带有缩进级别的数组
$cat_id_array:沿同一路径的父节点依次进驻
$level_array:该节点的子节点深度,也是依次进驻
*/
if (!isset($cat_options[0]))
{
$level = $last_cat_id = 0;
$options = $cat_id_array = $level_array = array();
while (!empty($arr))//如果还有待构造的节点则继续遍历
{
foreach ($arr AS $key => $value)
{
$cat_id = $value['cat_id'];
//一级分类结点
if ($level == 0 && $last_cat_id == 0)
{
if ($value['parent_id'] > 0)
{
break;
}
$options[$cat_id] = $value;
$options[$cat_id]['level'] = $level;
$options[$cat_id]['id'] = $cat_id;
$options[$cat_id]['name'] = $value['cat_name'];
//遍历过了就不再遍历
unset($arr[$key]);
if ($value['has_children'] == 0)
{
continue;
}
$last_cat_id = $cat_id;//下层结点的父亲结点
$cat_id_array = array($cat_id);
$level_array[$last_cat_id] = ++$level;
continue;
}
//当前结点的父亲结点ID等于它的上一级结点ID
if ($value['parent_id'] == $last_cat_id)
{
$options[$cat_id] = $value;
$options[$cat_id]['level'] = $level;
$options[$cat_id]['id'] = $cat_id;
$options[$cat_id]['name'] = $value['cat_name'];
unset($arr[$key]);//遍历过了就不再遍历
//如果当前结点有孩子则当前结点要进驻,但不再遍历;反之不进驻也不再遍历
if ($value['has_children'] > 0)
{
if (end($cat_id_array) != $last_cat_id)
{
$cat_id_array[] = $last_cat_id;
}
$last_cat_id = $cat_id;//当现结点做为下一级结点的新的父亲结点
$cat_id_array[] = $cat_id;//进驻
$level_array[$last_cat_id] = ++$level;//当前结点的下一级结点深度
}
}
elseif ($value['parent_id'] > $last_cat_id)
{//如果当前结点父亲深度大于目前父亲结点的深度则进行下一轮循环
break;
}
}//endforeach
$count = count($cat_id_array);
if ($count > 1)
{
//取出最后进驻的父亲节点作为当前父亲节点
$last_cat_id = array_pop($cat_id_array);
}
elseif ($count == 1)
{
if ($last_cat_id != end($cat_id_array))
{
//进驻的父亲结点只有一个时并且没有作为当前父亲节点时把它取出
$last_cat_id = end($cat_id_array);
}
else
{ //否则最后取出的父亲结点一定是一级分类结点
$level = 0;
$last_cat_id = 0;
$cat_id_array = array();
continue;
}
}
if ($last_cat_id && isset($level_array[$last_cat_id]))
{
//取出当前结点的深度
$level = $level_array[$last_cat_id];
}
else
{
$level = 0;
}
}//end while,此时已完成非递归前序遍历构造树的工作,其中$options已保存了从根结点开始的所有结点带有分层性质的数组
$cat_options[0] = $options;
}
else
{
$options = $cat_options[0];
}
//如果从0开始即取整个树则直接返回不再处理.
if (!$spec_cat_id)
{
return $options;
}
//否则开始从指定结点截取,以下比较简单我还是稍微说说吧,要说就说几个参数含义吧
/*
$spec_cat_id_level:截取结点的深度
$spec_cat_id_array:最终返回的以该结点为根结点的一棵商品分类树
最终返回的数组是这样排序的:按父亲结点大小,按直接父亲结点,按同一父亲结点这样的先根遍历,具个例子:
一级结点有1,5 二级结点有2,6,7 三级结点有8,9,如果1的直接孩子是2,6而2的直接孩子是8,9;另外
5的直接孩子是7那么最终的数组是这样排列的1->2->8->9->6->5->7
*/
else
{
if (empty($options[$spec_cat_id]))
{
return array();
}
$spec_cat_id_level = $options[$spec_cat_id]['level'];
foreach ($options AS $key => $value)
{
if ($key != $spec_cat_id)
{
unset($options[$key]);
}
else
{
break;
}
}
$spec_cat_id_array = array();
foreach ($options AS $key => $value)
{
if (($spec_cat_id_level == $value['level'] && $value['cat_id'] != $spec_cat_id) ||
($spec_cat_id_level > $value['level']))
{
break;
}
else
{
$spec_cat_id_array[$key] = $value;
}
}
$cat_options[$spec_cat_id] = $spec_cat_id_array;
return $spec_cat_id_array;
}
}
?>
您可能感兴趣的文章:
php将地区分类排序的算法
使用php数组实现的无限分类(不使用数据库与用递归)
php写的一个递归实现无限分类生成下拉列表的函数
php与mysql实现的无限级分类
php把无限级分类生成数组的类
php用递归方法实现无限级分类的代码
php实现的无极分类(递归)的代码