<%
set rs1=server.CreateObject("ADODB.RecordSet")
rs1.Source="select * from 招聘信息 where 公司名称='"&username&"' order by ID DESC"
rs1.Open rs1.Source,conn,1,1
if not rs1.EOF then
rs1.PageSize = MyPageSize
MaxPages = rs1.PageCount
rs1.absolutepage = MyPage
total = rs1.RecordCount
for i=1 to rs1.PageSize
if not rs1.EOF then
%>
<%
rs1.MoveNext
end if
next
%>
