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

📄 search3.asp

📁 20041230162250801409: 浙江省丽水市公铁联运有限公司OA系统(物流) 开发语言:PHP/ASP/PERL 本系统包括各个部门的管理
💻 ASP
字号:
<%
' used f:\gtly\data.mdb  database
connstr = "DBQ="+server.mappath("../../data.mdb")+";DefaultDir=;DRIVER={Microsoft Access Driver (*.mdb)};"
Set Conn = Server.CreateObject("ADODB.Connection")
set rs=server.createobject("adodb.recordset")	
conn.open connstr
'years = request.Form("year")
'months = request.Form("month")
'dates = request.Form("date")
'years1 = request.Form("year1")
'months1 = request.Form("month1")
'dates1 = request.Form("date1")
'Sql="select * from tuyun where (year >= "&years&" and year <= "&years1&") and (month >="&months&" or month <="&months1&") and (date1>="&dates&" or date1 <='"&dates1&"') "

years = request.Form("first")
years1 = request.Form("second")
Sql = "select *  from tuyun where ziqi BETWEEN #"&years&"# AND  #"&years1&"# order by id desc"
Set Rs = Conn.Execute(Sql)
if Rs.eof then 
 response.write"<script language=javascript>alert('对不起!没有检索到相关货物信息,请重试!');"
response.write"javascript:history.go(-1)</script>"
else
%>
<html>
<head>
<link href="../appmain.css" rel="stylesheet" type="text/css">
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>无标题文档</title>
</head>

<body>

<table width="80%" border="0" align="center" cellpadding="0" cellspacing="0" class="FORMTABLE">
  <tr> 
    <td bgcolor="#66CCFF"> <div align="center">公铁联运有限公司托运单信息</div></td>
  </tr>
</table>
<table width="80%" border="0" align="center" cellpadding="0" cellspacing="0" class="FORMTABLE">
  <tr> 
    <td background="../image/titlebg.gif"> <div align="center">ID号码</div></td>
    <td background="../image/titlebg.gif"> <div align="center">时间</div></td>
    <td background="../image/titlebg.gif">起始站点</td>
    <td background="../image/titlebg.gif"><div align="center">到站</div></td>
    <td background="../image/titlebg.gif"> <div align="center">收货单位</div></td>
    <td background="../image/titlebg.gif"> <div align="center">详细地址或收货人</div></td>
    <td background="../image/titlebg.gif"> <div align="center">货物名称</div></td>
  </tr>
  <% 

  do while not rs.eof %>
  <tr> 
    <td><div align="center"><a href=javascript:winopen('../huoyun/tuyun1.asp?id=<%=rs("id")%>')><%=rs("ID") %></a></div></td>
    <td><div align="center"><%=rs("ziqi")%></div></td>
    <td><div align="center"><%=rs("send_first")%></div></td>
    <td><div align="center"><%=rs("send_last")%></div></td>
    <td><div align="center"><%=rs("accept_people")  %></div></td>
    <td><div align="center"><%=rs("accept_address")%></div></td>
    <td><div align="center"><%=rs("goods")%></div></td>
  </tr>
  <% 
  
rs.movenext
loop
end if 
  %>
</table>
</body>
</html>
 <script language="javascript">
function winopen(url)                    
     {                    
        window.open(url,"search","toolbar=0,location=0,directories=0,status=0,menubar=0,scrollbars=1,resizable=1,width=795,height=550,top=0,left=0");                    
      }       
</script>

⌨️ 快捷键说明

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