www.gusucode.com > 凡人网络购物系统 2008源码程序 > Admin/ad_search.asp
<!--#include file="conn.asp"-->
<!--#include file="ad_chk.asp"-->
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<link href=inc/css.css rel=STYLESHEET type=text/css>
<body topmargin="5" leftmargin="5" rightmargin="5" bottommargin="5">
<%
if Request.Cookies("venshop")("admin_class")<>0 then
response.write "你没有这个权限!"
response.end
end if
%>
<%if request("action")="del" then
id=request("id")
set rs=server.createobject("adodb.recordset")
sql="select * from venshop_search where id="&id&""
rs.open sql,conn,1,3
if rs.eof then
response.redirect "ad_search.asp"
response.end
else
rs.delete
rs.update
call deleok(delet,"ad_search.asp")
end if
rs.close
set rs=nothing
else%>
<table border="0" cellpadding="5" cellspacing="0" class="st">
<tr bgcolor="#6894d8">
<td bgcolor="#F0F0F0" align="center" class="sa">关键字</td>
<td bgcolor="#F0F0F0" align="center" class="sa"> 搜索量</td>
<td bgcolor="#F0F0F0" align="center" class="sa">操作</td></tr>
<%page=request("page")
if page="" then page=1
if not(isnumeric(page)) then page=1
if page<1 then page=1
page=int(page)
set rs=server.createobject("adodb.recordset")
sql="select * from venshop_search order by hits DESC"
rs.open sql,conn,1,1
if rs.eof then%>
<tr><td colspan="3" bgcolor="#FFFFFF" align="center" class="s1">没有内容</td></tr>
<%else
rs.pagesize=20
totalrec=rs.recordcount
totalpage=rs.pagecount
if page>totalpage then page=totalpage
rs.absolutepage=page
rs.cachesize=rs.pagesize
i=0
do while not rs.eof and (i<rs.pagesize)
i=i+1%>
<tr bgcolor="#FFFFFF">
<td align="center" class="s<%=i mod 2%>"><a target="_blank" href="../search.asp?action=search&hw_name=<%=rs("search_name")%>"><%=rs("search_name")%></a></td>
<td align="center" class="s<%=i mod 2%>"><%=rs("hits")%></td>
<td align="center" class="s<%=i mod 2%>"><a href="ad_search.asp?id=<%=rs("id")%>&action=del" onClick="return confirm('您确定进行删除操作吗？')">删除</a></td></tr>
<%rs.movenext
loop
end if
rs.close
set rs=nothing
i=i+1
%>
<tr><td colspan="3" class="s<%=i mod 2%>" align="center">
共<font color=red><%=totalpage%></font>页 第<%=page%>页
<%if page-1>0 then%><a href="<%=filename%>?page=<%=page-1%>">上一页</a><%else%>上一页<%end if%>
<%if page+1<=totalpage then%><a href="<%=filename%>?page=<%=page+1%>">下一页</a> <%else%>下一页<%end if%>
</td></tr></table>
<%end if%>
<br>
<div class="help">
备注：<br>这里统计的数据为前台客户搜索的关键字。</div><!--#include file="ad_bottom.asp"-->