<% Response.Buffer=True %>
<%
dim go2to
set rs=server.createobject("adodb.recordset")
if not isempty(request("page")) then
pagecount=cint(request("page"))
else
pagecount=1
end if
sql="select * from zp where tj=1 order by idate desc ,id desc"
rs.open sql,conn,1,1
if rs.eof and rs.bof then
response.write" "
response.write"=== 暂无推荐招聘信息的记录 ==="
response.end
end if
rs.pagesize=50
if pagecount>rs.pagecount or pagecount<=0 then
pagecount=1
end if
rs.AbsolutePage=pagecount
%>
广西市场与就业网
