<%
sql="select * from gg order by id desc "
set rs=Server.CreateObject("ADODB.recordset")
rs.CursorType = 3
rs.Open sql,conn
rs.PageSize =30 '每页记录条数
result_num=rs.RecordCount '记录总数
if result_num<=0 then
if search="" then
word="目前还没有记录!"
else
word="没有查到符合条件的记录!"
end if
else
maxpage=rs.PageCount
page=request("page")
if Not IsNumeric(page) or page="" then
page=1
else
page=cint(page)
end if
if page<1 then
page=1
elseif page>maxpage then
page=maxpage
end if
rs.AbsolutePage=Page
end if
%>
<% if result_num<=0 then %>
