📄 xinxi.asp

📁 这是一个关于企业物流平台的东东
💻 ASP
字号:
<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%>
<!--#include file=../../conn/adminconn.asp-->
<!--#include file="login.asp"-->

<%
	'删除指定的运单
	if request("del")<>"" then
	sql1="delete from yundan where id="&request("del")
	conn.execute(sql1)
	end if 
	'通过运单编号查询运单详细信息
	if request("pp")<>"" then 
		set rs=server.CreateObject("adodb.recordset")
		sql="select * from yundan where nid='"&request("bianhao")&"'"
		rs.open sql,conn,1,1
	else
		'降序排列所有运单
		set rs=server.CreateObject("adodb.recordset")
		sql="select * from yundan order by time desc"
		rs.open sql,conn,1,1
	End If
%>
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>无标题文档</title>
<style type="text/css">
<!--
.style3 {color: #FFFFFF}
body,td,th {
	font-size: 12px;
}
a:link {
	color: #000000;
	text-decoration: none;
}
a:visited {
	color: #000000;
	text-decoration: none;
}
a:hover {
	color: #000000;
	text-decoration: none;
}
a:active {
	text-decoration: none;
}
.style4 {color: #FF0000}
.style5 {color: #000000}
-->
</style>
</head>

<body>

<form name="form1" method="post" action="">
  <table width="95%"  border="0" align="center">
    <tr>
      <td height="30" valign="middle" bgcolor="#FF9900">　请输入您要查找的编号：
      <input name="bianhao" type="text" id="bianhao">
      <input type="submit" name="Submit" value="查找">
      <input name="pp" type="hidden" id="pp" value="tt"></td>
    </tr>
  </table>
</form>
<br>
<table width="95%"  border="0" align="center">
  <tr>
    <td height="30" valign="middle" bgcolor="#FF9900">　<a href="yundanadd.asp">添加</a><a href="yundanadd.asp"><img src="../images/profile.gif" width="45" height="18" border="0" align="absbottom"></a></td>
  </tr>
</table>
<br>
<table width="95%"   border="0" align="center" cellspacing="1" bgcolor="#CCCCCC">
  <tr >
    <td height="35" background="../images/tiao.gif"><div align="center"><span class="style5">运单编号</span></div></td>
    <td background="../images/tiao.gif"><div align="center"><span class="style5">寄件地</span></div></td>
    <td background="../images/tiao.gif"><div align="center"><span class="style5">目的地</span></div></td>
    <td background="../images/tiao.gif"><div align="center"><span class="style5">寄件日期</span></div></td>
    <td background="../images/tiao.gif"><div align="center"><span class="style5">签收人/未签收原因</span></div></td>
    <td background="../images/tiao.gif"><div align="center"><span class="style5">签收时间</span></div></td>
    <td background="../images/tiao.gif"><div align="center"><span class="style5">指派分公司</span></div></td>
    <td background="../images/tiao.gif"><div align="center"><span class="style5">是否到达分公司</span></div></td>
    <td background="../images/tiao.gif"><div align="center"><span class="style5">分公司签收人</span></div></td>
    <td background="../images/tiao.gif"><span class="style5">分公司签收时间</span></td>
    <td background="../images/tiao.gif"><div align="center"><span class="style5">派送状态</span></div></td>
    <td background="../images/tiao.gif"><div align="center"><span class="style5">备注</span></div></td>
    <td colspan="2" background="../images/tiao.gif"><div align="center"><span class="style5">管理</span></div></td>
  </tr>
<% 
  '实现分页显示
  if not rs.eof then 
	  tol=rs.recordcount
	  show=15
	  rs.pagesize=show
	  maxpage=rs.pagecount
	  requestpage=clng(request("p"))
	  if requestpage="" or requestpage=0 then
	  requestpage=1
	  end if
	  if requestpage>maxpage then
	  requestpage=maxpage
	  end if 
	  if requestpage<>1 then
	  rs.move (requestpage-1)*rs.pagesize
	  end if 
      for i=1 to rs.pagesize and not rs.eof
%>
  <tr>
    <td height="37" bgcolor="#FFFFFF"><div align="center"><%= rs("nid") %></div></td>
    <td bgcolor="#FFFFFF"><div align="center"><%= rs("start") %></div></td>
    <td bgcolor="#FFFFFF"><div align="center"><%= rs("mudidi") %></div></td>
    <td bgcolor="#FFFFFF"><div align="center"><%= rs("ctime") %></div></td>
    <td bgcolor="#FFFFFF"><div align="center"><%= rs("qs") %></div></td>
    <td bgcolor="#FFFFFF"><div align="center"><%= rs("qstime") %></div></td>
    <td bgcolor="#F0F0F0"><div align="center"><%= rs("fg")%></div></td>
    <td bgcolor="#F0F0F0"><div align="center" class="style4" ><%= rs("fgzhuangtai") %></div></td>
    <td bgcolor="#F0F0F0"><div align="center"><%= rs("fgqs") %></div></td>
    <td bgcolor="#F0F0F0"><div align="center"><%= rs("fgtime") %></div></td>
    <td bgcolor="#FFFFFF"><div align="center" class="style4"><%= rs("zhuangtai") %></div></td>
    <td bgcolor="#FFFFFF"><div align="center"><%= rs("beizhu") %></div></td>
    <td bgcolor="#FFFFFF"><div align="center"><a href="yundaned.asp?id=<%=rs("id")%>">修改</a></div></td>
    <td bgcolor="#FFFFFF"><div align="center"><a href="xinxi.asp?del=<%=rs("id")%>&p=<%=requestpage%>" onClick="return confirm('你确定删除吗？')">删除</a></div></td>
  </tr>
 <% 
	  rs.movenext
	  if rs.eof then exit for 
	  next 
	else
	  response.Write("没有运单")
	end if 
 %>
  <tr bgcolor="#FFFFFF">
    <td height="41" colspan="14"><div align="right">共<%= maxpage %>页　当前页：<%= requestpage %>　<a href="xinxi.asp?p=<%=requestpage-1%>">上一页</a>　<a href="xinxi.asp?p=<%=requestpage+1%>">下一页</a></div></td>
  </tr>
</table>

</body>
</html>
⌨️ 快捷键说明

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