รหัสเพจ ASP ที่ง่ายที่สุด

原帖及讨论： http: //bbs.bccn.net/thread-90981-1-1.html

-

SET Conn = Server.CreateObject (ADODB.Connection)

conn.open (ไดรเวอร์ = ไดรเวอร์ทำ Microsoft Access (*.mdb); uid = admin; pwd =; dbq = & server.mappath (1.MDB))

ตั้งค่า rs = server.createObject (adodb.recordset)

SQL = เลือก * จากนักเรียน

Rs.Open SQL, Conn, 3

Rs.Pagesize = 20

หากคำขอ (หน้า) <> จากนั้น

epage = cint (คำขอ (หน้า))

ถ้า epage <1 แล้ว epage = 1

ถ้า epage> rs.pagecount แล้ว epage = rs.pagecount

อื่น

EPAGE = 1

สิ้นสุดถ้า

Rs.absolutePage = epage

-

<table border = 0 cellpadding = 0 cellspacing = 1 bgcolor =#0000ff width = 80% align = center>

<tr bgcolor =#ffffff allign = center>

<th> <%= rs (0) .name%> </th> <th> <%= rs (1) .name%> </th> <th> <%= rs (2) .name%> </th>

</tr>

-

สำหรับ i = 0 ถึง Rs.Pagesize-1

ถ้า Rs.Bof หรือ Rs.EOF ออกจาก

-

<tr bgcolor =#ffffff allign = center>

<td> <%= rs (0) .Value%> </td> <td> <%= rs (1) .Value%> </td> <td> <%= rs (2) .value%> </td>

</tr>

-

Rs.Movenext ()

ต่อไป

-

</table>

<p allign = center>

<a href => 首页 </a> & nbsp;

<a href = index.asp? page = <%= epage-1%>> 前一页 </a> & nbsp;

<a href = index.asp? page = <%= epage+1%>> 后一页 </a> & nbsp;

<a href = index.asp? page = <%= rs.pagecount%>> 末页 </a>

</p>

<p allign = center> 现在是第 <%= epage%> 页一页一 <%= rs.pagecount%> 页 </p>

-

conn.close ()

-

-

表有三个字段, 表明为นักเรียน其他的就不需要改了, 那个 pagesize 也可以改一下, 如果记录少的话

如果谁有更简单的, 请贴上来, 大家一起研究