Dalam banyak kasus, kami menggunakan metode asli untuk menyelesaikan masalah perulangan 3 gambar berturut-turut. Jika pengunggah hanya mengunggah 2 gambar, jarak antara 2 gambar tersebut akan sangat jauh karena <td> </ td> .
Copy kode kodenya sebagai berikut:
<batas tabel=0 cellpadding=0 spasi sel=0>
<%
dimrs,sqltext
set rs = Server.CreateObject(adodb.recordset)
sqltext=pilih * dari [kelas besar]
rs.Buka sqltext, samb., 1,1
m=1
colzs=5 'Tampilkan 5 kolom dalam satu baris
jika rs.RecordCount mod colzs=0 maka
rowzs=int(rs.RecordCount/colzs)
kalau tidak
bariszs=int(rs.RecordCount/colzs)+1
berakhir jika
untuk j = 1 sampai bariszs%>
<tr>
<%untuk i = 1 sampai colzs%>
<%jika bukan rs.EOF maka%>
<td><tipe masukan=nama kotak centang=qxflag<%=m%> nilai=1><%=trim(rs(nama besar))%></td>
<%
rs.MoveNext
m = m + 1
kalau tidak
%>
<td> </td>
<%akhir jika%>
<%berikutnya%>
</tr>
<%
Berikutnya
rs.Tutup
setr=tidak ada
%>
</tabel>