📄 view_dd.asp
字号:
<!--#include file=../include/config.asp-->
<!--#include file=../include/conn_system.asp-->
<!--#include file=../include/access.asp-->
<!--#include file=../include/function.asp-->
<%
if request("del")=1 then
dim id,strSql1
id=request("id")
if id="" then
out("参数传递出错！")
out("<a href=""javascript:window.go(-1)"">返回</a>！")
response.end
end if
strSql1="delete from [onlinedd] where id=" & id
conn.execute(strSql1)
response.redirect "view_dd.asp"
response.end
end if
%>
<html>
<head>
<title>无标题文档</title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<link rel="stylesheet" href="../style.css" type="text/css">
<script language="JavaScript">
<!--
function MM_openBrWindow(theURL,winName,features) { //v2.0
window.open(theURL,winName,features);
}
//-->
</script>
</head>
<SCRIPT LANGUAGE="JavaScript">
<!--
function GON()
{
var pageno;
var strs;
if(form1.pp.value=="")
{
pageno=1;
}
else
{
pageno=form1.pp.value;
}
strs="view_dd.asp?PageNO=" + pageno;
window.location.href=strs;
}
//-->
</SCRIPT>
<body bgcolor="#FFFFFF" text="#000000" leftmargin="0" topmargin="0">
<div align="center"><br>
<b><font size="3">浏 览 订 单 信 息</font></b><br>
<br>
</div>
<FORM METHOD=POST NAME="form1">
<table width="600" border="0" cellpadding="0" cellspacing="2" class="kuan" align="center" height="49" bgcolor="#FFFFFF">
<%
dim strSql,rs,i,PageNo
strSql="select * from [onlinedd] order by id desc"
set rs=Server.CreateObject("ADODB.RecordSet")
rs.open strSql,conn,3,3
rs.PageSize=20
PageNo=request("PageNo")
if PageNo<1 or not isnumeric(PageNo) then
PageNo=1
end if
if cint(PageNo)>rs.PageCount then
PageNo=rs.PageCount
end if
%>
<tr>
<td background="../images/system1.gif" height="25" align="center" width="84"><font color="#FF6633" class="font"><b><font color="#FF9B59">预定日期</font></b></font></td>
<td background="../images/system1.gif" height="25" align="center" width="135"><font color="#FF6633" class="font"><b><font color="#FF9B59">订单号</font></b></font></td>
<td background="../images/system1.gif" height="25" align="center" width="131"><font color="#FF6600"><b><span class="font"><font color="#FF9966">房源编号</font></span></b></font><font color="#FF9966"><b><span class="font"><font class="font"></font></span></b></font></td>
<td background="../images/system1.gif" height="25" align="center" width="66"><font color="#FF6600"><b><span class="font"><font color="#FF9966">姓名</font></span></b></font></td>
<td background="../images/system1.gif" height="25" align="center" width="60"><font color="#FF6600" class="font"><b><font color="#FF9966">是否确认</font></b></font></td>
<td background="../images/system1.gif" height="25" align="center" width="43"><font color="#FF6633" class="font"><b><font color="#FF9B59">删除</font></b></font></td>
<td background="../images/system1.gif" height="25" align="center" width="65"><font color="#FF6633" class="font"><b></b></font><font color="#FF6633" class="font"><b><font color="#FF9B59">详细资料</font></b></font></td>
</tr>
<%
if rs.recordcount>0 then
rs.AbsolutePage =PageNo
for i=1 to rs.pageSize
if rs.eof then exit for
%>
<tr bgcolor="#ECFFEC">
<td class="font" align="center" valign="middle" height="26" width="84" bgcolor="#DBE7F2"><%=replace(rs("date"),right(rs("date"),8),"")%></td>
<td class="font" align="center" valign="middle" height="26" width="135" bgcolor="#C1D6EA"><font color="#FF6600"><%=rs("ddh")%></font></td>
<td class="font" align="center" valign="middle" height="26" bgcolor="#DBE7F2" width="131"><%=rs("house_bh")%></td>
<td class="font" align="center" valign="middle" height="26" bgcolor="#DBE7F2" width="66"><%=rs("name")%></td>
<td class="font" align="center" valign="middle" height="26" bgcolor="#DBE7F2" width="60"><font color="#FF6633" class="font"><%=rs("pass")%></font></td>
<td class="font" align="center" valign="middle" height="26" width="43" bgcolor="#C1D6EA"><a href="view_dd.asp?id=<%=rs("id")%>&del=1" class="linkfont">删除</a></td>
<td class="linkfont" align="center" valign="middle" height="26" width="65" bgcolor="#DBE7F2"><a href="sub_dd.asp?id=<%=rs("id")%>" class="linkfont" target="_blank" >详细资料</a></td>
</tr>
<%
rs.movenext
next
%>
<tr>
<td colspan="7" align="right" class="font">
<%
out("共 " & rs.pagecount & " 页 ")
out("当前第 " & PageNo & " 页 ")
out("到第 <input class=""textinput"" name=""pp"" type=""text"" size=""2""> 页")
out(" <INPUT class=""textinput"" TYPE=""button"" value=""GO"" onclick=""javascript:GON()""> ")
out("<a href=""view_dd.asp?PageNo=1"">首页</a> ")
out("<a href=""view_dd.asp?PageNo=" & (PageNo-1) & """>上一页</a> ")
out("<a href=""view_dd.asp?PageNo=" & (PageNo+1) & """>下一页</a> ")
out("<a href=""view_dd.asp?PageNo=" & rs.pagecount & """>尾页</a> ")
%>
</td>
</tr>
<%
else
%>
<tr>
<td colspan="7" class="font">
<div align="center">没有数据!</div>
</td>
</tr>
<%
end if
rs.close
set rs=nothing
%>
</table>
</FORM>
</body>
</html>
<!--#include file=../include/foot.asp-->⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -