paginazione asp

topozoppo

Utente Attivo
19 Gen 2006
80
0
0
Ciao a tutti......

Volevo chiedere come inserire dei risultati di un database access in 2 div della home page...

Mi spiego:
nel mio database ci sono 20 nomi,nel 1 div ne mostro 10 e nel 2 dovrei mostrarne gli altri 10 partendo però dal 11esimo.

Devo aprire il recordset per 2 volte,se si come fa nel 2 div ha partire dall'11esimo??

Grazie:dormo:

Ps:Un saluto al docente Luca,il suo corso asp mi è stato di grande aiuto
 
Ciao! Francesco? Perdonami, non sono sicuro di ricordare bene il nome :)

Si può fare tranquillamete quello che chiedi... ecco come:

<%@LANGUAGE = VBScript%>
<%
Dim cn, rs, i
Set cn = Server.CreateObject("ADODB.Connection")
cn.Open "driver={Microsoft Access Driver (*.mdb)};dbq=" & Server.MapPath("database.mdb")
Set rs = cn.Execute("SELECT * FROM utenti ORDER BY id ASC")
i = 1
Response.Write "<div style='float: Left; width: 150px; background: #EEEEEE;'>"
While rs.EOF = False
Response.Write rs("nome") & "<br>"
If i = 10 Then
Response.Write "</div><div style='float: Left; width: 150px; background: #CCCCCC;'>"
End If
i = i + 1
rs.MoveNext
Wend
Response.Write "</div>"
cn.Close
Set rs = Nothing
Set cn = Nothing
%>

Non fai altro che creare un contatore e lo implementi nel ciclo; prima del ciclo apri un <div> stilizzato con i CSS e, se il contatore arriva a 10, chiudi il <div> e ne apri un altro. Dopo il ciclo inserisci </div> che chiude l'uno o l'altro, a seconda se il contatore è arrivato o meno a 10.

Spero di essere stato chiaro :)

PS. bentornato tra le mie grinfie

:beer:
 
Ciao Luca,
Mi fa piacere che ricordi ancora il nome,cmq ho scritto il codice
che mi hai postato e sembra che vada bene


Grazie


Ciauuuuuuu
 
Anchio problema di paginazione con ASP

lukeonweb ha scritto:
Ricordo tutti i miei "alunni" più attivi :)

A presto!

"più Attivi" ihihihhhi...:D
anch'io ho un problemino di paginazione, non x quanto riguarda l'HTML ma x quanto riguarda la divisione dei dati in più pagine. Riesco a visualizzare tot records x pagina senza problemi, ma, una volta creato il link alle pagine seguenti (?page=<%=pag%>) mi dice che non ci sono dati nel database mentre sono sicuro che dovrebbe tirare fuori la seconda parte di dati...ecco il codice:
<%
'Imposto la connessione al DB
Dim TuttiArticoli
Set TuttiArticoli = Server.CreateObject("ADODB.Connection")
TuttiArticoli.open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath("/mdb-database/giornalino.mdb")

'recupero tutti gli articoli
Dim TuttiArt, SqlArt
Set TuttiArt = Server.CreateObject("ADODB.Recordset")
SqlArt = "SELECT * FROM articoli ORDER BY id DESC"
TuttiArt.Open SqlArt, TuttiArticoli, 1, 3
Dim RecPerPag, page
RecPerPag = 5
page = request.querystring("page")
If page = "" then
page = 1
end if
TuttiArt.AbsolutePage = page
TuttiArt.PageSize = RecPerPag
If TuttiArt.Eof then
Response.Write "Nessun articolo all'interno del database."
Else
For i = 1 to RecPerPag
if Not TuttiArt.Eof then
response.write TuttiArt("titolo_articolo") & "<br>"
End If
TuttiArt.MoveNext
Next
end if
'genero il menù di navigazione delle pagine
response.write"<br>Pagine: "
For pag = 1 to TuttiArt.PageCount
%>
<a href="?what=17&title=Tutti gli articoli&page=<%=pag%>"><%=pag%></a>
<%
Next
%>
In questo caso mi vengono 2 pagine visto che ho 7 articoli nel database.Ma quando clicco x accedere alla seconda pagina mi dice che non ci sono articoli...chi mi illumina la via?
 

Discussioni simili