Semua orang tahu bahwa tampilan halaman kumpulan catatan dapat dengan mudah diimplementasikan di Dreamwerver, tetapi kode yang dihasilkan memang sangat besar, yang mempengaruhi kecepatan tampilan halaman web, dan sepertinya tidak terlalu jelas dicapai dengan cara yang sederhana? Tentu saja, saya dapat menggunakan kode sederhana berikut untuk mewujudkan tampilan paging dari kumpulan rekaman.
Kode utamanya adalah sebagai berikut:
<%
Jika rs1.recordcount>0 Lalu 'Jika kumpulan record tidak kosong, proses record rs1.pagesize = 10 'Tetapkan jumlah record yang ditampilkan di setiap halaman num=rs1.recordcount 'Jumlah total record pagenum=rs1.pagecount ' Jumlah total halaman page=request(" page") 'Dapatkan informasi asli nomor halaman' Awal pemrosesan informasi asli nomor halaman!
Jika halaman <> "" maka
halaman = cint(halaman)
jika err.number <> 0 maka
err.jelas
halaman=1
berakhir jika
jika halaman < 1 maka
halaman=1
berakhir jika
kalau tidak
halaman=1
Berakhir jika
jika halaman*rs1.pagesize > num dan bukan((halaman-1)*rs1.pagesize < num)maka
halaman=1
berakhir jika
'Akhir pemrosesan informasi asli nomor halaman! Tetapkan nomor halaman saat ini rs1.absolutepage = halaman
%>
<!--Menilai apakah halaman saat ini adalah halaman terakhir, dan mengatur tampilan catatan berulang berdasarkan penilaian-->
<% jika halaman<>halaman lalu
labelnum=rs1.ukuran halaman
kalau tidak
labelnum=angka-(halaman-1)*rs1.ukuran halaman
berakhir jika
untuk i=1 hingga labelnum
%>
<tr bgcolor="#FFFFFF">
<td height="25"><div align="center"><%=(rs1.Fields.Item("id").Value)%></div></td>
<td><div align="center"><%=(rs1.Fields.Item("nama").Nilai)%></div></td>
<td><div align="center"><%=(rs1.Fields.Item("Alamat").Nilai)%></div></td>
<td><div align="center"><%=(rs1.Fields.Item("Kategori").Nilai)%></div></td>
<td><div align="center"><%=(rs1.Fields.Item("Terakhir diubah").Nilai)%></div></td>
<td><div align="center"><%=(rs1.Fields.Item("Pengubah").Nilai)%></div></td>
</tr>
<%
rs1.movenext
Berikutnya
%>
<!--Tampilan catatan halaman saat ini berakhir, kode berikut adalah kode tautan paging kumpulan catatan-->
<lebar tabel="70%" border="0" align="center" cellpadding="0" Cellspacing="0">
<tr>
<td tinggi="35">
<div menyelaraskan="kanan">
<warna font="#333333">
Total ada <%=num%> tautan|
<a href=linkadmin.asp?page=1>Beranda</a> |
<%jika halaman>1 lalu%><a href=linkadmin.asp?page=<%=halaman-1%>><%end if%>Halaman sebelumnya</a> |
<%jika halaman<nomor halaman lalu%><a href=linkadmin.asp?page=<%=halaman+1%>><%end if%>Halaman berikutnya</a> |
<a href=linkadmin.asp?page=<%=pagenum%>>Halaman terakhir</a> |
Halaman:<%=halaman%>/<%=nomorhalaman%>halaman |
Total <%=pagenum%>halaman</font>
</div>
</td>
</tr>
</meja>
<!--Kode tautan halaman kumpulan catatan berakhir, dan kode berikut dijalankan ketika kumpulan catatan kosong-->
<%lainnya%>
<tr bgcolor="#FFFFFF">
<td height="25" colspan="6"><div align="center"><% respon.Write("Tidak ada hasil untuk ditampilkan!") %>
</div></td>
</tr>
<%
berakhir jika
rs1.Tutup()
Setel rs1 = Tidak ada
%>
Oke, sangat sederhana! Cukup buat modifikasi sederhana dan Anda dapat memasukkannya ke tempat rekaman ditampilkan di halaman web Anda. Coba sekarang!