Ciao a tutti
vorrei aggiungere alla mia gallery del codice per visualizzare le immagini su più colonne. Ovviamente vorrei decidere io il numero di colonne da visualizzare, ad es. 4 colonne.
Nel codice della mia pagina per ora ho un contatore dove posso decidere quante immagini visualizzare per pagina, e se supero il numero di immagini da visualizzare in quella pagina, visualizzo il restante delle immagini in un'altra pagina cliccando sulla barra di navigazione.
Però il mio codice visualizza le immagini una sopra l'altra.
Potete aiutarmi?
So che dovrei realizzare un codice che agisca sul <td> per disporre le immagini in orizzontale, ma non avendolo mai fatto non ho un'idea su come procedere.
Il codice della mia pagina è questo:
codice:
<%
'Dichiaro il recordset
Dim rs
'Creo il recordset
Set rs = Server.CreateObject("ADODB.Recordset")
'Dichiaro la stringa Sql
Dim Sql
id_v = request.QueryString("id_categoria")
'Creo la stringa Sql
sql = "SELECT * FROM TabGallery WHERE ID_CATEGORIA = "& id_categoria_v &" order by NOME asc, NOME_GRUPPO asc"
'Apro il recordset, eseguo la stringa Sql e su quale db eseguirla
rs.Open Sql, cn, 1
%>
<%
' DEFINISCO LE VARIABILI CHE MI SERVONO PER L'APPLICAZIONE
Dim quanti, pag, contatore_record
' DEFINISCO IL NUMERO DI RECORD DA VISUALIZZARE PER OGNI PAGINA
quanti = 6
' RECUPERO IL NUMERO DI PAGINA CORRENTE
' E CONTROLLO CHE NON SIA INFERIORE A 1
pag = Request.QueryString("pag")
If IsNumeric(pag) = False Or pag < 1 Then pag = 1
' IMPOSTO UN CONTATORE
contatore_record = 0
%>
<table>
<tbody>
<% ' EFFETTUO MATERIALMENTE LA PAGINAZIONE
rs.PageSize = quanti
rs.AbsolutePage = pag
' ESEGUO IL CICLO
While rs.EOF = False And contatore_record < quanti
'While ((RepeatMarcatori__numRows <> 0) AND (NOT rs.EOF)) ' Vecchio codice di DW
%>
<tr>
<% If rs("ON_LINE") = TRUE Then 'Controllo x visualizzare o meno le immagini%>
<td>
<p id="sfondo_tbn_img1">
<a href="<%=rs("IMG_1")%>" rel="lightbox[roadtrip]" title="<%=rs("NOME")%>">
[img]<%=rs([/img]" alt="<%=rs("NOME")%>" />
</a>
<div id="nome"><%=rs("NOME")%></div>
<div id="nome_gruppo"><%=rs("NOME_GRUPPO")%></div>
</p>
</td>
<% end if 'FINE Controllo x visualizzare o meno le immagini %>
</tr>
<%
contatore = contatore + 1
contatore_record = contatore_record + 1
'Vai al prossimo
rs.MoveNext
Wend
%>
<tr>
<td colspan="11">
<div id="naviga_record">
<%
ord = request.querystring("ord")
%>
<%If pag > 1 Then%>
Indietro
<%End If%>
<%
Dim x
x = 1
For x = 1 To rs.PageCount
If CInt(pag) <> x Then
%>
[<%=x%>]
<%
Else
%>
[<%=x%>]
<%
End If
Next
%>
<%If rs.EOF = False Then%>
Avanti
<%End If%>
</div>
</td>
</tr>
</tbody>
<tfoot></tfoot>
</table>
<%
'Chiudo il recordset
rs.Close
Set rs = Nothing
'Chiudo la connessione
'cn.Close
'Set cn = Nothing
%>