📄 order_manage.asp
字号:
<!--#include file="conn.asp" -->
<!--#include file="admin_dn.asp" -->
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN">
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title></title>
<link href="image/css.css" rel="stylesheet" type="text/css">
<%
if Trim(Request.QueryString("w"))="del" then
sql="delete from shop where bh="&request("bh")
conn.execute(sql)
sql="delete from promote_shop where bh="&request("bh")
conn.execute(sql)
sql="delete from domain_shop where bh="&request("bh")
conn.execute(sql)
sql="delete from mail_shop where bh="&request("bh")
conn.execute(sql)
sql="delete from host_shop where bh="&request("bh")
conn.execute(sql)
end if
if Trim(Request.QueryString("w"))="se" then
a1=trim(request("da"))
if a1<>"" then
a1=cint(a1)
else
a1=20
end if
else
a1=10
end if
%>
</head>
<body leftmargin="0" topmargin="0">
<p>用户以开通定单管理</p>
<p><strong><font color="#006600"> 查询订单情况</font></strong></p>
<form name="form1" method="post" action="order_manage.asp?w=se">
<table width="83%" height="46" border="0" align="center" cellpadding="0" cellspacing="0">
<tr>
<td width="20%" height="21">请输入天数：</td>
<td width="80%"><input name="da" type="text" id="da" value="20" size="15">
<input type="submit" name="Submit" value="查 询">
</td>
</tr>
<tr>
<td> </td>
<td><font color="#FF0000">注：这里<font color="#006600"><strong>天数</strong></font>是指离用户产品到期的天数，只能为整数。。。</font></td>
</tr>
</table>
</form>
<table width="100%" border="0" cellspacing="1" cellpadding="1">
<tr bgcolor="#EBEBEB">
<td width="8%"><div align="center"><font color="#990000">订单号</font></div></td>
<td width="10%"><div align="center"><font color="#990000">用 户</font></div></td>
<td width="34%"><div align="center"><font color="#990000">产 品 名 称</font></div></td>
<td width="13%"><div align="center"><font color="#990000">注册日期</font></div></td>
<td width="12%"><div align="center"><font color="#990000">年 限</font></div></td>
<td width="12%"><div align="center"><font color="#990000">还剩天数</font></div></td>
<td width="11%"><div align="center"><font color="#990000">删 除</font></div></td>
</tr>
<%
rs.open "shop",conn,1,1
while not rs.eof
d=mid(rs("dat"),1,4)+rs("sl")
d=trim(d&mid(rs("dat"),5,6))
ss=cdate(d)-date()
if ss<a1 then
%>
<tr bgcolor="#F7F7F7">
<td bgcolor="#F7F7F7"><div align="center"><a href="admin_view_<%=rs("ll") %>.asp?bh=<%=rs("bh")%>"><font color="#FF0000"><%= rs("bh") %></font></a></div></td>
<td><div align="center"><a href="member_manage.asp?w=search&select=userid&search=<%=rs("userid")%>"><%= rs("userid") %></a></div></td>
<td><font color="#000099"><%= rs("mc") %></font></td>
<td><div align="center"><font color="#CC0000"><%= rs("dat") %></font></div></td>
<td bgcolor="#F7F7F7"><div align="center"><%= rs("sl") %></div></td>
<td bgcolor="#F7F7F7"><div align="center"><font color="#FF0000"><%=ss %></font></div></td>
<td bgcolor="#F7F7F7"><div align="center"><a href="order_manage.asp?w=del&bh=<%=rs("bh")%>"><img src="image/4.jpg" width="16" height="16" border="0"></a></div></td>
</tr>
<%
end if
rs.movenext
wend
rs.close
%>
<tr bgcolor="#EBEBEB">
<td height="20" colspan="7"> </td>
</tr>
</table>
<p><font color="#FF0000">(注：这里的删除，将是删除此条订单。请小心使用）</font></p>
</body>
</html>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -