⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 sort_admin.asp

📁 这是一个物流网站的源代码
💻 ASP
字号:
<!--#include file="../inc/CheckAdmin.asp"-->
<!--#include file="../inc/Config.asp"-->
<!--#include file="../inc/Conn.asp"-->
<% 

types=formatStr(Request("type"))
if types="" then types="1"
if types="1" then
	table="hfrom"
	zid="hf_id"
	ziduan="hf_name"
elseif types="2" then
	table="hto"
	zid="ht_id"
	zpid="ht_pid"
	ziduan="ht_name"
else
	table="harea"
	zid="ha_id"
	ziduan="ha_name"
end if 
set rs=server.CreateObject("ADODB.recordset")
rs.open "select "&zid&","&ziduan&" from "& table,conn,1,1
rs.pagesize=20 
%>
<!--#include file="../../inc/Page_function.asp"-->
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>无标题文档</title>
</head>
<link href="../Css_Main.css" rel="stylesheet" type="text/css">
<style type="text/css">
<!--
.style2 {color: #FF0000}
.style1 {color: #CCCCCC}
-->
</style>
<script language="JavaScript">
<!--
function CheckAll(formall)
  {
  for (var i=0;i<formall.elements.length;i++)
    {
    var e = formall.elements[i];
    if (e.name == 'delid')
       e.checked = formall.chkall.checked;
    }
  }
  
  -->
</script>
<body>
<table width="98%"  border="0" align="center" cellpadding="0" cellspacing="1" class="border">
  <tr>
    <td class="title_dh"><div align="center">路线管理——分类管理</div></td>
  </tr>
  <tr>
    <td class="tdbg"><div align="left"><strong>类别:</strong>
          <input type="radio" name="type"value="1"  onClick="location.href='?type='+this.value" <% If types="1" Then Response.Write(" checked") %>>
      起运站&nbsp;
      <input type="radio" name="type" value="2"  onClick="location.href='?type='+this.value" <% If types="2" Then Response.Write(" checked") %>>
    目的站&nbsp;
	<input type="radio" name="type" value="3"  onClick="location.href='?type='+this.value" <% If types="3" Then Response.Write(" checked") %>>
    区域&nbsp;
    <label>
    <input type="button" name="Submit" value="添加" onClick="window.location.href='Sort_Add.asp?type=<%= types %>'">
    </label>
    </div></td>
  </tr>
</table>
<table width="98%"  border="0" align="center" cellpadding="0" cellspacing="0">
  <tr>
    <td height="20"></td>
  </tr>
</table>
<table width="99%"  border="0" align="center" cellpadding="0" cellspacing="1" class="border">
  <tr class="title_top">
    <td height="32%"><div align="center">ID</div></td>
    <td width="50%"><div align="center">类别名称</div></td>
    <td width="33%"><div align="center">操 作</div></td>
  </tr>
  <%if rs.eof then%>
  <tr class="tdbg" align="center">
    <td colspan="3">还未添加内容</td>
    </tr>
  <%else
  for i=1 to rs.pagesize
  if rs.eof then exit for%>
  <tr class="tdbg" align="center">
    <td><%= rs(zid) %></td>
    <td><a href="Sort_Edit.asp?id=<%= rs(zid) %>&type=<%= types %>"><%= rs(ziduan) %></a></td>
    <td><a href="Sort_Edit.asp?id=<%= rs(zid) %>&type=<%= types %>">修改</a> | <a href="Sort_Del.asp?delid=<%= rs(zid) %>&type=<%= types %>" onClick="return confirm('此操作不可恢复,确定执行吗?');">删除</a></td>
  </tr>
  <%rs.movenext
  next%>
</table>
<table width="98%"  border="0" align="center" cellpadding="0" cellspacing="0">
  <tr>
    <td height="40">&nbsp;</td>
  </tr>
</table>
<table width="98%"  border="0" align="center" cellpadding="0" cellspacing="1" class="border">
  <tr>
    <td>
      <div align="center"><!-- #include file="../../inc/showpage.asp" --></div></td>
  </tr>
</table>
<% end if
   rs.close
   set rs=nothing
%>
</body>
</html>


⌨️ 快捷键说明

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