[ASP] paginazione-risultati-query-grandi-dimensioni

vatuss

Nuovo Utente
24 Giu 2009
20
0
1
Buonasera Forum sono alle prese con lo script che segue

https://www.mrw.it/asp/paginazione-risultati-query-grandi-dimensioni_6803.html

che desidero implementare nella mia pagina web.

Le ho tentate tutte, ma non riesco a risolvere questo errore:

ADODB.Recordset error '800a0cb3'
Il set di record corrente non supporta i segnalibri. Potrebbe trattarsi di una limitazione del provider o del tipo di cursore selezionato.
/ricerca/search.asp, riga 119

Questo il codice che utilizzo per la connessione:

<%
'Dim MM_ecommerce_STRING
MM_ecommerce_STRING = "Driver={Microsoft Access Driver (*.mdb)};DBQ=" & Server.MapPath("/mdb-database/shop/E-commerce.mdb")
%>

Questoil codice della pagina:

<%'@LANGUAGE="VBSCRIPT" CODEPAGE="1252"%>
<!--#include file="Connections/ecommerce.asp" -->
<%
' DEFINISCO LE VARIABILI CHE MI SERVONO PER L'APPLICAZIONE
Dim MM_ecommerce_STRING, cn, quanti, pag, contatore ' sc = MM_ecommerce_STRING | rs = prodricer

' DEFINISCO LA STRINGA DI CONNESSIONE
' sc = ""
' sc = sc & "driver={Microsoft Access Driver (*.mdb)};dbq="
' sc = sc & Server.MapPath("database.mdb")

Dim prodricer
Dim prodricer_numRows

' IMPOSTO LA CONNESSIONE EDIL RECORDSET
Set cn = Server.CreateObject("ADODB.Connection")
Set prodricer = Server.CreateObject("ADODB.Recordset")

' APRO LA CONNESSIONE COL DATABASE
cn.Open MM_ecommerce_STRING

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

' 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

Set prodricer = Server.CreateObject("ADODB.Recordset")
prodricer.ActiveConnection = MM_ecommerce_STRING
prodricer.Source = "SELECT * FROM Prodotti WHERE "&Request.QueryString("campo")&" LIKE '%" + Request.QueryString("cosa") + "%'"

prodricer.CursorType = 0
prodricer.CursorLocation = 2
prodricer.LockType = 1
prodricer.Open()
prodricer_numRows = 0
%>

<%
'Dim Repeat1__numRows
Dim Repeat1__index
Repeat1__numRows = -1
Repeat1__index = 0
prodricer_numRows = prodricer_numRows + Repeat1__numRows
%>


<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN" "http://www.w3.org/TR/html4/loose.dtd">
<html>
<head>
<title>E-commerce - Daviduccio.it</title>
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
<link href="../CSS/style.css" rel="stylesheet" type="text/css">

<script language="javascript">
function svuota() {
document.form1.cosa.value="";
}
</script>
</head>

<body>
<div align="center" class="Stile1">
<table width="560" border="0">
<tr>
<td height="19" bgcolor="#efefef"><div align="right" class="Stile3"><strong>Pagina di ricerca </strong></div></td>
</tr>
<tr>
<td><p>&nbsp;</p>
<form name="form1" method="get" action="">
<table border="0" class="Stile3">
<tr>
<td>Cerca:</td>
<td><input name="cosa" type="text" class="Stile3" id="cosa" onFocus="svuota()" value="<%=Request.QueryString("cosa")%>" size="30"></td>
<td><select name="campo" class="Stile3" id="campo">
<option value="Nome" <%If (Not isNull(Request.QueryString("campo"))) Then If ("Nome" = CStr(Request.QueryString("campo"))) Then Response.Write("SELECTED") : Response.Write("")%>>Nel Nome</option>
<option value="Descrizione" <%If (Not isNull(Request.QueryString("campo"))) Then If ("Descrizione" = CStr(Request.QueryString("campo"))) Then Response.Write("SELECTED") : Response.Write("")%>>Nella Descrizione</option>
<option value="Marca" <%If (Not isNull(Request.QueryString("campo"))) Then If ("Marca" = CStr(Request.QueryString("campo"))) Then Response.Write("SELECTED") : Response.Write("")%>>Nella Marca</option>
<option value="Classe" <%If (Not isNull(Request.QueryString("campo"))) Then If ("Classe" = CStr(Request.QueryString("campo"))) Then Response.Write("SELECTED") : Response.Write("")%>>Nella Categoria</option>
</select></td>
<td><input name="Submit" type="submit" class="Stile3" value="Cerca"></td>
</tr>
<tr>
<td>&nbsp;</td>
<td>&nbsp;</td>
<td>&nbsp;</td>
<td>&nbsp;</td>
</tr>
</table>
</form> </td>
</tr>
</table>

<% If Not prodricer.EOF Or Not prodricer.BOF Then %>
<table width="575" border="0" class="Stile3">
<tr bgcolor="#CCCCCC">
<td>Nome</td>
<td width="350">Descrizione</td>
<td>&nbsp;</td>
<td>Prezzo</td>
</tr>
<tr>
<td>&nbsp;</td>
<td width="350">&nbsp;</td>
<td>&nbsp;</td>
<td>&nbsp;</td>
</tr>
<%
While ((Repeat1__numRows <> 0) AND (NOT prodricer.EOF))
%>

<%
' EFFETTUO MATERIALMENTE LA PAGINAZIONE
prodricer.PageSize = quanti
prodricer.AbsolutePage = pag

' ESEGUO IL CICLO
While prodricer.EOF = False And contatore < quanti
%>

<tr bgcolor="<%
If (Repeat1__numRows Mod 2) Then
Response.Write("#E0DFE3")
Else
Response.Write("#FFFFFF")
End IF
%>">

<td><div align="left"><a href="../Lista/default.asp?IDpr=<%=(prodricer.Fields.Item("ID").Value)%>&fcampo=Marca&fcosa=<%=(prodricer.Fields.Item("Marca").Value)%>&cosa=<%=Request.QueryString("cosa")%>&campo=<%=Request.QueryString("campo")%>"><strong><%=(prodricer.Fields.Item("Nome").Value)%></strong></a></div></td>

<td width="350"><div align="left"><%=mid((prodricer.Fields.Item("Descrizione").Value),1,50)%></div></td>

<td><%=(prodricer.Fields.Item("Marca"))%></td>

<td><div align="left"><%=formatcurrency((prodricer.Fields.Item("Prezzo").Value))%></div></td>

</tr>

<%
Repeat1__index=Repeat1__index+1
Repeat1__numRows=Repeat1__numRows-1
prodricer.MoveNext()
Wend
%>

</table><%
prodricer.MoveNext

' INCREMENTO IL VALORE DEL CONTATORE
contatore = contatore + 1
Wend
%>

<% End If ' end Not prodricer.EOF Or NOT prodricer.BOF %>

</div>
</body>
</html>

<%
prodricer.Close()
Set prodricer = Nothing
%>

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

<p align="center">
<%If pag > 1 Then%>
<a href="test.asp?pag=<%=pag-1%>">Indietro</a>
<%End If%>

<%
Dim x
x = 1
For x = 1 To prodricer.PageCount
If CInt(pag) <> x Then
%>
[<a href="test.asp?pag=<%=x%>"><%=x%></a>]
<%
Else
%>
[<a href="test.asp?pag=<%=x%>"><b><%=x%></b></a>]
<%
End If
Next
%>

<%If prodricer.EOF = False Then%>
<a href="test.asp?pag=<%=pag+1%>">Avanti</a>
<%End If%>
</p>


Confido nel vostro aiuto, l'errore è quì:
prodricer.AbsolutePage = pag

grazie.

ps lo script dell'ecomemerce è sempre su questo sito: DAVIDUCCIO ECOMMERCE
 

vatuss

Nuovo Utente
24 Giu 2009
20
0
1
Paolo69
forse sono sulla buona strada

Codice:
<%'@LANGUAGE="VBSCRIPT" CODEPAGE="1252"%>
<!--#include file="Connections/ecommerce.asp" -->
<%
    ' DEFINISCO LE VARIABILI CHE MI SERVONO PER L'APPLICAZIONE
    Dim sc, cn, rs, quanti, pag, contatore, MM_ecommerce_STRING
    
        ' DEFINISCO LA STRINGA DI CONNESSIONE
    'sc = ""
    'sc = sc & "driver={Microsoft Access Driver (*.mdb)};dbq="
    'sc = sc & Server.MapPath("database.mdb")
    
        ' IMPOSTO LA CONNESSIONE EDIL RECORDSET
    Set cn = Server.CreateObject("ADODB.Connection")
    ' Set rs = Server.CreateObject("ADODB.Recordset")
%>
<%
    ' APRO LA CONNESSIONE COL DATABASE
    cn.Open MM_ecommerce_STRING

    ' DEFINISCO IL NUMERO DI RECORD DA VISUALIZZARE PER OGNI PAGINA
    quanti = 5
    
        ' 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
%>
<%


Set prodricer = Server.CreateObject("ADODB.Recordset")
prodricer.ActiveConnection = MM_ecommerce_STRING
prodricer.Source = "SELECT * FROM Prodotti WHERE "&Request.QueryString("campo")&" LIKE '%" + Request.QueryString("cosa") + "%'"& cn, 1
prodricer.CursorType = 0
prodricer.CursorLocation = 2
prodricer.LockType = 1
prodricer.Open()

prodricer_numRows = 0
%>
<%


Repeat1__numRows = -1
Repeat1__index = 0
prodricer_numRows = prodricer_numRows + Repeat1__numRows
%>
<%
    ' APRO IL RECORDSET
    ' rs.Open "SELECT nome FROM utenti ORDER BY nome ASC", cn, 1
    ' EFFETTUO MATERIALMENTE LA PAGINAZIONE
    prodricer.PageSize = quanti
    prodricer.AbsolutePage = pag
    ' ESEGUO IL CICLO
    While prodricer.EOF = False And contatore < quanti
%>
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN" "http://www.w3.org/TR/html4/loose.dtd">
<html>
<head>
<title>E-commerce - Daviduccio.it</title>
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
<link href="../CSS/style.css" rel="stylesheet" type="text/css">
<script language="javascript">
function svuota() {
document.form1.cosa.value="";
}
</script>
</head>

<body>
<table width="0%" border="0">
  <tr>
    <td><div align="center" class="Stile1">
      <table width="560" border="0">
        <tr>
          <td height="19" bgcolor="#efefef"><div align="right" class="Stile3"><strong>Pagina di ricerca </strong></div></td>
        </tr>
        <tr>
          <td><p>&nbsp;</p>
              <form name="form1" method="get" action="">
                <table border="0" class="Stile3">
                  <tr>
                    <td>Cerca:</td>
                    <td><input name="cosa" type="text" class="Stile3" id="cosa" onFocus="svuota()" value="<%=Request.QueryString("cosa")%>" size="30"></td>
                    <td><select name="campo" class="Stile3" id="campo">
                        <option value="Nome" <%If (Not isNull(Request.QueryString("campo"))) Then If ("Nome" = CStr(Request.QueryString("campo"))) Then Response.Write("SELECTED") : Response.Write("")%>>Nel Nome</option>
                        <option value="Descrizione" <%If (Not isNull(Request.QueryString("campo"))) Then If ("Descrizione" = CStr(Request.QueryString("campo"))) Then Response.Write("SELECTED") : Response.Write("")%>>Nella Descrizione</option>
                        <option value="Marca" <%If (Not isNull(Request.QueryString("campo"))) Then If ("Marca" = CStr(Request.QueryString("campo"))) Then Response.Write("SELECTED") : Response.Write("")%>>Nella Marca</option>
                        <option value="Classe" <%If (Not isNull(Request.QueryString("campo"))) Then If ("Classe" = CStr(Request.QueryString("campo"))) Then Response.Write("SELECTED") : Response.Write("")%>>Nella Categoria</option>
                    </select></td>
                    <td><input name="Submit" type="submit" class="Stile3" value="Cerca"></td>
                  </tr>
                  <tr>
                    <td>&nbsp;</td>
                    <td>&nbsp;</td>
                    <td>&nbsp;</td>
                    <td>&nbsp;</td>
                  </tr>
                </table>
                <input name="az" type="hidden" id="az" value="ricerca">
              </form></td>
        </tr>
      </table>
      <% If Not prodricer.EOF Or Not prodricer.BOF Then %>
      <table width="575" border="0" class="Stile3">
        <tr bgcolor="#CCCCCC">
          <td>Nome</td>
          <td width="350">Descrizione</td>
          <td>Prezzo</td>
        </tr>
        <tr>
          <td>&nbsp;</td>
          <td width="350">&nbsp;</td>
          <td>&nbsp;</td>
        </tr>
        <%
While ((Repeat1__numRows <> 0) AND (NOT prodricer.EOF))
%>
        <tr bgcolor="<%
If (Repeat1__numRows Mod 2) Then
    Response.Write("#E0DFE3")
Else
    Response.Write("#FFFFFF")
End IF
%>">
          <td><div align="left"><a href="?az=prod&IDpr=<%=(prodricer.Fields.Item("ID").Value)%>&fcampo=Marca&fcosa=<%=(prodricer.Fields.Item("Marca").Value)%>&cosa=<%=Request.QueryString("cosa")%>&campo=<%=Request.QueryString("campo")%>"><strong><%=(prodricer.Fields.Item("Nome").Value)%></strong></a></div></td>
          <td width="350"><div align="left"><%
          des=(prodricer.Fields.Item("Descrizione").Value)
          if len(des) > 50 then
          response.Write(mid(des,1,50)&"...")
          else
          response.Write(des)
          end if%></div></td>
          <td><div align="left"><%=formatcurrency((prodricer.Fields.Item("Prezzo").Value))%></div></td>
        </tr>
        <%
  Repeat1__index=Repeat1__index+1
  Repeat1__numRows=Repeat1__numRows-1
  prodricer.MoveNext()
        ' INCREMENTO IL VALORE DEL CONTATORE
        contatore = contatore + 1

Wend
%>
      </table>
      <% End If ' end Not prodricer.EOF Or NOT prodricer.BOF %>
    </div></td>
  </tr>
</table>
</body>
</html>
<%
prodricer.Close()
Set prodricer = Nothing
%>
<%
    ' UN PO DI PULIZIA...
    'rs.Close
    'Set rs = Nothing
    cn.Close
    Set cn = Nothing
%>
<%
    Wend
%>

ho questo errore
Codice:
Errore di compilazione di Microsoft VBScript error '800a0401'

Prevista fine istruzione

/ricerca/search.asp, riga 36
prodricer.Source = "SELECT * FROM Prodotti WHERE "&Request.QueryString("campo")&" LIKE '%" + Request.QueryString("cosa") + "%'"& cn, 1
-----------------------------------------------------------------------------------------------------------------------------------^

poi dovrebbe andare bene, spero ...
 

vatuss

Nuovo Utente
24 Giu 2009
20
0
1
Due script presenti sullo stesso sito non possono non funzionare ... accidenti a me.
Sono stanchissimo ... e non ha cavato un tubo.
Forse devo cambiare script come mi hai consigliato ma non riesco a ricavare il codice.
Hai una soluzione Paolo69?
 

vatuss

Nuovo Utente
24 Giu 2009
20
0
1
Buongiorno forum,
allo scopo di sembrare troppo insistente sulla costruzione della pagina attraverso lo script presente sul vostro sito:

https://www.mrw.it/asp/paginazione-risultati-query-grandi-dimensioni_6803.html

ho proceduto, anche se non avevo dubbi, a riprodurre fedelmente l'esempio e tutto torna come un orologio svizzero.
A questo punto mi accingo a sostituire le porzioni di codice che hanno i miei input nel caso reale.

Riprendendo il codice dello script:
https://www.mrw.it/script/daviduccio-commerce_2931.html

nella cartella Ricerca si trova il file search.asp,nelle mie intenzioni la stessa cosa dovrò realizzarla per home.asp, modifico il codice come segue:

Codice:
<%'@LANGUAGE="VBSCRIPT" CODEPAGE="1252"%>
<!--#include file="Connections/ecommerce.asp" -->
<%
    ' DEFINISCO LE VARIABILI CHE MI SERVONO PER L'APPLICAZIONE
    Dim MM_ecommerce_STRING, cn, rs, quanti, pag, contatore
    ' DEFINISCO LA STRINGA DI CONNESSIONE
    ' sc = ""
    ' sc = sc & "driver={Microsoft Access Driver (*.mdb)};dbq="
    ' sc = sc & Server.MapPath("/mdb-database/shop/e-commerce.mdb")
    ' MM_ecommerce_STRING = "Driver={Microsoft Access Driver (*.mdb)};DBQ=" & Server.MapPath("/mdb-database/shop/E-commerce.mdb") ' la stringa è nell'include
    ' IMPOSTO LA CONNESSIONE EDIL RECORDSET
    Set cn = Server.CreateObject("ADODB.Connection")
    Set rs = Server.CreateObject("ADODB.Recordset")    ' nel mio caso prodricer? credo di si!
    ' APRO LA CONNESSIONE COL DATABASE
    cn.Open MM_ecommerce_STRING
    ' DEFINISCO IL NUMERO DI RECORD DA VISUALIZZARE PER OGNI PAGINA
    quanti = 5
    ' 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>
<table align="center" width="300" border="1">
<%
Set prodricer = Server.CreateObject("ADODB.Recordset")
prodricer.ActiveConnection = MM_ecommerce_STRING
prodricer.Source = "SELECT * FROM Prodotti WHERE "&Request.QueryString("campo")&" LIKE '%" + Request.QueryString("cosa") + "%'"
prodricer.CursorType = 0
prodricer.CursorLocation = 2
prodricer.LockType = 1
prodricer.Open()

prodricer_numRows = 0
%>
<%
Repeat1__numRows = -1
Repeat1__index = 0
prodricer_numRows = prodricer_numRows + Repeat1__numRows
%>
<%
    ' APRO IL RECORDSET
    ' rs.Open "SELECT * FROM Prodotti WHERE "&Request.QueryString("campo")&" LIKE '%" + Request.QueryString("cosa") + "%'"    ' prodricer è già aperto
    
    ' EFFETTUO MATERIALMENTE LA PAGINAZIONE
    prodricer.PageSize = quanti
    prodricer.AbsolutePage = pag
    ' ESEGUO IL CICLO
    While prodricer.EOF = False And contatore < quanti
%>
<script language="javascript">
function svuota() {
document.form1.cosa.value="";
}
</script>
<table width="0%" border="0">
  <tr>
    <td><div align="center" class="Stile1">
      <table width="560" border="0">
        <tr>
          <td height="19" bgcolor="#efefef"><div align="right" class="Stile3"><strong>Pagina di ricerca </strong></div></td>
        </tr>
        <tr>
          <td><p>&nbsp;</p>
              <form name="form1" method="get" action="">
                <table border="0" class="Stile3">
                  <tr>
                    <td>Cerca:</td>
                    <td><input name="cosa" type="text" class="Stile3" id="cosa" onFocus="svuota()" value="<%=Request.QueryString("cosa")%>" size="30"></td>
                    <td><select name="campo" class="Stile3" id="campo">
                        <option value="Nome" <%If (Not isNull(Request.QueryString("campo"))) Then If ("Nome" = CStr(Request.QueryString("campo"))) Then Response.Write("SELECTED") : Response.Write("")%>>Nel Nome</option>
                        <option value="Descrizione" <%If (Not isNull(Request.QueryString("campo"))) Then If ("Descrizione" = CStr(Request.QueryString("campo"))) Then Response.Write("SELECTED") : Response.Write("")%>>Nella Descrizione</option>
                        <option value="Marca" <%If (Not isNull(Request.QueryString("campo"))) Then If ("Marca" = CStr(Request.QueryString("campo"))) Then Response.Write("SELECTED") : Response.Write("")%>>Nella Marca</option>
                        <option value="Classe" <%If (Not isNull(Request.QueryString("campo"))) Then If ("Classe" = CStr(Request.QueryString("campo"))) Then Response.Write("SELECTED") : Response.Write("")%>>Nella Categoria</option>
                    </select></td>
                    <td><input name="Submit" type="submit" class="Stile3" value="Cerca"></td>
                  </tr>
                  <tr>
                    <td>&nbsp;</td>
                    <td>&nbsp;</td>
                    <td>&nbsp;</td>
                    <td>&nbsp;</td>
                  </tr>
                </table>
                <input name="az" type="hidden" id="az" value="ricerca">
              </form></td>
        </tr>
      </table>
      <% If Not prodricer.EOF Or Not prodricer.BOF Then %>
      <table width="575" border="0" class="Stile3">
        <tr bgcolor="#CCCCCC">
          <td>Nome</td>
          <td width="350">Descrizione</td>
          <td>Prezzo</td>
        </tr>
        <tr>
          <td>&nbsp;</td>
          <td width="350">&nbsp;</td>
          <td>&nbsp;</td>
        </tr>
        <%
While ((Repeat1__numRows <> 0) AND (NOT prodricer.EOF))
%>
        <tr bgcolor="<%
If (Repeat1__numRows Mod 2) Then
    Response.Write("#E0DFE3")
Else
    Response.Write("#FFFFFF")
End IF
%>">
          <td><div align="left"><a href="?az=prod&IDpr=<%=(prodricer.Fields.Item("ID").Value)%>&fcampo=Marca&fcosa=<%=(prodricer.Fields.Item("Marca").Value)%>&cosa=<%=Request.QueryString("cosa")%>&campo=<%=Request.QueryString("campo")%>"><strong><%=(prodricer.Fields.Item("Nome").Value)%></strong></a></div></td>
          <td width="350"><div align="left"><%
          des=(prodricer.Fields.Item("Descrizione").Value)
          if len(des) > 50 then
          response.Write(mid(des,1,50)&"...")
          else
          response.Write(des)
          end if%></div></td>
          <td><div align="left"><%=formatcurrency((prodricer.Fields.Item("Prezzo").Value))%></div></td>
        </tr>
        <%
  Repeat1__index=Repeat1__index+1
  Repeat1__numRows=Repeat1__numRows-1
  prodricer.MoveNext()
Wend
%>
      </table>
      <% End If ' end Not prodricer.EOF Or NOT prodricer.BOF %>
    </div></td>
  </tr>
</table>
<%
        rs.MoveNext
        ' INCREMENTO IL VALORE DEL CONTATORE
        contatore = contatore + 1
    Wend
%>
</table>
<p align="center">
<%If pag > 1 Then%>
    <a href="test.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="test.asp?pag=<%=x%>"><%=x%></a>]
<%
        Else
%>
            [<a href="test.asp?pag=<%=x%>"><b><%=x%></b></a>]
<%
        End If
    Next
%>
<%If rs.EOF = False Then%>
    <a href="test.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
%>
<%
prodricer.Close()
Set prodricer = Nothing
%>

lancio la pagina in localhost e questa è la risposta:

Codice:
ADODB.Recordset error '800a0cb3'
Il set di record corrente non supporta i segnalibri. Potrebbe trattarsi di una limitazione del provider o del tipo di cursore selezionato.
/ricerca/search.asp, riga 66


non riesco a comprendere l'errore.
Mi affido al vostro aiuto.
 
Discussioni simili
Autore Titolo Forum Risposte Data
Luca13 ASP Easy-News paginazione Classic ASP 2
S Paginazione di dati con ASP e MySQL Classic ASP 3
S paginazione di xml con asp/php XML 2
S integrare script per paginazione ad una pagina asp Classic ASP 11
T paginazione asp Classic ASP 4
felino ASP.net MVC: Exception e chiamata AJAX ASP.NET 1
W Rinominare Documenti Con Form Asp Classic ASP 9
G Registrazione utente su pagina asp Classic ASP 13
R Sviluppatore ASP.NET Offerte e Richieste di Lavoro e/o Collaborazione 0
seranto [ASP] Controllare il testo inserito in Textarea Classic ASP 6
F classic asp popolare combo box javascript Presentati al Forum 1
P Passagio dati complessi tra una ASP.NET webapi e Angular ASP.NET 1
A [ASP.Net] Gestire il profilo ADMIN in un progetto ASP NET e pattern MVC ASP.NET 0
P [ASP.Net] Problema ERR_INCOMPLETE_CHUNKED_ENCODING 206 (Partial Content) con Font ASP.NET 4
A [ASP] Confronto tra dati Form e DB Classic ASP 2
A Mantenere la validazione reindirizzandoci su un secondo sito WEb. (ASP.NET) ASP.NET 0
StephenSoftware [ASP.Net] Pagina Master ed eventi... ASP.NET 0
K [ASP] Visualizzare nome del file selezionato Classic ASP 3
S [ASP] rubrica telefonica Classic ASP 2
M MySQL e classic ASP Classic ASP 5
D [ASP] Eliminare gli zeri che nn servono Classic ASP 1
G [ASP] Ciclare i valori di 2 array Classic ASP 2
S [RISOLTO] aggiorna tabella da select option asp classic Classic ASP 7
S elimina record sql asp classic Classic ASP 5
D [ASP] Autocomplete cerca su 2 campi del db Classic ASP 1
D [ASP] Leggere Campo decimal MYSQL Classic ASP 1
S [ASP] SALVARE VALORE SELECT OPTION SU CAMPO TABELLA ACCESS Classic ASP 9
NuviaSoftware [Retribuito] [Cerco] Programmatore ambienti ASP.NET,. Net Azure web apps, Javascript Offerte e Richieste di Lavoro e/o Collaborazione 0
D [ASP] scaricare articoli Classic ASP 8
D [ASP] Mysql insert e update Classic ASP 2
V [ASP.Net] avento keydown crh13 enter ASP.NET 0
A [ASP.Net] Dropdownlist ASP.NET 0
S [ASP.Net] [ASP] Upload Image ASP.NET 6
V Ricevere messaggi email certificata con CDO o altro oggetto in ASP Classic ASP 0
A [ASP] query wish list Classic ASP 3
riminese77 [ASP.Net] Popup Bootstrap in datagrid ASP.NET 0
D [ASP] si può fare? Classic ASP 29
D [ASP] ordinamento query Classic ASP 2
M [ASP] Upload file da form controllo Classic ASP 5
S SQL, ACCESS & ASP CLASSIC - QUERY Classic ASP 3
G [ASP] Incrementare un valore on the fly su selezione select Classic ASP 3
K [ASP.Net] Realizzazione menu a tendina dipendenti ASP.NET 1
Tommy03 Aprire un file .asp nel browser Classic ASP 5
E [ASP.Net] Access 2016 ? Non si usa Microsoft Jet 4.0 ma Engine 2016 o 2010. Non va ! ASP.NET 2
D csrf : Cross Site Request Forgery in classic asp Classic ASP 0
D [ASP] Motore di ricerca interno su 2 tabelle Classic ASP 3
M [ASP.Net] [ASP] geoblocking e web.config ASP.NET 3
N Cerco sviluppatore ASP per aggiornamento sito e-commerce esistente Offerte e Richieste di Lavoro e/o Collaborazione 0
D prima prova con ASP... dove sbaglio? Classic ASP 13
L [ASP.Net] Realizzare modulo contatti PopUp ! ASP.NET 1

Discussioni simili