%
Jika RS1.RCordCount ＞ 0 maka set rekaman tidak kosong dan proses proses
Rs1.pagesize = 10 'Setel jumlah catatan yang ditampilkan per halaman
Num = rs1.rcordcount 'Total rekor
Pagenum = rs1.pagecount 'jumlah total
Halaman = Permintaan (Halaman) 'Dapatkan informasi asli dari nomor halaman
'Awal dari informasi asli dari nomor halaman pemrosesan!
Jika halaman <> lalu
Halaman = cint (halaman)
Jika err.number <> 0 lalu
err.clear
halaman = 1
akhiri jika
Jika halaman <1 lalu
halaman = 1
akhiri jika
kalau tidak
halaman = 1
Akhiri jika
Jika halaman*rs1.pagesize ＞ num and not ((page-1)*rs1.pagesize <num)
halaman = 1
akhiri jika
'Akhir dari informasi asli dari nomor halaman pemrosesan! Atur nomor halaman saat ini
Rs1.absolutepage = halaman
%>
<!-Tentukan apakah halaman saat ini adalah halaman terakhir, dan tampilan duplikat dari catatan pengaturan pengaturan pengaturan->
<% Jika halaman <> pagenum lalu
lablenum = rs1.pagesize
kalau tidak
lablenum = num- (page-1)*rs1.pagesize
akhiri jika
untuk i = 1 ke lablenum
%>
<Trbgcolor =#ffffff>
<Td tinggi = 25> <Div align = center> <%= (rs1.fields.item (id). Value)%> </div> </td>
<td> <div align = center> <%= (rs1.fields.item (name). Value)%> </div> </td>
<Td ＞ <liv align = center> <%= (rs1.fields.item (alamat). Nilai)%> </div> </td>
<td> <div align = center> <%= (rs1.fields.item (kategori). Value)%> </div> </td>
<td> <div align = center> <%= (rs1.fields.item (akhirnya dimodifikasi). Nilai)%＞ </div> </td>
<td> <div align = center> <%= (rs1.fields.item (orang yang dimodifikasi). Nilai)%＞ </div> </td>
</tr>
%
RS1.Movenext
Berikutnya
%>
<!-Catatan halaman saat ini sudah berakhir, kode berikut adalah kode tautan rekaman set tautan->
<Lebar Tabel = 70% Border = 0 ALIGN = Centre CellPadding = 0 Cellspacing = 0>
<tr>
<Td tinggi = 35>
<Liv align = kanan>
<Font color =#333333>
Ada <%= num%> tautan |
<A href = linkadmin.asp?
<%Jika halaman ＞ 1 lalu ＞ <a href = linkadmin.asp?
<%Page <pagenum lalu ＞ <a href = linkadmin.asp?
<A href = linkadmin.asp?
Halaman: <%= halaman%＞/<%= pagenum%> halaman |
<%= Halaman pagenum%>
</font>
</div>
</td>
</tr>
</boable>
<!-Catat kode pengkodean tertaut dari kumpulan halaman, set rekaman adalah untuk menjalankan kode berikut saat kosong->
<%Else%>
<Trbgcolor =#ffffff>
<TD tinggi = 25 colspan = 6> <div align = center ＞ < % response.write (tidak ada hasil yang dapat ditampilkan!) %>
</div> </td>
</tr>
%
akhiri jika
Rs1.close ()
Atur rs1 = tidak ada
%>