Ich hatte immer Kopfschmerzen mit mehrzeiligen oder mehrspaltigen Schleifen. Heute habe ich den folgenden Code als Andenken gepostet. Er wurde unter der Anleitung von Brother Big Bird komplett geändert ist begrenzt und ich kann nur den folgenden Schritt ausführen:
ASP/Visual Basic-Code
Kopieren Sie den Codecode wie folgt:
<%
Const p=6 '2 Elemente pro Seite
set rs = server.createobject(adodb.recordset)
sql = Select * from show order by id Desc
rs.Open sql,conn,1
ich=0
tun, während nicht rs.eof
%> <td align=center height=98>
<a href=show.asp?id=<%=rs(id)%>>
<img src=<%=rs(pic)%> width=150 height=98 /></td>
<%
Wenn (i+1) Mod 3 =0 Dann
Response.Write </tr>
Wenn i<(p-1) dann Response.Write <tr>
Ende wenn
i=i+1
Wenn i>p, dann beenden Sie do
rs.movenext
Schleife
Wenn ich Mod 3 <>0 dann
Für m=3-(i Mod 3) Zu 1 Schritt -1
Response.write<td> </td>
Nächste
Antwort.write</tr>
Ende wenn
Wenn i = 3, dann
Response.write <td> </td><td> </td><td> </td></tr>
Beenden Sie, wenn
rs.close
setze rs=nichts
%>
Der bisherige Code hat sich nicht geändert
Kopieren Sie den Codecode wie folgt:
<%
Const p=6 '2 Elemente pro Seite
set rs = server.createobject(adodb.recordset)
sql = Select * from show order by id Desc
rs.Open sql,conn,1
i=1
tun, während nicht rs.eof
%> <td align=center height=98>
<a href=show.asp?id=<%=rs(id)%>>
<img src=<%=rs(pic)%> width=150 height=98 /></td>
<%
wenn ich mod 3 = 0 dann
Response.Write(</tr><tr>)
Ende wenn
i=i+1
Wenn i>p, dann beenden Sie do
rs.movenext
Schleife
rs.close
setze rs=nichts
%>