4 messaggi dal 11 dicembre 2008
Ciao a tutti sono nuovo del forum...
mi sapreste aiutare su come poter paginare una serie di risultati ottenuti da un database... tipo 12 risultati per pagina???
Ho visto degli esempi su internet, ma non riesco a legarli al mio codice a sua volta prelevato dal web e che ho modificato per le mie esigenze...
Mi date una mano perfavore??? io c metto sei giorni...

Vi posto il codice...

<%@ LANGUAGE = JScript %>
<%
var Prodotto = String(Request.Form("Prodotto"));
var PDescrizione = String(Request.Form("PDescrizione"));
var CPrezzo = String(Request.Form("CPrezzo"));
var testo = Prodotto + " " + PDescrizione + " " + CPrezzo;

var keywords = testo.split(" ");
if (keywords=="Prodotto,PDescrizione,CPrezzo") Response.Redirect("../prova.html");

var stringaDiConnessione = "driver={Microsoft Access Driver (*.mdb)};dbq=";
stringaDiConnessione += Server.MapPath("db/archivio.mdb");
var conn = new ActiveXObject("ADODB.Connection");
conn.Open(stringaDiConnessione);

var sql = "SELECT * FROM pagineweb WHERE";
for (i=0;i<keywords.length;i++) {
if (i>0) sql += " AND";
sql += " keywords LIKE '%" + keywords[i] + "%'";
}

var ris = conn.Execute(sql);

if (ris.EOF) Response.Write("<b>NESSUN DOCUMENTO TROVATO</b>");
else while (!ris.EOF) {
Response.Write(ris("url"));
ris.MoveNext();
}

conn.Close();
%>

Ciao a tutti e grazie per l'aiuto e la pazienza... Robbie
Modificato da Robbie Depp il 13 dicembre 2008 21.14 -
301 messaggi dal 31 maggio 2006
ciao
inserisci queste righe
ris.PageSize = 10 ' numero di record per pagina
ris.AbsolutePage = NumPagina ' pagina da visualizzare


prima dopo

var ris = conn.Execute(sql); 
4 messaggi dal 11 dicembre 2008
Ciao gghi,
grazie mille della risposta...
ma non ho capito dove devo inserire le due righe e poi per andare avnati e indietro nelle pagine nn vedo collegamenti...
Come si fa???

Grazie mille, RoBbiE
301 messaggi dal 31 maggio 2006
ciao
nel precedente msg ho scritto 'prima dopo', e 'dopo'. per quanto riguarda i link devi mettere tu due link avanti e dietro che richiamano la stessa pagina, con parametro NumPagina-1 (+1)

paginazione.asp?numPagina=numPagina passato +-1


La prima volta che chiamano la pagina in querystring non ci sarà il parametro numPagina che forsi a 1,
4 messaggi dal 11 dicembre 2008
Ciao gghi,
ci sto provando ma nn riesco a farlo funzionare...
Visto ke c metti un attimo vista la tua preparazione, riusciresti a modificare il mio codice ed incollarlo, in modo che io possa fare la stessa cosa ed inserirla nella mia pagina

Grazie mille e scusami... RoBbiE
301 messaggi dal 31 maggio 2006
ciao

Visto ke c metti un attimo vista la tua preparazione, ...


dammi un attimo
301 messaggi dal 31 maggio 2006
Ciao

il codice è fornito AS IS, non garantisco sulla sintassi  perchè l'ho scritto al volo con notepad, non ho nemmeno provato ad eseguirlo perchè non ho un ambiente dove poterlo far girare.

P.s. Invece che JScript non sarebbe meglio VBScript; hai meno problemi sulla distribuzione, vbscript è installato sicuramente sulle macchine con s.o. microsoft, jscript (non è sun è quello microsoft) non altrettanto.

<%@ LANGUAGE = JScript %> 
<% 
var Prodotto = String(Request.Form("Prodotto")); 
var PDescrizione = String(Request.Form("PDescrizione")); 
var CPrezzo = String(Request.Form("CPrezzo")); 
var testo = Prodotto + " " + PDescrizione + " " + CPrezzo; 

//Barra navigazione
var NumPage
NumPage=1
if (Request.QueryString("page")!="")
  NumPage=Request.QueryString("page")
  
if (NumPage<0)
  NumPage=1
  
//MODIFICA NOMEPAGINA.ASP con nome della tua pagina
response.write "<a href='NOMEPAGINA.ASP?page=" + (NumPage - 1) + "'>prev</a>"
response.write "<a href='NOMEPAGINA.ASP?page=" + (NumPage + 1) + "'>next</a>"

var keywords = testo.split(" "); 
if (keywords=="Prodotto,PDescrizione,CPrezzo") Response.Redirect("../prova.html"); 

var stringaDiConnessione = "driver={Microsoft Access Driver (*.mdb)};dbq="; 
stringaDiConnessione += Server.MapPath("db/archivio.mdb"); 
var conn = new ActiveXObject("ADODB.Connection"); 
conn.Open(stringaDiConnessione); 

var sql = "SELECT * FROM pagineweb WHERE"; 
for (i=0;i<keywords.length;i++) { 
if (i>0) sql += " AND"; 
sql += " keywords LIKE '%" + keywords[i] + "%'"; 
} 

var ris = conn.Execute(sql); 
//Imposto la pagina
ris.PageSize = 10 ' numero di record per pagina 
ris.AbsolutePage = NumPagina ' pagina da visualizzare 


if (ris.EOF) Response.Write("<b>NESSUN DOCUMENTO TROVATO</b>"); 
else while (!ris.EOF) { 
Response.Write(ris("url")); 
ris.MoveNext(); 
} 

conn.Close(); 
%>

Modificato da gghi il 18 dicembre 2008 10.54 -
4 messaggi dal 11 dicembre 2008
Ciao gghi,
nn funziona... anke cambiando solo la scritta jscript in vbscript nn funziona...
Come posso fare???
Ciao e grazie per la pazienza

Torna al forum | Feed RSS

ASPItalia.com non è responsabile per il contenuto dei messaggi presenti su questo servizio, non avendo nessun controllo sui messaggi postati nei propri forum, che rappresentano l'espressione del pensiero degli autori.