Ciao, mi dite dove sbaglio? Thx.

Tipo di errore:
ADODB.Recordset (0x800A0BCD)
Il record corrente corrisponde all'inizio o alla fine del file oppure è stato eliminato. Per eseguire l'operazione richiesta è necessario disporre di un record corrente.
/serai/motore/ita/cerca/cerca_apricancelli.asp, line 40

Il codice completo:
<code>&lt;%@ Language=VBScript %&gt;

&lt;!--#include file="adovbs.inc"--&gt;
&lt;!--#include file="connessione.asp"--&gt;
&lt;html&gt;
&lt;head&gt;
&lt;!-- ASP Engine by Andrea Rinaldi --&gt;
&lt;title&gt;Serai&lt;/title&gt;
&lt;style&gt;A:link,A:visited {text-decoration:none}
A:hover {text-decoration:underline}
A:hover {color: #800000}
body{scrollbar-face-color : #000000 ;
scrollbar-shadow-color : #339966 ;
scrollbar-highlight-color : #000000 ;
scrollbar-3dlight-color : #339966 ;
scrollbar-darkshadow-color : #000000 ;
scrollbar-track-color : #599d03 ;
scrollbar-arrow-color : #ffffff;}
&lt;/style&gt;
&lt;/head&gt;
&lt;body aLink="#000000" Link="#000000" vLink="#000000" leftMargin="0" topMargin="0"&gt;
&lt;font face="verdana" size="2"&gt;

&lt;%
dim cerca
cerca = trim (Request.QueryString("cerca_apricancelli"))
RecordsPerPagina=5
page=request("page")
if page=""then page=1
dim sql

sql="SELECT nomeITA,immagine,sigla,codice,descrizioneITA,paginaITA,pdfITA FROM prodotti WHERE id_divisione=1 AND (nomeITA LIKE '"&cerca&"%') ORDER BY nomeITA"

dim objRS
set objRS=Server.CreateObject("ADODB.Recordset")
'set objRS=objConn.Execute(sql)
objRS.Open sql,objConn,1,3
'paginazione
objRS.PageSize = RecordsPerPagina
objRS.AbsolutePage=page
'records attivi
TotalRecords=objRS.RecordCount
if TotalRecords=0 then
%&gt;
&lt;table width=100%&gt;&lt;tr&gt;&lt;td&gt;&lt;font face="verdana" size="2"&gt;Risultati della ricerca nella Divisione &lt;a href="../../../ita/apricancelli.htm"&gt;&lt;b&gt;Apricancelli&lt;/b&gt;&lt;/a&gt;&lt;/td&gt;
&lt;td align=right&gt;&lt;font face="verdana" size="2"&gt;&lt;a href="../../../ita/prodotti.htm"&gt;Altra ricerca&lt;/a&gt;&lt;/td&gt;&lt;/tr&gt;
&lt;tr&gt;&lt;td colspan=2&gt;&lt;br&gt;&lt;br&gt;&lt;br&gt;&lt;center&gt;&lt;font face="verdana" size="2"&gt;Nessun risultato trovato.&lt;/td&gt;&lt;/tr&gt;&lt;/table&gt;
&lt;%
else

for i=1 to RecordsPerPagina
if not objRS.EOF then
%&gt;
&lt;table width=100%&gt;&lt;tr&gt;&lt;td&gt;&lt;font face="verdana" size="2"&gt;Risultati della ricerca nella Divisione &lt;a href="../../../ita/apricancelli.htm"&gt;&lt;b&gt;Apricancelli&lt;/b&gt;&lt;/a&gt;&lt;/td&gt;
&lt;td align=right&gt;&lt;font face="verdana" size="2"&gt;&lt;a href="../../../ita/prodotti.htm"&gt;Altra ricerca&lt;/a&gt;&lt;/td&gt;&lt;/tr&gt;
&lt;tr&gt;&lt;td&gt;&lt;font face="verdana" size="2"&gt;Prodotti trovati: &lt;%=TotalRecords%&gt;&lt;/td&gt;&lt;/tr&gt;&lt;/table&gt;&lt;br&gt;&lt;br&gt;
&lt;%
Response.Write "&lt;table align=center bordercolor=#599d03 width=600&gt;&lt;tr&gt;&lt;td valign=top&gt;&lt;img src='../../../aggiornamenti/immagini/" & objRS("immagine") & "'&gt;&lt;/td&gt;&lt;td valign=top colspan=2&gt;&lt;b&gt;&lt;font face=verdana size=4&gt;" & objRS("nomeITA") & "&lt;/font&gt;&lt;/b&gt; "
Response.Write "&lt;font face=verdana size=2&gt;" & objRS("sigla") & " "
Response.Write objRS("codice") & "&lt;br&gt;"
Response.Write objRS("descrizioneITA") & "&lt;/td&gt;&lt;/tr&gt;"
Response.Write "&lt;tr&gt;&lt;td&gt;&lt;font face=verdana size=2&gt;&lt;a href='../../../aggiornamenti/pagine/ita/" & objRS("paginaITA") & "'target=_blank&gt;"&objRS("visuale_pag")&"&lt;/a&gt;&lt;/font&gt;&lt;/td&gt;"
Response.Write "&lt;td align=right&gt;&lt;font face=verdana size=2&gt;&lt;a href='../../../aggiornamenti/pdf/ita/" & objRS("pdfITA") & "'target=_blank&gt;"&objRS("visuale_pdf")&"&lt;/a&gt;&lt;/font&gt;&lt;/td&gt;&lt;/tr&gt;&lt;/table&gt;&lt;br&gt;&lt;br&gt;"

objRS.MoveNext
end if
next
end if

if TotalRecords &gt;0 then
response.write "&lt;p&gt;&lt;b&gt;Pagine:&lt;/b&gt; "
for p=1 to objRS.PageCount
if p &lt;&gt; CInt(Page) then
response.write "&lt;a href='cerca_apricancelli?page=" & p
response.write "&" & Server.UrlEncode(cerca)
response.write "'&gt;"
else
'pagina attuale
response.write "&lt;b&gt;"
end if
response.write p
if p &lt;&gt; CInt(page) then
response.write "&lt;/a&gt; "
else
response.write "&lt;/b&gt; "
end if
next
response.write "&lt;/p&gt;"
end if

objRS.Close
set objRS=nothing

objConn.Close
set objConn=nothing
%&gt;
&lt;/font&gt;
&lt;/body&gt;
&lt;/html&gt;
</code>



Andrea Rinaldi
Webmaster Zeder Network & Advertising
http://www.zeder.it
webmaster@zeder.it

Niente da fare, mi da la pagina bianca senza stampare niente.

Andrea Rinaldi
Webmaster Zeder Network & Advertising
http://www.zeder.it
webmaster@zeder.it

si, credo anche io che il problema sia nella query SQL.

<hr color="#31659C" noshade size=1>
Daniele Bochicchio
<b>Content manager di http://www.aspitalia.com</b>

ASP 3 per esempi il mio libro

Ho parlato troppo presto, finché ci sono dati nel database tutto ok, ma quando non ce ne sono, mi da sempre il solito errore...
Per determinare i record vuoti non è questa istruzione???
<code>
if totalrecords=0 then
%&gt;
&lt;font face="verdana" size="2"&gt;
&lt;table width=100%&gt;&lt;tr&gt;&lt;td&gt;&lt;font face="verdana" size="2"&gt;Risultati della ricerca nella Divisione &lt;a href="../../../ita/elettrotecnica.htm"&gt;&lt;b&gt;Elettrotecnica&lt;/b&gt;&lt;/a&gt;&lt;/td&gt;
&lt;td align=right&gt;&lt;font face="verdana" size="2"&gt;&lt;a href="../../../ita/prodotti.htm"&gt;Altra ricerca&lt;/a&gt;&lt;/td&gt;&lt;/tr&gt;
&lt;tr&gt;&lt;td&gt;&lt;font face="verdana" size="2"&gt;Nessun prodotto trovato&lt;/font&gt;&lt;/td&gt;&lt;/tr&gt;&lt;/table&gt;&lt;br&gt;&lt;br&gt;
&lt;%
else
%&gt;
&lt;font face="verdana" size="2"&gt;
&lt;table width=100%&gt;&lt;tr&gt;&lt;td&gt;&lt;font face="verdana" size="2"&gt;Risultati della ricerca nella Divisione &lt;a href="../../../ita/elettrotecnica.htm"&gt;&lt;b&gt;Elettrotecnica&lt;/b&gt;&lt;/a&gt;&lt;/td&gt;
&lt;td align=right&gt;&lt;font face="verdana" size="2"&gt;&lt;a href="../../../ita/prodotti.htm"&gt;Altra ricerca&lt;/a&gt;&lt;/td&gt;&lt;/tr&gt;
&lt;tr&gt;&lt;td&gt;&lt;font face="verdana" size="2"&gt;Prodotti trovati: &lt;%=totalrecords%&gt;&lt;/font&gt;&lt;/td&gt;&lt;/tr&gt;&lt;/table&gt;&lt;br&gt;&lt;br&gt;
</code>

Se non ce ne sono esegue il primo blocco, altrimenti esegue il secondo, o no?
Help me, plz.

Andrea Rinaldi
Webmaster Zeder Network & Advertising
http://www.zeder.it
webmaster@zeder.it