UC知道有一段 asp access 循环输出各级分类 的代码看不懂。。。。。。。。
来源：百度知道 编辑：UC知道 时间：2024/06/04 17:49:55
下载了一个CMS，看不懂他 输出 各级 分类的代码，请大家帮我看看，给每句写上 详细的 注释：
我主要看不懂的是：
1。。。有sort(0) 这个函数 吗？ sort(0) 是干 嘛 的？
2。。。sub 不是 要 call 才能执行的吗 ？ 没见有 call啊？ 怎么会执行呢？
3。。。下面这代码的整体思路 到底 是怎么样的？ 每句后面写上注释。
回答的尽量详细，通俗，谢谢！！！
如下就是代码，
（category就是专门放置各级分类的表，，categoryid是分类的ID，parentId 是 分类的父元素ID）
请您选择一个分类：
<select name="categoryid">
<%
sort(0)
dim ii
ii=0
sub sort(selec)
sql="select * from category where ParentID = "&selec&" order by categoryorder"
Set Rs1=Conn.Execute(sql)
do while not rs1.eof
if selec=0 then
%>
<option value="<%=int(rs1("categoryid"))%>"><%=rs1("category")%></option>
<%
else
%>
<option value="<%=int(rs1("categoryid"))%>"><%=string(ii*2," ")%><%=rs1("category")%></option>
<%
en
我主要看不懂的是：
1。。。有sort(0) 这个函数 吗？ sort(0) 是干 嘛 的？
2。。。sub 不是 要 call 才能执行的吗 ？ 没见有 call啊？ 怎么会执行呢？
3。。。下面这代码的整体思路 到底 是怎么样的？ 每句后面写上注释。
回答的尽量详细，通俗，谢谢！！！
如下就是代码，
（category就是专门放置各级分类的表，，categoryid是分类的ID，parentId 是 分类的父元素ID）
请您选择一个分类：
<select name="categoryid">
<%
sort(0)
dim ii
ii=0
sub sort(selec)
sql="select * from category where ParentID = "&selec&" order by categoryorder"
Set Rs1=Conn.Execute(sql)
do while not rs1.eof
if selec=0 then
%>
<option value="<%=int(rs1("categoryid"))%>"><%=rs1("category")%></option>
<%
else
%>
<option value="<%=int(rs1("categoryid"))%>"><%=string(ii*2," ")%><%=rs1("category")%></option>
<%
en
<select name="categoryid"> 应该是一个VBSelect；
<%
sort(0) 调用 sort过程，在VBSelect可以省略Call，如果使用Call应该是 Call sort 注意不加()号
dim ii 声明变量ii
ii=0 变量ii初始化
sub sort(selec) sort过程
sql="select * from category where ParentID = "&selec&" order by categoryorder" SQL语句
Set Rs1=Conn.Execute(sql) 打开数据表
do while not rs1.eof 如果指针不超出最后一条，循环
if selec=0 then 过程变量selec如果为0，判断语句
%>
<option value="<%=int(rs1("categoryid"))%>"><%=rs1("category")%></option> 在下拉选择框添加一条记录，但是我觉得缺少Select，记录的值是<%=int(rs1("categoryid"))%>"><%=rs1("category")%>
<%
else 过程变量selec如果不为0
%>
<option value="<%=int(rs1("categoryid"))%>"><%=string(ii*2," ")%><%=rs1("category")%></option> 在下拉选择框添加一条记录，记录的值是<%=int(rs1(