Aiuto con asp e database!Sto impazzendo!!

alex.roma

Nuovo Utente
11 Set 2004
22
0
0
CiAo! Cursori hai detto....hm...do un occhiata subito!! Poi ti faccio sapere.....! Grazie :byebye:
 

alex.roma

Nuovo Utente
11 Set 2004
22
0
0
Niente....mi sto scoraggiando...:dipser: Come devessere scritto all interno del mio documeto precedentemente postato?:(
ciao:rolleyes:
 

PoLe

MRW Moderator
6 Giu 2005
2.198
3
0
40
.: Venezia :.
www.bzconsulting.it
Niente....mi sto scoraggiando...:dipser:
Questo mai alex! :)

Secondo me la cosa meglio che puoi fare è iniziare con una cosetta semplice per capire la paginazione ;)

Crea un database con una tabella di nome 'prova', avente un solo campo di nome 'cognome', ed inseriscici dei cognomi a caso.

Dopo di che, senza moduli o altro, crea una paginetta ASP "semplice" che estragga tutti i cognomi, paginandoli 5 per volta.

Buon lavoro :byebye:
 

alex.roma

Nuovo Utente
11 Set 2004
22
0
0
Anche se mi scoraggio nn rinuncio!:ilpirata:
Provo il tuo consiglio quando ho un attimino....poi ti faccio sapere!
Grazie:mexican:

:byebye: :byebye:
 

alex.roma

Nuovo Utente
11 Set 2004
22
0
0
Buongiorno!
Allora diciamo che ho provato e ci sono quasi riuscito ma ho 2 problemini...ho mischiato un po di codice mio e un po di un esempio postato nei tutorial del sito...i problemi sono due:

Il Primo è QUESTO:
ADODB.Recordset error '800a0cb3'

Current Recordset does not support bookmarks. This may be a limitation of the provider or of the selected cursortype.

/it/prova.asp, line 39

Dove la linea 39 è --->>> rs.AbsolutePage = pag

togliendolo funziona però nonostante tutto funzioni alla perfezione mi da infinite pagine con sempre gli stessi risultati....:hammer:


Questo è il codice della pagina prova.asp che uso....

<%@LANGUAGE = VBScript%>
<!--#include file="connessione.asp"-->
<%
' DEFINISCO LE VARIABILI CHE MI SERVONO PER L'APPLICAZIONE
Dim cn, rs, quanti, pag, contatore


' Creo un'istanza per la connessione ed una per il Recordset
Set cn = Server.CreateObject("ADODB.Connection")
Set rs = Server.CreateObject("ADODB.Recordset")

' APRO LA CONNESSIONE COL DATABASE
cn.Open str_cn

' DEFINISCO IL NUMERO DI RECORD DA VISUALIZZARE PER OGNI PAGINA
quanti = 2

' RECUPERO IL NUMERO DI PAGINA CORRENTE
' E CONTROLLO CHE NON SIA INFERIORE A 1
pag = Request.QueryString("pag")
If IsNumeric(pag) = False Or pag < 1 Then pag = 1

' IMPOSTO UN CONTATORE
contatore = 0
%>
<html>
<head>
<title>Paginazione dei risultati di query molto lunghe in ASP</title>
<style>a { color: blue; }</style>
</head>
<body>

<table align="center" width="300" border="1">
<%
Dim SQL ' Creo la query SQL
SQL = "SELECT * FROM tabella WHERE nome = 'mario' ORDER BY 'nome' ASC"
' EFFETTUO MATERIALMENTE LA PAGINAZIONE
rs.Open sql, cn
rs.AbsolutePage = pag
rs.PageSize = quanti

' ESEGUO IL CICLO
While rs.EOF = False And contatore < quanti
%>
<tr><td><%=rs("nome")%></td></tr>
<%
rs.MoveNext
' INCREMENTO IL VALORE DEL CONTATORE
contatore = contatore + 1
Wend
%>
</table>


<p align="center">
<%If pag > 1 Then%>
<a href="prova.asp?pag=<%=pag-1%>">Indietro</a>
<%End If%>
<%
Dim x
x = 1
For x = 1 To rs.PageCount
If CInt(pag) <> x Then
%>
[<a href="prova.asp?pag=<%=x%>"><%=x%></a>]
<%
Else
%>
[<a href="prova.asp?pag=<%=x%>"><b><%=x%></b></a>]
<%
End If
Next
%>
<%If rs.EOF = False Then%>
<a href="prova.asp?pag=<%=pag+1%>">Avanti</a>
<%End If%>
</p>

</body>
</html>
<%
' UN PO DI PULIZIA...
rs.Close
Set rs = Nothing
cn.Close
Set cn = Nothing
%>


Cosa non funziona????:confused: :confused: :confused:
:confused:

Dai che sono ad un passo dalla rimonta!:incazz:

:rolleyes: lo so...grazie a te....

:byebye: :byebye: un salutone. Alex
 

alex.roma

Nuovo Utente
11 Set 2004
22
0
0
Dovrebbe essere proprio un errore riguardante i cursori ma come devo infilarli?


---allora ho provato un po e ora infilando il cursore 3 funziona ma mi da un errorino ovvero è come se poi nn leggesse piu dopo aver scritto il primo dato ma mi crea cmq tutti i numeri di pagina per visualizzare gli altri risultati che pero nn appaiono.....idemo per il tasto avanti che nelle altre pagine non viene piu visualizzato.... questo è la prova che ho fatto....dove sbaglio???

<%@LANGUAGE = VBScript%>
<!--#include file="connessione.asp"-->
<%
' DEFINISCO LE VARIABILI CHE MI SERVONO PER L'APPLICAZIONE
Dim cn, rs, quanti, pag, contatore


' Creo un'istanza per la connessione ed una per il Recordset
Set cn = Server.CreateObject("ADODB.Connection")
Set rs = Server.CreateObject("ADODB.Recordset")

' APRO LA CONNESSIONE COL DATABASE
cn.Open str_cn

' DEFINISCO IL NUMERO DI RECORD DA VISUALIZZARE PER OGNI PAGINA
quanti = 1

' RECUPERO IL NUMERO DI PAGINA CORRENTE
' E CONTROLLO CHE NON SIA INFERIORE A 1
pag = Request.QueryString("pag")
If IsNumeric(pag) = False Or pag < 1 Then pag = 1

' IMPOSTO UN CONTATORE
contatore = 0
%>
<html>
<head>
<title>Paginazione dei risultati di query molto lunghe in ASP</title>
<style>a { color: blue; }</style>
</head>
<body>

<table align="center" width="300" border="1">
<%
Dim SQL ' Creo la query SQL
SQL = "SELECT * FROM dati"
' EFFETTUO MATERIALMENTE LA PAGINAZIONE
rs.Open sql, cn, 3
rs.AbsolutePage = pag
rs.PageSize = quanti

' ESEGUO IL CICLO
While rs.EOF = False And contatore < quanti
%>
<tr><td><%=rs("nome")%></td></tr>
<%
rs.MoveNext
' INCREMENTO IL VALORE DEL CONTATORE
contatore = contatore + 1
Wend
%>
</table>


<p align="center">
<%If pag > 1 Then%>
<a href="prova.asp?pag=<%=pag-1%>">Indietro</a>
<%End If%>
<%
Dim x
x = 1
For x = 1 To rs.PageCount
If CInt(pag) <> x Then
%>
[<a href="prova.asp?pag=<%=x%>"><%=x%></a>]
<%
Else
%>
[<a href="prova.asp?pag=<%=x%>"><b><%=x%></b></a>]
<%
End If
Next
%>
<%If rs.EOF = False Then%>
<a href="prova.asp?pag=<%=pag+1%>">Avanti</a>
<%End If%>
</p>

</body>
</html>
<%
' UN PO DI PULIZIA...
rs.Close
Set rs = Nothing
cn.Close
Set cn = Nothing
%>
 
Ultima modifica:

PoLe

MRW Moderator
6 Giu 2005
2.198
3
0
40
.: Venezia :.
www.bzconsulting.it
Ciao alex ;)

Strano non ti funzioni, da quel che vedo lo script lo hai preso da MRW, giusto?

Fa così, cambia ancora il cursore, aggiungi la parte in blu:
rs.Open sql,cn,3,3
SaluT!
:byebye:
 

alex.roma

Nuovo Utente
11 Set 2004
22
0
0
...vedo lo script lo hai preso da MRW, giusto?
Esatto, quello della paginazione l'ho infilato quasi paro paro...
Fa così, cambia ancora il cursore, aggiungi la parte in blu:
rs.Open sql,cn,3,3

Ci avevo già pensato e per scrupolo l'ho appena fatto...ma niente...non va...è come se lo facesse...ovvero crea molte pagine (1-2-3-4-5..) ma solo la prima contiene il dato le altre le fa vedere vuote...e se ad esempio aumento i dati (records)da visualizzare per pagina la prima è sempre compilata bene le altre sempre vuote...Io nn riesco a capire...sono sicuro che il broblema è nei cursori ma purtroppo conoscendoli da poco tempo davvero non so come muovermi! Dove sarà l'errore?! :crying: Sicuramente è un errore da niente ma proprio per questo forse difficile per me da trovare!!

Un saluto :beer:
 

alex.roma

Nuovo Utente
11 Set 2004
22
0
0
:crying: non so come dirtelo...:incazz: non funge neanche cosi sto bastardaccio!:incazz2:
Sto perdendo le speranze....eppure penso che funzioni a molti questo script...:eek: Tranne a me!

Ti ringrazio per l'ennesima volta per il grande supporto che mi stai dando compreso quello morale perche ora sbatterei volentieri la capoccia al muro :D

Cmq ritornando al problema ho infilato la parte di codice che mi hai detto ma non è cambiato nulla...sempre lo stesso problema....


Possibile?:eek:

Un saluto

Alex:ilpirata:
 

PoLe

MRW Moderator
6 Giu 2005
2.198
3
0
40
.: Venezia :.
www.bzconsulting.it
Non saprei allora, anche perchè non ho tempo di provare il tuo script ed analizzarlo per bene :)

Fai così, azzera tutto, riscrivi il codice tutto da capo, copiandolo pari pari dall'esempio del tutorial, senza cambiarlo di una virgola!
Se non funziona vuol dire che c'è qualche problema che non riguarda il codice ;)

:byebye:
 

alex.roma

Nuovo Utente
11 Set 2004
22
0
0
We ciao...
senti questa alternativa sembra funzionare per il momento...
tu che ne pensi? è un alternativa valida?

<%@LANGUAGE = VBScript%>
<!--#include file="connessione.asp"-->
<%
' DEFINISCO LE VARIABILI CHE MI SERVONO PER L'APPLICAZIONE
Dim cn, rs, quanti, pag, contatore

' Creo un'istanza per la connessione ed una per il Recordset
Set cn = Server.CreateObject("ADODB.Connection")
Set rs = Server.CreateObject("ADODB.Recordset")

' APRO LA CONNESSIONE COL DATABASE
cn.Open str_cn

' DEFINISCO IL NUMERO DI RECORD DA VISUALIZZARE PER OGNI PAGINA
RecordsXPagina = 6

' RECUPERO IL NUMERO DI PAGINA CORRENTE
' E CONTROLLO CHE NON SIA INFERIORE A 1

If Request.QueryString("pagina") = "" Then
pagina = 1
Else
pagina = CInt(Request.QueryString("pagina"))
End If

' IMPOSTO UN CONTATORE
contatore = 0
%>
<html>
<head>
<title>Paginazione dei risultati di query molto lunghe in ASP</title>
<style>a { color: blue; }</style>
</head>
<body>

<table align="center" width="300" border="1">
<%
Dim SQL ' Creo la query SQL
SQL = "SELECT * FROM dati"
' EFFETTUO MATERIALMENTE LA PAGINAZIONE
rs.Open sql, cn, 3,3

if not RS.eof then

RS.PageSize = RecordsXPagina
RS.AbsolutePage = pagina

For i = 1 to RecordsXPagina
if not RS.eof then
%>
<tr><td><%=rs("nome")%> </td></tr>
<%

RS.movenext
' INCREMENTO IL VALORE DEL CONTATORE
contatore = contatore + 1
end if
next


Response.Write "<b><br>Numero Pagine:</b> "
For pagina = 1 to RS.PageCount
Response.Write "<A href='"&istring&"?pagina=" & pagina
Response.write "'>"
Response.write "<font size=1 color=#000080>"
Response.Write pagina
Response.Write "</A> "
Next
Response.Write ">><br><br></td></tr>"

rs.Close
Set rs = Nothing
Cn.Close
Set Cn = Nothing
end if

%>
</table>
 
Discussioni simili
Autore Titolo Forum Risposte Data
L aiuto con pagina asp Discussioni Varie 2
L Aiuto con DataGridView Visual Basic 1
K Aiuto con file audio in html HTML e CSS 1
R Aiuto con le query MS Access 2
G Aiuto con htaccess e rewriterule PHP 0
M Aiuto con inserimento immagini WordPress 6
G Aiuto HTML, collegamento con un bottone a una <div> di un' altra pagna HTML e CSS 5
motleyrulez Aiuto con un ciclo PHP 0
maicol07 Python - Tkinter - Aiuto con pulsanti e tuple Programmazione 0
L [Javascript] aiuto non riesco a inviare in get dal server web locale su altervista con httpRequest Javascript 0
N Mi serve aiuto con "Snake". C/C++ 1
F ciao, sono ferro e ho bisogno di aiuto per problemi con la mail di alice.it Presentati al Forum 1
M Aiuto: problema con il mio TP-Link range extender Reti LAN e Wireless 0
L [HTML] Aiuto con immagini random HTML e CSS 1
S PHP: Aiuto con upload immagini che si auto tuotano PHP 24
A scambio lavoro per aiuto con android Sviluppo app per Android 0
I Form/aree di testo con input da lista di nomi!Chiedo aiuto!! HTML e CSS 3
M Aiuto con script di ricerca video youtube data api v3 Javascript 1
I attributo con IF aiuto PHP 3
ecosito Aiuto con la traduzione in italiano per capire come installare questo JavaScript jQuery 0
F Aiuto: impossibile la mappatura di un'immagine con Dreamweaver CC2015 HTML e CSS 8
D aiuto con query PHP 1
J Aiuto per localstorage con jquery/js/json Javascript 4
Marco_88 Aiuto con istruzione INSERT Database 8
M Aiuto su come procedere con un ciclo foreach PHP 4
R Redirect 301 con htaccess non funziona. Aiuto! PHP 1
I database con visual studio 2012 aiuto Database 0
L Aiuto con l'html di una pagina web HTML e CSS 0
V Aiuto con swipe e DB Sviluppo app per Android 2
N Aiuto con html nascondere i media HTML e CSS 4
T Aiuto con script PHP PHP 0
N ciao a tutti ho bisogno di aiuto con l'estensione mysqli?? MySQL 0
I Aiuto uso Nivo Slider con javascript jQuery 2
L problema con la funzione header!!! AIUTO! PHP 24
S Aiuto con PHP! PHP 4
D Aiuto Ajax da PHP con codifica json Ajax 0
K AIUTO con Apache WEBDAV E MOD_DAV Joomla 0
S aiuto con le query PHP 0
D aiuto con pag di login in php PHP 1
S [RISOLTO]aiuto, non riesco afar funzionare il camp odi ricerca per un DB con PHP PHP 5
S aiuto con query MySQL 10
P Aiuto con onclick Javascript 2
W Aiuto per menù fatto con immagini e relativo sottomenù HTML e CSS 2
D Chiedo aiuto con questo codice PHP 0
L Sito con mamp AIUTO PHP 12
M Aiuto con questo script PHP 21
D Aiuto con Ajax e pagine incluse nei DIV Ajax 1
L verifica mail in db con jquery e ajax. Aiuto jQuery 9
P Aiuto con Prestashop CMS (Content Management System) 3
Z Aiuto con l'input PHP 0

Discussioni simili