Ciao a tutti dopo anni e anni di assenza da questo forum e dal linguaggio ASP vorrei riprendere un mio vecchio sito funzionante e aggiornarlo con una funzione: da una pagina dinamica di risultati proveniente da un motore di ricerca vorrei che l'utente potesse muoversi avanti/indietro, magari tramite frecce o link, ai record precedenti o successivi. Purtroppo ho perso totalmente dimestichezza con ASP e non so da dove cominciare. Qualcuno ha degli esempi/script modificabili già pronti all'occorrenza ? Ecco la pagina: http://editorialecorno.somee.com/txt/doc.asp?id=1

Posto il codice editabile della pagina in cui andrebbe implementata la funzione. Ciao e grazie

codice:
 <%
id=request.querystring("id")
sql="select * from corno where id =" & id
Set OBJdbConnection=Server.CreateObject("ADODB.Connection")
OBJdbConnection.open"driver={Microsoft Access Driver (*.mdb)};dbq="&server.mapPath("../database/corno.mdb")
Set Rs=OBJdbConnection.Execute(sql)
id=rs("id")
titolo=rs("titolo")
editore=rs("editore")
formato=rs("formato")
serie=rs("serie")
note=rs("note")
data=rs("data")
numero= rs("Numero")
condizioni=rs("condizioni")
%>
<title>ASCM - <%=categoria%> - <%=data%></title>
<p>
  <style type="text/css">
<!--
body {
    font-family: "Century Gothic";
    color: #000000;
}
.Stile5 {
    font-size: 13px;
    font-weight: bold;
}
.Stile7 {font-size: 13px}
.Stile8 {font-family: "Book Antiqua"}
.Stile9 {color: #000000; font-size: 13px; font-family: "Book Antiqua"; }
.Stile10 {
    font-weight: bold;
    font-family: "Book Antiqua";
}
.Stile11 {color: #000000; font-size: 13px; font-family: "Book Antiqua"; font-weight: bold; }
-->
</style>
  <script language="JavaScript" type="text/JavaScript">
<!--
function MM_reloadPage(init) {  //reloads the window if Nav4 resized
  if (init==true) with (navigator) {if ((appName=="Netscape")&&(parseInt(appVersion)==4)) {
    document.MM_pgW=innerWidth; document.MM_pgH=innerHeight; onresize=MM_reloadPage; }}
  else if (innerWidth!=document.MM_pgW || innerHeight!=document.MM_pgH) location.reload();
}
MM_reloadPage(true);
//-->
</script></p>
<table "width="643" height="176" align="center"  cellpadding="0" cellspacing="0" background="../img/edc.jpg" ="#AACCFF">
  <tr>
        <td  height="26"  valign="middle"  ="#C7F1F1"><div align="justify" class="testpaginacaratytere"><span class="colonna_info_tab_doc"><span class="dettagli_Albo_doc_corno"><strong>Editore:</strong></span></span></div></td>
        <td height="26"  valign="middle" class="dettagli_Albo_doc_corno" ="#C7F1F1"><span class="colonna_info_tab_doc"><span class="dettagli_Albo_doc_corno"><%=editore%></span></span></td>
  </tr>
  
  <tr>
    <td height="12"  valign="middle"  ="cccccc"><div align="left"><span class="colonna_info_tab_doc"><span class="dettagli_Albo_doc_corno"><strong>Serie:</strong></span></span></span></div></td>
    <td height="12"  valign="middle" class="dettagli_Albo_doc_corno" ="cccccc"><span class="colonna_info_tab_doc"><span class="dettagli_Albo_doc_corno"><%=serie%></span></span></td>
  </tr>
  <tr>
    <td height="13"  valign="middle"  ="cccccc"><span class="colonna_info_tab_doc"><span class="dettagli_Albo_doc_corno"><strong>N°</strong></span></span></td>
    <td height="13"  valign="middle" class="dettagli_Albo_doc_corno" ="cccccc"><span class="colonna_info_tab_doc"><span class="dettagli_Albo_doc_corno"><%=Numero%></span></span></td>
  </tr>
     <tr>
       <td width="134" height="12"  valign="middle"  ="#CCCCCC"><div align="justify" class="Stile16"><span class="colonna_info_tab_doc"><span class="dettagli_Albo_doc_corno"><strong>Titolo</strong></span></span></div></td>
       <td width="507"  valign="middle" class="dettagli_Albo_doc_corno" ="#CCCCCC"><span class="colonna_info_tab_doc"><span class="dettagli_Albo_doc_corno"><%=titolo%></span></span></td>
     </tr>   
     <tr>
       <td height="12"  valign="middle"  ="#CCCCCC"><span class="colonna_info_tab_doc"><span class="dettagli_Albo_doc_corno"><strong>Data</strong></span></span></td>
       <td height="12"  valign="middle" class="dettagli_Albo_doc_corno" ="#CCCCCC"><span class="colonna_info_tab_doc"><span class="dettagli_Albo_doc_corno"><%=data%></span></span></td>
     </tr>
  <tr>
    <td height="27"  valign="middle"  ="#C7F1F1"><div align="justify" class="Stile16"><span class="colonna_info_tab_doc"><span class="dettagli_Albo_doc_corno"><strong>Formato</strong> </span></span></div></td>
    <td height="27"  valign="middle" class="dettagli_Albo_doc_corno" ="#C7F1F1"><span class="colonna_info_tab_doc"><span class="dettagli_Albo_doc_corno"><%=formato%></span></span></td>
  </tr>
  <tr ="cccccc">
    <td height="12"  valign="middle" ><div align="justify" class="Stile16"><span class="colonna_info_tab_doc"><span class="dettagli_Albo_doc_corno"><strong>Condizioni</strong></span></span></div></td>
    <td height="12"  valign="middle" class="dettagli_Albo_doc_corno"><span class="colonna_info_tab_doc"><span class="dettagli_Albo_doc_corno"><%=condizioni%></span></span></td>
  </tr>
  <tr ="cccccc">
    <td height="13"  valign="middle" ><span class="colonna_info_tab_doc"><span class="dettagli_Albo_doc_corno"><strong>Note</strong></span></span></td>
    <td height="13"  valign="middle" class="dettagli_Albo_doc_corno"><span class="colonna_info_tab_doc"><span class="dettagli_Albo_doc_corno"><%=note%></span></span></td>
  </tr>
  <tr class="align_left_tab_doc" ="#C7F1F1">
    <td height="27" colspan="2" align="center"  valign="middle" class="img_doc_corno_DX"><p>&nbsp;</p>
      <p>&nbsp;</p>
      <p><img src="http://imgcorno.altervista.org/cop/<%=rs("img")%>" alt="immagine" border="1" /></p>      </p></td>
  </tr>
</table>
<p>


<%
sql="select * from corno where id =" & id
Set OBJdbConnection=Server.CreateObject("ADODB.Connection")
OBJdbConnection.open"driver={Microsoft Access Driver (*.mdb)};dbq="&server.mapPath("../database/corno.mdb")


do while not(rs.eof)
‘operazioni sul record corrente


‘Verifica di una condizione particolare
if mia_condizione = mio_valore then
   ‘ Torno al primo record
   rs.movefirst
else
   ‘Avanzamento al record successivo
   rs.movenext
end if
loop


%>
</p>