class.asp

请认真阅读您的文件包然后写出其具体功能(至少要20个字)。尽量不要让站长把时间都花费在为您修正说明上。压缩包解压时不能有密码。

<!--#include file="../conn.asp"-->
<!--#include file="../inc/const.asp"-->
<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
<%
anysale.chkAdmin ",5,","琛屼笟鍒嗙被绠＄悊"

select case request("action")
	case "add"
		call add()
	case "saveAdd"
		call saveAdd()
	case "edit"
		call edit()
	case "saveEdit"
		call saveEdit()
	case "del"
		call del()
	case "order"
		call order()
	case else
		call main()
end select

sub main()
%>
<div id="class">
<!--class-->
<div class="subNav">
 <ul class="linkA" onmouseover="this.className='linkN'" onmouseout="this.className='linkA'"><li class="linkL"></li><li class="linkM"><a href="javascript:anysale();" onclick="getPage('admin/class.asp','class');">琛屼笟绠＄悊</a></li><li class="linkR"></li></ul>
 <ul class="linkA" onmouseover="this.className='linkN'" onmouseout="this.className='linkA'"><li class="linkL"></li><li class="linkM"><a href="javascript:anysale();" onclick="getPage('admin/class.asp?action=add','classDetail');mod('classList','classDetail');">娣诲姞琛屼笟</a></li><li class="linkR"></li></ul>
 <ul class="linkA" onmouseover="this.className='linkN'" onmouseout="this.className='linkA'"><li class="linkL"></li><li class="linkM"><a href="javascript:anysale();" onclick="getPage('admin/class.asp?parentID=<%=request("parentID")%>','class');">鍒锋柊</a></li><li class="linkR"></li></ul>
</div>

<form name="classForm" id="classForm" method="post">
<div class="item" id="classItem">
 <ul>
  <li class="intro">琛屼笟鍚嶇О</li>
  <li class="names">鎿嶄綔</li>
  <li class="views">鎺掑簭</li>
 </ul>
</div>

<div class="list contentBig" id="classList">
<%classlist request("parentID")%>
</div>
</form>

<div class="detail" id="classDetail" style="display:none;"></div>
<!--class.end-->
</div>
<%
end sub

sub classlist(parentID)
	dim rs,i
	if parentID="" then parentID=0 end if
	set rs=conn.execute("select classID,className,parentID,depth,child from as_class where parentID="&parentID&" order by orders,rootID")
	do while not rs.eof
%>
<ul onmouseover="this.className='hover'" onmouseout="this.className=''">
 <li class="intro">
<%
	if rs("child")>0 then
		response.write" <span class=""iParent"" style=""margin:5px 0 0 "&rs("depth")*16&"px;""></span>"
	else
		response.write" <span class=""iChild"" style=""margin:5px 0 0 "&rs("depth")*16&"px;""></span>"
	end if
	if rs("parentID")=0 then
		response.write "<strong><a href=""javascript:anysale();"" onclick=""getPage('admin/class.asp?parentID="&rs("classID")&"','class');"">"&rs("className")&"</a></strong>"
	else
		response.write rs("className")
	end if
	if rs("child")>0 then
		response.write " ("&rs("child")&")"
	end if
%>
 </li>
 <li class="names">
  <a href="javascript:anysale();" onclick="getPage('admin/class.asp?action=add&amp;editID=<%=rs("classID")%>','classDetail');mod('classList','classDetail');">娣诲姞瀛愯