cosa c'è di sbagliato? non mi da nessun errore però e come se i link alla pagina successiva non funzinassi perchè appena mi collego alla pagina già vengono visualizzate il numero delle pagine (senza nessun risultato della ricerca visualizzato), poi appena effettuo la ricerca il link mi riporta alla pagina vuota. Spero di essermi spiegato se no: http://www.zerorecordstore.it/libri/index.asp

<% response.buffer=true %>
<% Server.ScriptTimeout = 300 %>


<%
iPageSize = 3 'NUMERO RECORD PER PAGINA

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

strSQL = "SELECT * FROM libri ORDER BY autori ASC"
Set objRS = Server.CreateObject("ADODB.Recordset")
objRS.PageSize = iPageSize
objRS.CacheSize = iPageSize
objRS.Open strSQL, objConn, adOpenStatic, adLockReadOnly, adCmdText

reccount = objRS.recordcount
iPageCount = objRS.PageCount

If iPageCurrent > iPageCount Then iPageCurrent = iPageCount
If iPageCurrent < 1 Then iPageCurrent = 1

If iPageCount = 0 Then
Response.Write "

<table><td><font face='verdana' size='2' color='#000000'>Non sono stati trovati giocatori.</td></table></p>"
Else
objRS.AbsolutePage = iPageCurrent
iRecordsShown = 0
%>
<%

Autori = trim(request.form("Autori"))
Autori = replace(Autori, "'", "''")
Titolo = trim(request.form("Titolo"))
Titolo = replace(Titolo, "'", "''")



dbconn = "DRIVER={Microsoft Access Driver (*.mdb)};DBQ=" & Server.MapPath("/mdb-database/Libri.mdb")
Set conn=Server.CreateObject ("ADODB.Connection")
conn.open dbConn


Set rstTitolo=Server.CreateObject ("ADODB.Recordset")
Sql = "Select * from Libri"
if Titolo<>"" or Autori<>"" then
sql=sql& " where "
end if

if Autori<>"" then
sql=sql& "Autori like '%" & Autori & "%'"
end if

if Autori<>"" and Titolo<>"" then
sql=sql & " and "
end if

if Titolo<>"" then
sql=sql& "Titolo like '%" & Titolo & "%'"
end if

rstTitolo.Open sql,conn,3,3
totrecord = rstTitolo.recordcount



%>
<div align="center">
<center>
<table border="0" cellpadding="0" cellspacing="0" style="border-collapse: collapse" bordercolor="#111111" width="399" id="AutoNumber3" height="205">
<tr>
<td width="455" height="34" bgcolor="#000080" align="center">
<table border="0" cellpadding="0" cellspacing="0" style="border-collapse: collapse" bordercolor="#111111" width="119%">
<tr>
<td width="100%">
<p align="center"><font face="Arial" color="#FFFFFF">Biblioteca
dell'Istituto</font></td>
</tr>
</table>
</td>
</tr>
<tr>
<td width="455" height="19" align="center">
<table border="0" cellpadding="0" cellspacing="0" style="border-collapse: collapse" bordercolor="#111111" width="127%">
<tr>
<td width="100%">
<p align="center"><font face="Verdana" style="font-size: 3pt">

</font><font face="Verdana" size="2" color="#000080">Controlla se nella
nostra biblioteca c'è il libro che ti serve!

per l'elenco completo
<a target="_self" href="admin/elenco%20completo.asp"><font color="#FFFFFF">
clic qui</font></a>

</font><font face="Verdana" size="1">[i]La ricerca va effettuata per
nome dell'autore, per titolo dell'opera

(o parte del titolo) o per entrambi.
(maiuscole e minuscole sono indifferenti)</td>
</tr>
</table>
</td>
</tr>
<tr>
<td width="455" height="152" align="center">
<div align="center">
<center>
<table border="0" cellpadding="0" cellspacing="0" style="border-collapse: collapse" bordercolor="#111111" width="510" id="AutoNumber4">
<tr>
<td width="542">
<form method="POST" action="index.asp" language="JavaScript" name="FrontPage_Form1">
<table border="0" cellpadding="0" cellspacing="0" style="border-collapse: collapse" bordercolor="#111111" width="542" id="AutoNumber1">
<tr>
<td width="209">
<p align="right"><font face="Verdana" size="1" color="#000080">Nome Autore</font></td>
<td width="333">
<input type="text" name="Autori" size="20" value="<%=Autori%>" class="formstyle" style="border: 1px solid #000080; "></td>
</tr>

<tr>
<td width="209">
<p align="right"><font face="Verdana" size="1" color="#000080">Titolo</font></td>
<td width="333">
<input name="Titolo" size="20" value="<%=Titolo%>" class="formstyle" style="border: 1px solid #000080; "><input type="submit" value="Cerca >>" name="cercaAutori" class="formstyle" style="border: 1px solid #808080; background-color: #000080; color:#FFFFFF; font-family:verdana; height:20"></td>
</tr>

</table>
</form>


<hr color="#000080">


<div align="center">
<center>
<%if Autori <> "" or Titolo<>"" then%>
<table border="1" cellspacing="0" style="border-collapse: collapse" width="101%" id="AutoNumber2" align="left" cellpadding="2" bgcolor="#000080" bordercolor="#C0C0C0">
<tr>
<td width="10%" align="left" style="border-style:solid; border-width:1; background-color: #000080; " bordercolor="#C0C0C0">


<font face="Verdana" size="1" color="#FFFFFF">Autore</font></td>
<td width="22%" align="center" style="border-style:solid; border-width:1; background-color: #000080; " bordercolor="#C0C0C0">


<font face="Verdana" size="1" color="#FFFFFF">Titolo</font></td>
<td width="3%" align="center" style="border-style:solid; border-width:1; background-color: #000080; " bordercolor="#C0C0C0">


<font face="Verdana" size="1" color="#FFFFFF">Casa Editrice</font></td>
<td width="4%" align="center" style="border-style:solid; border-width:1; background-color: #000080; " bordercolor="#C0C0C0">


<font face="Verdana" size="1" color="#FFFFFF">Anno</font></td>
<td width="10%" align="center" style="border-style:solid; border-width:1; background-color: #000080; " bordercolor="#C0C0C0">


<font face="Verdana" size="1" color="#FFFFFF">Prezzo</font></td>
<td width="64%" align="center" style="border-style:solid; border-width:1; background-color: #000080; " bordercolor="#C0C0C0">


<font face="Verdana" size="1" color="#FFFFFF">Disponibilità</font></td>
</tr>


<%
'SI VISUALIZZA IL CONTENUTO DELLA STRINGA SQL
'ALL'INTERNO DELLA TABELLA PRIMA DEFINITA
cont=1
Do While iRecordsShown < iPageSize And Not objRS.EOF
Dim Rig, bg
Rig = Rig + 1
If Rig Mod 2 = 0 then
bg = "#FFFFFF"
Else
bg = "#ccccff"
End if
Response.Write "<tr bgcolor = " & bg & "><td bordercolor='#000080'><font size='1' face='Verdana'>" & (iPageSize*iPageCurrent)-iPageSize+Cont & "</font></td>"
Response.Write "<td bordercolor='#000080'><font size='1' face='Verdana'>" & objRS("Autori") & rstTitolo("Autori") &"</font></td>"
Response.Write "<td bordercolor='#000080'><font size='1' face='Verdana'>" & objRS("Titolo") & rstTitolo("Titolo") &"</font></td>"
Response.Write "<td bordercolor='#000080'><font size='1' face='Verdana'>" & objRS("CasaEditrice") & rstTitolo("CasaEditrice") &"</font></td>"
Response.Write "<td bordercolor='#000080'><font size='1' face='Verdana'>" & objRS("Anno") & rstTitolo("Anno") &"</font></td>"
Response.Write "<td bordercolor='#000080'><font size='1' face='Verdana'>" & objRS("Prezzo") & rstTitolo("Prezzo") &"</font></td>"
Cont = Cont + 1
'POSIZIONAMENTO ALLA RIGA SUCCESSIVA DEL DB
iRecordsShown = iRecordsShown + 1
objRS.MoveNext
Loop
'PULIZIA DEGLI OGGETTI ADO
objRS.Close
Set objRS = Nothing
%>
</table>
<%End if%>



<%If ipagecount <> 1 Then%>
<%Do while not rstTitolo.EOF%> <%
rstTitolo.movenext
loop
%>

</center>
</div>
</td>
</tr>
</table>
</center>
</div>
</td>
</tr>
</table>
</center>
</div>
<table>
<tr valign="middle">
<td width="50%" align="center" valign="middle"><font face="verdana" size="1" color="#000000">
[
<%if iPageCurrent-2 > 0 and iPageCurrent > 2 then%>
[img]/paginazione/images/first.gif[/img]
<%end if%>
<%if iPageCurrent > 1 then%>
[img]/paginazione/images/pre.gif[/img]
<%end if%>
<%if iPageCount > 2 then
if iPageCurrent-2 < 1 then da_pag = 1 else da_pag = iPageCurrent-2
if iPageCurrent+2 > iPageCount then fino_a_pag = iPageCount else fino_a_pag = iPageCurrent+2
else
da_pag = 1
fino_a_pag = iPageCount
end if%>
<%for i = da_pag to fino_a_pag%>
<%if i = iPageCurrent then%>
<font color="red"><%=i%></font>
<%else%>
<%=i%>
<%end if%>
<%next%>
<%if iPageCurrent > 0 and iPageCurrent < iPageCount then%>
[img]/paginazione/images/next.gif[/img]
<%end if%>
<%if iPageCurrent+1 < iPageCount then%>
[img]/paginazione/images/last.gif[/img]
<%end if%>
]
</font></td>
</tr>
<tr>
<td colspan="2" align="center"><font face="verdana" size="1" color="#000000">
<center>
Pagina
<font color="#FF0000"><%=iPageCurrent%></font>
di
<font color="#FF0000"><%=iPageCount%></font>
</center>
</font></td>
</tr>
</table>
</center>
<%end if%>
<%
objConn.Close
Set objConn = Nothing
rstTitolo.close
end if
set rstTitolo = Nothing%>
</TD>
</TR>
</TABLE>
</body>
</html>