impaginazione risultati

[nm2002]

ok.

ma la query non è sbagliata in quanto la prima pagina funziona..

ma per ogni paginadeve fare la select ?

non capisco il senso allora,tanto vale non impaginare no ?
(sto impagniendo i record per allegerire lo script e la stampata a video)

[Wama]

se stai lavorando sempre nella pagina list.asp non è assolutamente necessario rifare la select.

posta la select

[nm2002]

eccola (senza impaginazione funziona correttamente tutto lo script):


Set rscat = Server.CreateObject("ADODB.Recordset")

XsqlText = "select * from tab "
XsqlText = XsqlText & "where tab.PN_COD_ART = "
XsqlText = XsqlText & "tab.PN_COD_ART"
XsqlText = XsqlText & strDimWhere & strUtiWhere & strCatWhere & strVelWhere
XsqlText = XsqlText & "order by tab.PN_DES_MARCA, tab.PN_DES_ART"

StringaCat= XsqlText
rscat.Open StringaCat, conn,3,3

---------------

per impaginare uil codice qui sotto.
Secondo me l'errore sta nella terza riga che gli passa "StringaCat"
..che nel codice originario che ho trovato praticamente è il criterio di ircerca..
..a che serve "Server.UrlEncode(StringaCat)" ???

Response.write "Pagine: "
For pag=1 to rscat.PageCount
Response.Write "&" & Server.UrlEncode(StringaCat)
Response.Write "<form action='aaa-risp1-list.asp?page=" & pag &"' method='post' id='form1' name='form1'><input type='hidden' name='codicecliente' value='" & codcli & "'><input type='submit' value='"
Response.Write pag
Response.Write "'></form>"
Next
Response.Write ""

[nm2002]

anche togliendo la 3° riga

<%
Response.write "Pagine: "
For pag=1 to rscat.PageCount
'Response.Write "&" & Server.UrlEncode(StringaCat)
Response.Write "<form action='aaa-risp1-list.asp?page=" & pag &"' method='post' id='form1' name='form1'><input type='hidden' name='codicecliente' value='" & codcli & "'><input type='submit' value='"
Response.Write pag
Response.Write "'></form>"
Next
Response.Write ""
%>

-----------
mi da errore
-------------
SQLState: 60
Native Error Code: 933
[MERANT][ODBC 20101 driver][Oracle]ORA-00933: SQL command not properly ended

[Wama]

scrivi nel codice della tua pagina

XsqlText = <%=Response.Write(XsqlText)%>

e poi postami la stringa select che ti viene mostrata dal browser

[nm2002]

XsqlText = select * from tab where tab.PN_COD_ART = tab.PN_COD_ART and tab.PN_DES_ART like '%205%55%16%' and tab.PN_UTILIZZO = 'V' and tab.PN_MARCA = '012'order by tab.PN_DES_MARCA, tab.PN_DES_ART

[Wama]

XsqlText = select * from tab where tab.PN_COD_ART = tab.PN_COD_ART and tab.PN_DES_ART like '%205%55%16%' and tab.PN_UTILIZZO = 'V' and tab.PN_MARCA = '012'order by tab.PN_DES_MARCA, tab.PN_DES_ART

ci vuole innanzitutto uno spazio prima di order by
e poi non capisco questo where tab.PN_COD_ART = tab.PN_COD_ART ??

[nm2002]

era lo spazio!

cazzzzzzzzzzzzzzz...
maledetto asp!

(la select è giusta l'ho testata varie volte)

..adesso il link per passar ealle pagine varie è cosi:

Response.write "Pagine: "
For pag=1 to rscat.PageCount
Response.Write "<form action='aaa-risp1-list.asp?page=" & pag
Response.Write "&" & Server.UrlEncode(strRicerca)
Response.Write "' method='post' id='form1' name='form1'><input type='hidden' name='codicecliente' value='" & codcli & "'><input type='submit' value='"
Response.Write pag
Response.Write "'></form>"
Next
Response.Write ""


...sembr aok

strRicerca
praticamente è un insimer edi varibili e sql..
che però non vengono passate alla pagine seguente

come
gliele passo ??

[Wama]

Response.write "Pagine: "
For pag=1 to rscat.PageCount
Response.Write "<form action='aaa-risp1-list.asp?page=" & pag
Response.Write "&strRicerca=" & Server.UrlEncode(strRicerca) Response.Write "' method='post' id='form1' name='form1'><input type='hidden' name='codicecliente' value='" & codcli & "'><input type='submit' value='"
Response.Write pag
Response.Write "'></form>"
Next
Response.Write ""

e poi nella pagina successiva fai un Request.QueryString("strRicerca")

[Wama]

io comunque piuttosto utilizzare un form avrei fatto così

Response.write "Pagine: "
For pag=1 to rscat.PageCount
Response.Write "<a href='aaa-risp1-list.asp?page=" & pag
Response.Write "&strRicerca=" & Server.UrlEncode(strRicerca)
Response.Write "&codicecliente=" & codcli & "'>"&pag&"</a> "
Next 
Response.Write ""