当前位置 >> 信息反馈 | 信息反馈列表

请输入关键字: " />
<% KeyWord = DelStr(Request("KeyWord")) If KeyWord="" Then sql="select * from Netsys_Message_Cn order by DateTime asc" Else sql="select * from Netsys_Message_Cn Where Subject like '%"& KeyWord &"%' or Address like '%"& KeyWord &"%' order by DateTime asc" End If set rs=createobject("adodb.recordset") rs.open sql,conn,1,3 rs.pagesize=20 if not rs.eof and not rs.bof then %> <% for i=1 to rs.PageSize if rs.EOF or rs.BOF then exit for %> <% rs.movenext next %>
编号 公司名称 留言日期 状态 操作 选择
<%=rs("ID")%> <%=rs("Subject")%> <%=rs("DateTime")%> <% if rs("Check")=1 then %>已处理<% else %>未处理<% end if %> ">处理 " style="border:0px;">
全选
<% else Response.Write "
暂无信息,敬请期待!
" end if rs.close set rs=nothing conn.close set conn=nothing %>