set fq=server.createobject("adodb.recordset")
gzj=request("gzj")
if gzj="" then
fqsql="select * from zkmy order by id asc"
else
fqsql="select * from zkmy where bh like '%"&gzj&"%' or name like '%"&gzj&"%' or tim like '%"&gzj&"%' order by id asc"
end if
'response.write fqsql
fq.open fqsql,dbconn,3,2
if fq.eof and fq.bof then
response.write ("无收益记录!")
else
fq.pagesize=100
pageno=request.querystring("pageno")
if pageno="" then
pageno=1
else
pageno=clng(request.querystring("pageno"))
end if
fq.absolutepage=pageno
if pageno=1 then
response.write("首页")
else
response.write("<a href=fq_admin.asp?gzj="&gzj&">首页</a>")
end if
response.write(" ")
if pageno=1 then
response.write("上一页")
else
response.write("<a href=fq_admin.asp?pageno="&pageno-1&"&gzj="&gzj&">上一页</a>")
end if
response.write(" ")
if pageno<>fq.pagecount then
response.write("<a href=fq_admin.asp?pageno="&pageno+1&"&gzj="&gzj&">下一页</a>")
else
response.write("下一页")
end if
response.write(" ")
if pageno=fq.pagecount then
response.write("尾页")
else
response.write("<a href=fq_admin.asp?pageno="&fq.pagecount&"&gzj="&gzj&">尾页</a>")
end if
response.write(" 第"&pageno&"页/")
response.write("共"&fq.pagecount&"页 ")
response.write("共"&fq.recordcount&"条记录")
for i=1 to fq.pagesize