|
|
|
<%
PageNo = Request("Page") '传递Page参数给游标开始页处页
if PageNo = "" then '如果页数为空，那么就是第一页
PageNo = 1
end if
Set conn = Server.CreateObject("ADODB.Connection")
conn.Open ConnStr()
Set rs = Server.CreateObject("ADODB.Recordset")
sql = "Select * From posinet Order BY ID Desc"
rs.Open sql, conn, 3
if not rs.eof then
rs.PageSize = 50
rs.AbsolutePage = PageNo
PP = rs.PageCount '赋予PP为总页数
If PageNo>1 Then '如果页码大于一，那么显示前一页
Response.Write "前一页 "
End If
If rs.PageCount-PageNo>0 Then '如果总页码大于0，那么显示后一页
Response.Write "后一页 "
End If
%>末页
|
|
代号 |
职位名称及详细要求 |
上班地点 |
公司背景 |
薪酬福利 |
时间 |
<%
For i = 1 to rs.PageSize '从第一条记录到第PAGESIZE条
%>
| <%=rs("ID")%> |
"><%=rs("tposition")%> |
<%=rs("address")%> |
<%=rs("back")%> |
<%=rs("benefit")%> |
<%=DateValue(rs("InTime"))%> |
<%
rs.movenext
If rs.eof then exit for
Next
end if
%>
|
| Topper
Human Resources Consultant Co.,Ltd. |
|
TEL： (020)
28865681,28865682,28865683,28865684,28865685；Fax:(020)22354133
|
|
地址：
中国广州市天河区珠江新城华明路9号华普广场西塔805； 邮编：510623
|
|
|
|
|
