📄 sys_showhostbb.asp
字号:
<!--#include file="conn.asp"-->
<%
id=session("userid")
username=session("username")
if id="" or username="" then
response.Redirect("adminloginerror.asp")
end if
Set rs = Server.CreateObject("ADODB.Recordset")
sql="select * from adminuser where username='"& username &"' and id=" & id &""
rs.open sql,conn,3,3
if rs.eof then
response.Redirect("adminloginerror.asp")
else
%>
<html>
<title>Untitled Document</title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<link href="style.css" rel="stylesheet" type="text/css">
<script language="JavaScript" type="text/JavaScript">
<!--
function MM_callJS(jsStr) { //v2.0
return eval(jsStr)
}
//-->
</script>
<body style="background-color: #D6DFF7">
<% if request.QueryString("cmd")="" then %>
<br>
<br>
<div align="center">
<center>
<table width="90%" border="1" cellpadding="3" cellspacing="0" bordercolor="#6687BA" style="border-collapse: collapse">
<form name="form1" method="post" action="sys_showhostbb.asp?cmd=search">
<tr>
<td bordercolor="#FFFFFF"><div align="center">
<p class="f1">查询:
<select name="years" id="years">
<option value="2002" selected>2002</option>
<option value="2003">2003</option>
<option value="2004">2004</option>
<option value="2005">2005</option>
</select>
-
<select name="math" id="math">
<option value="1" selected>01</option>
<option value="2">02</option>
<option value="3">03</option>
<option value="4">04</option>
<option value="5">05</option>
<option value="6">06</option>
<option value="7">07</option>
<option value="8">08</option>
<option value="9">09</option>
<option value="10">10</option>
<option value="11">11</option>
<option value="12">12</option>
</select>
-
<select name="days" id="days">
<option value="1" selected>01</option>
<option value="2">02</option>
<option value="3">03</option>
<option value="4">04</option>
<option value="5">05</option>
<option value="6">06</option>
<option value="7">07</option>
<option value="8">08</option>
<option value="9">09</option>
<option value="10">10</option>
<option value="11">11</option>
<option value="12">12</option>
<option value="13">13</option>
<option value="14">14</option>
<option value="15">15</option>
<option value="16">16</option>
<option value="17">17</option>
<option value="18">18</option>
<option value="19">19</option>
<option value="20">20</option>
<option value="21">21</option>
<option value="22">22</option>
<option value="23">23</option>
<option value="24">24</option>
<option value="25">25</option>
<option value="26">26</option>
<option value="27">27</option>
<option value="28">28</option>
<option value="29">29</option>
<option value="30">30</option>
<option value="31">31</option>
</select>
到
<select name="years1" id="years1">
<option value="2002" selected>2002</option>
<option value="2003">2003</option>
<option value="2004">2004</option>
<option value="2005">2005</option>
</select>
-
<select name="math1" id="select2">
<option value="1" selected>01</option>
<option value="2">02</option>
<option value="3">03</option>
<option value="4">04</option>
<option value="5">05</option>
<option value="6">06</option>
<option value="7">07</option>
<option value="8">08</option>
<option value="9">09</option>
<option value="10">10</option>
<option value="11">11</option>
<option value="12">12</option>
</select>
-
<select name="days1" id="select3">
<option value="1" selected>01</option>
<option value="2">02</option>
<option value="3">03</option>
<option value="4">04</option>
<option value="5">05</option>
<option value="6">06</option>
<option value="7">07</option>
<option value="8">08</option>
<option value="9">09</option>
<option value="10">10</option>
<option value="11">11</option>
<option value="12">12</option>
<option value="13">13</option>
<option value="14">14</option>
<option value="15">15</option>
<option value="16">16</option>
<option value="17">17</option>
<option value="18">18</option>
<option value="19">19</option>
<option value="20">20</option>
<option value="21">21</option>
<option value="22">22</option>
<option value="23">23</option>
<option value="24">24</option>
<option value="25">25</option>
<option value="26">26</option>
<option value="27">27</option>
<option value="28">28</option>
<option value="29">29</option>
<option value="30">30</option>
<option value="31">31</option>
</select>
的
<select name="typ" id="typ">
<option value="host" selected>空间开设清单</option>
<option value="domain">域名购买清单</option>
<option value="mail">邮局开设清单</option>
<option value="uphostsize">空间增加清单</option>
<option value="updomain">域名注册续费</option>
<option value="uphost">空间产品续费</option>
<option value="upmail">邮局产品续费</option>
</select>
<br>
<br>
<input type="submit" name="Submit" value="查询">
</p>
</div></td>
</tr>
</form>
</table>
</center>
</div>
<% end if %>
<%
if request.querystring("cmd")="search" then
years=request.form("years")
math=request.form("math")
days=request.form("days")
years1=request.form("years1")
math1=request.form("math1")
days1=request.form("days1")
typ=request.form("typ")
gan="-"
keyword=years&gan&math&gan&days
keyword1=years1&gan&math1&gan&days1
Set rs = Server.CreateObject("ADODB.Recordset")
if typ="host" then
sql="select * from hostshopping where date between #"&keyword&"# and #"&keyword1&"# and hostopen='已开通'"
end if
if typ="mail" then
sql="select * from mailshopping where date between #"&keyword&"# and #"&keyword1&"# and mailaction='已开通'"
end if
if typ="domain" then
sql="select * from domainshopping where date between #"&keyword&"# and #"&keyword1&"# and bolo='已结算'"
end if
if typ="uphostsize" then
sql="select * from uphostsizeshopping where date between #"&keyword&"# and #"&keyword1&"#"
end if
if typ="updomain" then
sql="select * from member_updomainmoney where date between #"&keyword&"# and #"&keyword1&"#"
end if
if typ="uphost" then
sql="select * from member_uphostmoney where date between #"&keyword&"# and #"&keyword1&"#"
end if
if typ="upmail" then
sql="select * from member_upmailmoney where date between #"&keyword&"# and #"&keyword1&"#"
end if
rs.open sql,conn,3,3
if rs.eof then
response.write"<div align=center>没 有 您 要 查 询 的 项 目 存 在</div>"
else
%>
<div align="center">
<center>
<table width="90%" border="0" cellspacing="0" cellpadding="3" style="border-collapse: collapse" bordercolor="#111111">
<tr>
<td><div align="center">从 <span class="f1"><%=keyword%></span> 到 <span class="f1"><%=keyword1%></span> 的 <span class="f1">
<% if typ="host" then
response.write"主机开设"
end if
if typ="mail" then
response.write"邮局开设"
end if
if typ="domain" then
response.write"域名购买"
end if%></span> 清单如下:</div></td>
<td width="20%"><div align="center">
<input name="Submit2" type="submit" onClick="MM_callJS('javescript:window.print()')" value="打印报表">
</div></td>
</tr>
<tr>
<td colspan="2">
<table width="100%" border="0" cellpadding="4" style="border-collapse: collapse">
<tr>
<td width="10%" class="f1" bgcolor="#EAF1FB" align="center">序 号</td>
<td width="15%" class="f1" bgcolor="#EAF1FB" align="center">会 员</td>
<td width="15%" class="f1" bgcolor="#EAF1FB" align="center">金 额</td>
<td width="15%" class="f1" bgcolor="#EAF1FB" align="center">日 期</td>
<td class="f1" bgcolor="#EAF1FB" align="center">产品类型</td>
</tr>
</table>
<% a=0
do while not rs.eof
a=a+1
%> <table width="100%" border="0" cellpadding="5" cellspacing="0">
<tr>
<td width="10%" height="26" align="center"><%=a%></td>
<td width="15%" align="center"><%=rs("user_name")%></td>
<td width="15%" align="center">¥<span class="f1">
<% if typ="domain" then %>
<%=rs("allmoney")%>
<% else%>
<%=rs("money")%>
<% end if %></span></td>
<td width="15%" align="center"><%=rs("date")%></td>
<td align="center">
<%
if typ="host" then
response.write""&rs("hostname")&""
end if
if typ="mail" then
response.write""&rs("mailname")&""
end if
if typ="domain" then
response.write"域名注册:<span class=f1>"&rs("domain")&"</span>"
end if
if typ="updomain" then
response.write"域名<span class=f1>"&rs("domain")&"</span>续费:"&rs("years")&"年"
end if
if typ="uphost" then
response.write"主机订单<span class=f1>20027"&rs("hostid")&"</span>续费:"&rs("years")&"年"
end if
if typ="upmail" then
response.write"邮局订单<span class=f1>20028"&rs("mailid")&"</span>续费:"&rs("years")&"年"
end if
if typ="uphostsize" then
response.write"主机订单<span class=f1>20027"&rs("hostid")&"</span>空间增加:"&rs("hostsize")&"M"
end if
%></td>
</tr>
</table>
<% rs.movenext
loop
end if
%> </td>
</tr>
</table>
</center>
</div>
<% end if %>
</body>
</html>
<%
end if
rs.close
set rs=nothing
set conn=nothing
%>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -