Sto diventando matto
Nella mia inesperienza penso di essere ad un passo dalla soluzione, ma non riesco a trovarla.
Ho modificato leggermente il codice. Penso che la chiave sia ottenere, ma non so come, da RS.movenext e RS.moveprevious l'id del record successivo e precedente, ma non funziona.
La mia domanda è: c'è un'istruzione che mi permette di ottenere da RS.movenext l'id del record successivo ?
Dimenticavo: la pagina si chiama display_photo.asp e richiama se stessa.



<%

id=Request("id")
cat=Request("cat")
dim url_DB
url_DB = "driver={Microsoft Access Driver (*.mdb)};dbq=" & server.mappath(percorsoDB)
dim Conn
Set Conn = Server.CreateObject("ADODB.Connection")
Conn.Open url_DB
Set RS = Server.CreateObject("ADODB.Recordset")
SQL = "SELECT * FROM Foto Where ID = " & id &" and categoria = '" & cat & "'"
RS.Open sql, Conn, adOpenStatic, adLockOptimistic


if not RS.eof then
pathFoto=percorsoPhoto&"Foto_"&Cstr(RS("id"))&".jp g"
Dim objFSO
Set objFSO=server.CreateObject("scripting.filesystemob ject")

id_succ=RS.movenext
id_prec=RS.moveprevious

%>
<table >
<tr>
<td>[img]<%=pathFoto%>[/img]</td>
</tr>
</table>
<table>
<tr>
<td ><div id="menuFoto">
[ < ]
[ > ]
</td>
</div>
</tr>
</table>



<%
set objFSO=nothing
end if
%>
</body>
</html>