subreport.asp
来自「ASP入门与提高实用教程 源文件(上传网站)」· ASP 代码 · 共 49 行
ASP
49 行
<%
if session("admin_name")="" then response.end
%>
<!--#include file="conn.asp"-->
<head>
<link href=../style.css rel=STYLESHEET type=text/css>
</head>
<table border="0" width="100%" cellspacing="1">
<tr>
<td width="100%">
<table border="0" width="100%" cellspacing="1" bgcolor="#FF9933">
<tr>
<td width="100%" colspan="4">投诉订单查询</td>
</tr>
<%sql="select * from ts"
set rs=server.createobject("adodb.recordset")
rs.open sql,conn,3,3
if rs.eof then%>
<tr>
<td width="100%" bgcolor="#FFFFFF" colspan="4">
<p align="center">暂没有投诉订单</td>
</tr>
<%else
%>
<tr>
<td width="25%" bgcolor="#FFFFFF">订单号</td>
<td width="25%" bgcolor="#FFFFFF">订购人</td>
<td width="25%" bgcolor="#FFFFFF">投诉时间</td>
<td width="25%" bgcolor="#FFFFFF">查看详细信息</td>
</tr><%do while not rs.eof%>
<tr>
<td width="25%" bgcolor="#FFFFFF"><%=rs("sub_number")%></td>
<td width="25%" bgcolor="#FFFFFF"><%=rs("user_name")%></td>
<td width="25%" bgcolor="#FFFFFF"><%=rs("ts_date")%></td>
<td width="25%" bgcolor="#FFFFFF"><a href="report.asp?sub_number=<%=rs("sub_number")%>">详细信息</a></td>
</tr><%rs.movenext
loop
end if
rs.close
set rs=nothing
conn.close
set conn=nothing
%>
</table>
</td>
</tr>
</table>
⌨️ 快捷键说明
复制代码Ctrl + C
搜索代码Ctrl + F
全屏模式F11
增大字号Ctrl + =
减小字号Ctrl + -
显示快捷键?