le fono vengono chiamate tramite un rs da un db access (fatto con dw), poi sempre tramite il codice di dw ho messo la funzione ripeti e me le visualizza tutte. Logicamente il codice è messo in maniera da risultare in una tabella R1xC1 con dimensioni fisse, che potrebbe contenere 4 foto per riga ed un numero variabile di righe. NB: la tabella non viene ripetuta ma solo il suo contenuto.
Ti incollo il codice della pagina che includo.
codice:<% Dim foto__MMColParam foto__MMColParam = "1" If (Request.QueryString("cat") <> "") Then foto__MMColParam = Request.QueryString("cat") End If %> <% Dim foto Dim foto_numRows Set foto = Server.CreateObject("ADODB.Recordset") foto.ActiveConnection = MM_conn_STRING foto.Source = "SELECT * FROM TBLFoto WHERE Categoria = '" + Replace(foto__MMColParam, "'", "''") + "'" foto.CursorType = 0 foto.CursorLocation = 2 foto.LockType = 1 foto.Open() foto_numRows = 0 %> <% Dim Repeat1__numRows Dim Repeat1__index Repeat1__numRows = -1 Repeat1__index = 0 foto_numRows = foto_numRows + Repeat1__numRows %> <table width="300" border="0" cellspacing="0" cellpadding="0"> <tr> <td align="center"> <% While ((Repeat1__numRows <> 0) AND (NOT foto.EOF)) %> &id=<%=(foto.Fields.Item("ID").Value)%>" target="_parent">[img]/public/gallery/<%=(foto.Fields.Item([/img]" alt="<%=(foto.Fields.Item("Descrizione").Value)%>" width="65" height="65" border="0"> <% Repeat1__index=Repeat1__index+1 Repeat1__numRows=Repeat1__numRows-1 foto.MoveNext() Wend %> </td> </tr> </table> <% foto.Close() Set foto = Nothing %>
GRAZIE!