codice:
<%
massimo=10
if session("minimo")="" then
incremento=0
session("massimo")=10
else
incremento=request.queryString("incremento")
end if
minimo=incremento+session("minimo")
massimo=incremento+session("massimo")
session("minimo")=minimo
session("massimo")=massimo
Set Conn = Server.CreateObject("ADODB.Connection")
Conn.Open "DRIVER={Microsoft Access Driver (*.mdb)};" &_
"DBQ="& Server.MapPath("///")
sql = "SELECT * FROM tabella order by id"
Set Rs = Conn.Execute(sql)
Do Until Rs.EOF
tot_query=tot_query+1
Rs.MoveNext
Loop
sql = "SELECT * FROM tabella order by id"
Set Rs = Conn.Execute(sql)
Do Until Rs.EOF
subtot_query=subtot_query+1
if subtot_query>minimo and subtot_query<massimo then
out=out&rs("nome_campo1")&" - "&rs("nome_campo2")&" - "&rs("nome_campo3")&" - "&rs("ecc.....")&"
"
end if
Rs.MoveNext
Loop
Rs.Close
Set Rs = Nothing
Conn.Close
Set Conn = Nothing
%>query=<%=out%>
Totale messaggi <%=tot_query%>
dal n° <%=minimo%> al n° <%=massimo%>
Questo è il codice della pagina asp che requpera i dati
nel movie devi mettere un campo di testo dinamico setato per formatare il teso <> e due bottoni uno per cominciare a leggere i dati e l' altro per tornare in dietro
il codice da associare ai bottoni è
in dietro
codice:
on (release) {
loadVariables("pagina.asp?incremento=-10", this);
}
avanti
codice:
on (release) {
loadVariables("pagina.asp?incremento=10", this);
}