📄 t_dingcut.asp
字号:
<html>
<head>
<title>Untitled Document</title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
</head>
<body bgcolor="#FFFFFF">
<%qq=request.querystring("qq")
if qq=1 then
enter_time=request.form("enter_time")
enter_time1=request.form("enter_time1")
qq=0
else
enter_time=request.querystring("enter_time")
enter_time1=request.querystring("enter_time1")
end if%>
<%if enter_time="" then
enter_time=Trim(date())
enter_time1=Trim(date())
else
enter_time=Trim(enter_time)
enter_time1=Trim(enter_time1)
end if%>
<%set conn=server.createobject("ADODB.Connection")
set rs=server.createobject("ADODB.Recordset")
conn.open Application("file_jingan1")
page=Request.QueryString("page")
If page="" then
page=1
else
page=cint(page)
end if
time_fir=enter_time+" 00:00:00"
time_end=enter_time1+" 23:59:59.999"
sqlstr="select * from t_dingfang where now_time between '" &time_fir& "' and '" &time_end& "' and cutting='是'"
rs.open sqlstr,conn,1,1
If not rs.eof then
rs.PageSize=24
rs.AbsolutePage=page
End if
%>
<form method="post" action="t_ding.asp?qq=1">
请填入查询日期： 从
<input type="text" name="enter_time" value="">
到
<input type="text" name="enter_time1" value="">
<input type="submit" name="Submit" value="列出" >
</form>
<p> </p>
<table width="95%" border="0" class="textright1">
<%If rs.recordcount>1 then%>
<tr>
<td align=left>共有<%=rs.recordcount%>条匹配记录 <%for i=1 to rs.pagecount%><a href="t_ding.asp?page=<%=i%>&enter_time=<%=enter_time%>&enter_time1=<%=enter_time1%>"><%=i%> </a> <%next%>
当前页码是（<%=page%>/<%=rs.pagecount%>页）</td>
</tr>
<%end if%>
</table>
<table width="95%" border="0" cellspacing="1" cellpadding="0" class="textright1" >
<tr class="texthead1" bgcolor="#FFDDE3">
<td width="6%">
<div align="center">编号</div></td>
<td width="18%">
<div align="center">抵店日期</div>
</td>
<td width="18%">
<div align="left">预定人用户名</div>
</td>
<td width="27%" height="20">
<div align="center">人数</div>
</td>
<td width="31%">
<div align="center">详细资料</div>
</td></tr>
<%querysubmit=1%>
<%If querysubmit=0 then%> <%If not rs.eof then%> <%count=1
rs.movefirst()
do while not rs.eof
flag=count mod 2
%> <tr bgcolor=<%If flag=1 then%>"#EEFCFF"<%else%>"#FFFFF4"<%End if%>>
<td width="6%" height="22">
<div align="center"><%=rs("list")%></div></td>
<td width="18%" height="22"><%=rs("in_time")%></td>
<td width="18%" height="22"><%=rs("username")%></td>
<td width="27%" height="22">
<div align="center"><%=rs("persons")%></div></td>
<td width="31%" height="22" align=center><a href="neirong2.asp?list=<%=rs("list")%>&username=<%=rs("username")%>">内容</a></td>
</tr>
<%count=count+1
rs.MoveNext()
loop
else%> <tr bgcolor="#FFFFF4">
<td width="6%">
<div align="center"></div></td>
<td height="20" width="18%"> </td>
<td width="18%" height="20"> </td>
<td width="27%">
<div align="center"></div></td>
<td width="31%"> </td>
</tr> <%end if%> <%else%>
<%If not rs.eof then%> <%count=24*(page-1)+1
for i=1 to 24
flag=i mod 2
if not rs.eof then%> <tr bgcolor=<%If flag=1 then%>"#EEFCFF"<%else%>"#FFFFF4"<%End if%>>
<td width="6%" height="22">
<div align="center"><%=rs("list")%></div></td>
<td width="18%" height="22"><%=rs("in_time")%></td>
<td width="18%" height="22"><%=rs("username")%></td>
<td width="27%" height="22">
<div align="center"><%=rs("persons")%></div></td>
<td width="31%" height="22" align=center><a href="neirong2.asp?list=<%=rs("list")%>&username=<%=rs("username")%>">内容</a></td>
</tr>
<%else
exit for
end if
count=count+1
rs.MoveNext()
next
else%> <tr bgcolor="#FFFFF4">
<td width="6%">
<div align="center"></div></td>
<td width="18%" height="20"> </td>
<td height="20" width="18%"> </td>
<td width="27%">
<div align="center"></div></td>
<td width="31%"> </td>
</tr> <%end if%> <%end if%>
</table>
</body>
</html>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -