📄 show_report_service01.asp
字号:
<!--#include file="../conn.asp"-->
<!--#include file="../pub_fun.asp"-->
<META NAME="Keywords" CONTENT="FastReport"/>
<META NAME="Description" CONTENT="The FastReport report"/>
<LINK href="../css.css" rel="stylesheet" type="text/css" media="all">
<META http-equiv=Content-Type content="text/html; charset=gb2312">
<body>
<form name="form1">
</form>
<%
'获取到达的页面
if request("movepage")<>"" then
page=cint(request("movepage")) '翻页
else
page=1
end if
'获取查询语句
if request("textsql")<> "" then
sql=decrypt(trim(request("textsql")))
else
sql = "select * from Feedback"
end if
%>
<table width="100%" border="0" align="center" cellpadding="1" cellspacing="5" >
<tr>
<td colspan="6" height="25" valign="top"><div align="left"><strong><font color="#3399FF" size="3">服务反聩报表</font></strong></div></td>
</tr>
<tr>
<td width="30%"><div align="left"><strong><em>反馈客户</em></strong></div></td>
<td width="20%"><div align="left"><strong><em>反馈主题</em></strong></div></td>
<td width="10%"><div align="left"><strong><em>反馈日期</em></strong></div></td>
<td width="10%"><div align="left"><strong><em>是否解决</em></strong></div></td>
<td width="15%"><div align="left"><strong><em> 相关产品</em></strong></div></td>
<td ><div align="left"><strong><em>服务反馈类型</em></strong></div></td>
</tr>
<tr>
<td colspan="7" align="center" height="3"><hr align="center" size="3" color="#000000" width="680" ></td>
</tr>
<%
set rs = server.createobject("adodb.recordset")
rs.open sql,conn,3
''判断数据集是否为空
if not rs.eof then
''数据集格式设置
total=rs.recordcount
rs.pagesize=25
rs.AbsolutePage=page
pcount = rs.pagecount
for i=1 to rs.pagesize
if rs.eof then exit for
%>
<tr>
<td ><%=showclientname(rs("Feedbackclientid"))%></td>
<td ><%=rs("FeedbackTopic")%></td>
<td><%=rs("FeedbackDate")%></td>
<td >
<% if rs("FeedbackOver")="0" then
response.Write("未解决")
else
response.Write("已解决")
end if
%>
</td>
<td ><%=rs("FeedbackProduct")%></td>
<td ><%=rs("FeedbackSort")%></td>
</tr>
<%
rs.movenext
if rs.eof then exit for
next
end if
%>
<%
if i<rs.pagesize then
for j=i to rs.pagesize-1
response.Write("<tr><td height=25></td></tr>")
next
end if
%>
<tr>
<td colspan="6" height="5">
<table width="100%" border="0" cellspacing="0" cellpadding="0">
<tr>
<td colspan="2"><hr align="center" size="3" color="#000000" width="680" ></td>
</tr>
<tr>
<td><div align="left"><%=date()%></div></td><td><div align="right"><%=page%>/<%=pcount%></div></td>
</tr>
</table>
</td>
</tr>
</table>
</BODY></HTML>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -