<%
if isInteger(request("page")) then
currentpage=cint(request("page"))
else
CurrentPage=1
end if
set rs=server.createobject("adodb.recordset")
strtmp = ""
"处理搜索的字段
key=trim(request("key"))
if (key<>empty and key<>"") then strtmp = " where (zw_name like "%"&key&"%")"
sql="select * from job " & strtmp & " order by id desc"
rs.open sql,strconn,1,1
rs.pagesize=PageSize
maxpages=cint(rs.pagecount)
totalrec=rs.recordcount
if CurrentPage>maxpages and maxpages<>0 then
errmsg=errmsg+" "+"没有你所想要的页!"
call disperrs(errmsg)
response.end
end if
%>
<%
"关闭数据库连接
RsClass.close
set RsClass=nothing
rs.close
set rs=nothing
%> |