ho questa esigenza:
ho un db con es. 20 foto e relativi nomi.
devo fare una paginazione che in ogni pagina mi mostri un totale di 8 foto, divise per 2 righe e 4 talelle ogni riga...
la paginazione normale sarebbe:
RecordsPerPagina = 8
page = Request("page")
if isnull(page) or page = "" then page = "1"
set rs = server.CreateObject ("ADODB.Recordset")
rs_sql = " SELECT * FROM tabella ORDER BY id"
rs.Open rs_sql,Session("Conn"), 1, 3
If rs.Eof=True or rs.Bof=True then
Response.Write "
Nessuna foto presente nel Database</P>"
Else
' paginazione
rs.PageSize = RecordsPerPagina
rs.AbsolutePage = page
For i=1 to RecordsPerPagina
if Not rs.EOF then
'mostra record
id = rs("ID")
nome = rs("nome")
foto = rs("foto")
%>
<tr><td>.............</td></tr>
<%
rs.MoveNext
end if
Next
End if
%>
spero di essere stato chiaro....
chi mi aiuta a modificarlo??
Rispondi quotando