sort.asp

来自「实现一个用JSP、Servlet技术实现的小型物流网站系统。实现功能如下：管理员」· ASP 代码 · 共 89 行

ASP
89 行
字号 
<%@ codepage ="936" %>
<%
if session("globalecmaster")="" or session("masterflag")="" then
response.write "<script language='javascript'>"
response.write"parent.location.href='../login.asp';</SCRIPT>" 
response.end
end if

'权限限制^^^^^^^^^^^^^^^^^^^^
 dim ishavegant
 ishavegant=false
 in_str=split(session("masterflag"),",")
 for each ins in in_str
 if trim(ins)="82" then 
 ishavegant=true
 end if
 next 
 if ishavegant=false then
 response.redirect "../err.asp"
 response.end
 end if


%>
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<LINK href="../css/style.css" rel=stylesheet type=text/css>
<% data_path="../../" 'ACC连接数据库路径，对SQL无效 %>
<!--#include file="../../conn/conn.asp"-->
<script language="javascript">
function del_help_sort(id){
if (confirm("删除大类将删除下属的小类！真的要删除这个大类吗?")) 
window.location.href="Admin_class_ok.asp?action=del_help_sort&id="+id+""
} 
</script>
</HEAD>
<table width="98%" border="0" cellspacing="0" cellpadding="0"  align=center class="tableBorder"> 
  <tr> 
     <th height=25 colspan="2" class="tableHeaderText">帮助信息类别管理 </th> 
  </tr> 
  <tr> 
     <td colspan="2" class="forumRowHighlight"><p><B>注意</B>：<BR> 
         <font color="blue">①类别直接与之前发布的信息相关联，删除类别可能会影响到之前发布的信息。<br>
	    ②点击类别名称进入相应下级分类，点击相应的分类操作属性进行相应操作。</font><br>
		 <font color="red">③如：要添加二级分类——>先点击大类进入二级类——>添加二级类别</font>
[<a href="sort.asp">返回大类</a>]    </td> 
  </tr> 
</table>
<%
set rssort=server.createobject("adodb.recordset")
sql="select * from Yixiang_help_sort "
rssort.open sql,conn,1,1
%>
<br>
<table width="98%" border="0" align="center" cellpadding="0" cellspacing="0" class="tableBorder">
	<tr> 
	<th height="22">帮助信息大类列表</th>
	</tr>
<TR> 
<TD height=25 class=bodytitle>&nbsp;<IMG src="../images_new/plus.gif" width="9" height="9">&nbsp;&nbsp;<a href="admin_class_ok.asp?action=add_help_sort"><font color=red><b>添加帮助信息大类</b></font></a></td>
</tr>
<tr>
<td valign=top>
<TABLE width="100%" border="0" cellpadding="5" cellspacing="5">
<TR> 
<%
if rssort.eof then
response.Write"<br><br><div align='center'>暂无类别请<a href=admin_class_ok.asp?action=add_help_sort>添加</a></div><br><br>"
else
j=1
do while not rssort.eof
%>
<td width="28%" height="25" align="left" class="Forumrow"><p style="line-height: 150%"><IMG src="../images_new/plus.gif" width="9" height="9"> <a href="type.asp?sortid=<%=rssort("sortid")%>"><%=rssort("sort")%></a> 〖<a href=Admin_class_ok.asp?action=edit_help_sort&id=<%=rssort("sortid")%>><font color=#ff0000>修改</font></a>│<a href='javascript:del_help_sort(<%=rssort("sortid")%>)'><font color=#ff0000>删除</font></a>〗</td>
<%if j mod 3 = 0 then %></tr><tr><%end if%>
<% rssort.movenext
j=j+1
loop
rssort.close
set rssort=nothing
end if
%>
</TABLE> 
</TD>
</TR>
</TBODY>
</TABLE>
<br>
<!--#include file="../copy.asp" -->

sort.asp - 源码说明

本页面展示了「实现一个用JSP、Servlet技术实现的小型物流网站系统。实现功能如下：管理员通过登录该系统」中的 sort.asp 源码文件，采用 ASP 编程语言编写，共 89 行代码。您可以在线阅读完整代码内容，也可以返回资源详情页下载完整源码包进行本地学习和开发。

虫虫下载站收录了大量与JSP相关的技术资源，包括源代码、技术文档、电路图等，是电子工程师和嵌入式开发者的专业学习平台。

⌨️ 快捷键说明

复制代码Ctrl + C
搜索代码Ctrl + F
全屏模式F11
增大字号Ctrl + =
减小字号Ctrl + -
显示快捷键?