ciao utilizzo il seguente codice per leggere delle immagini da una database e dividerle in + pagine
e funzionava benissimo fino a ke io ho voluto mettere in una tabella le immagini in tre colonne x ogni riga.codice:<% dim recordsonpage, requestrecords, offset, allrecords, hiddenrecords, showrecords, lastrecord, recordcounter, pagelist, pagelistcounter dim count count=0 dim Conn Set Conn = Server.CreateObject("ADODB.Connection") sConnection = "Provider=Microsoft.Jet.OLEDB.4.0;" & _ "Data Source=" & Server.MapPath("mdb-database/immagini.mdb") & ";" & _ "Persist Security Info=True" Conn.Open(sConnection) recordsonpage = 9 allrecords = 0 set rs = conn.Execute("SELECT * FROM immagini") do until rs.EOF allrecords = allrecords + 1 rs.movenext loop offset = request.querystring("offset") if offset = 0 OR offset = "" then requestrecords = 0 else requestrecords = requestrecords + offset end if set rs = conn.Execute("SELECT * FROM immagini ORDER BY id DESC") hiddenrecords = requestrecords do until hiddenrecords = 0 OR rs.EOF hiddenrecords = hiddenrecords - 1 rs.movenext if rs.EOF then lastrecord = 1 end if loop showrecords = recordsonpage recordcounter = requestrecords do until showrecords = 0 OR rs.EOF recordcounter = recordcounter + 1 nomefile = rs("nomefile") if nomefile = "" then response.write "Non ci sono immagini nel database" else if count=0 then response.write "<table style='WIDTH:100%' cellSpacing='0' cellPadding='1' align='center><tr>" end if if count=3 then count=1 response.write "</tr>" response.write "<tr><td><a rel='lightbox' href='immagini/normali" & nomefile response.write "'><img src='immagini/piccole/" & nomefile response.write "' width='290' height='200' style='border:0px'/></a>" & count & "</td>" else count=count+1 response.write "<td><a rel='lightbox' href='immagini/normali/" & nomefile response.write "'><img src='immagini/piccole/" & nomefile response.write "' width='290' height='200' style='border:0px'/></a>" & count & "</td>" end if end if showrecords = showrecords - 1 rs.movenext if rs.EOF then lastrecord = 1 end if loop response.write "</table>" response.write "<table cellspacing='2' cellpadding='2' width='400' align='center' style='border-width:0'><tr><td>" if requestrecords <> 0 then response.write"<a href='immagini.asp?offset=" %> <% = requestrecords - recordsonpage %> <% response.write "'>Indietro</a>" else response.write "Indietro" end if response.write "</td><td>" if lastrecord <> 1 then response.write "<a href='immagini.asp?offset=" %> <% = requestrecords + recordsonpage %> <% response.write "'>Avanti</a>" else response.write "Avanti" end if response.write "</td></tr><tr><td colspan='2'>Pagine: " pagelist = 0 pagelistcounter = 0 do until pagelist > allrecords pagelistcounter = pagelistcounter + 1 response.write "<a href='immagini.asp?offset=" %> <% = pagelist %> <% response.write "'>" %> <% = pagelistcounter %> <% response.write "</a> - " pagelist = pagelist + recordsonpage loop response.write "</td></tr></table>" %>
quindi ho aggiunto il seguente codice
mi funziona lo stesso però la prima fila di immagini in alto mi appare scompattata, nel senso ke mi mette prima una sopra (dove nn funziona nemmeno il link) e due sotto. poi x il resto me le divide a tre colonne x ogni riga.codice:if nomefile = "" then response.write "Non ci sono immagini nel database" else if count=0 then response.write "<table style='WIDTH:100%' cellSpacing='0' cellPadding='1' align='center><tr>" end if if count=3 then count=1 response.write "</tr>" response.write "<tr><td><a rel='lightbox' href='immagini/normali" & nomefile response.write "'><img src='immagini/piccole/" & nomefile response.write "' width='290' height='200' style='border:0px'/></a>" & count & "</td>" else count=count+1 response.write "<td><a rel='lightbox' href='immagini/normali/" & nomefile response.write "'><img src='immagini/piccole/" & nomefile response.write "' width='290' height='200' style='border:0px'/></a>" & count & "</td>" end if end if
secondo voi dove ho sbagliato?
portate pazienza x favore

Rispondi quotando