non ho risolto il problema!!!!

premetto che nel frame 3
ho il collegamento alla pagina asp

loadVariablesNum ("prova.asp", 0, "Post");

ecco il codice asp



<%
Dim objConn
Set objConn = Server.CreateObject("ADODB.Connection")

' connessione a database Access
objConn.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source="& server.MapPath("/mdb-database/prova.mdb")
' "Driver={Microsoft Access Driver (*.mdb)};dbq=" & server.mappath("/mdb-database/prova.mdb")

dim Param
Param = request.queryString("Param")

dim muovi
muovi = request.queryString("muovi")

objConn.open

Dim objRS, strSQL

set objRS = Server.CreateObject("ADODB.Recordset")

Dim operazione
Dim stringa

if Param <> "" then
if muovi="successivo" then
stringa = " where AD_ID > " + Param + " order by AD_ID ASC"
else
stringa = " where AD_ID < " + Param + " order by AD_ID DESC"
end if
else
stringa = " order by AD_ID DESC "
end if

strSQL = "select * from PROVA " + stringa + ";"

objRS.open strSQL, objConn, 3, 3

Dim Totale
Totale = objRS.RecordCount



dim AD_ID
AD_ID = objRS("AD_ID")

dim DATA
DATA = objRS("DATA")

dim TITOLO
TITOLO = objRS("TITOLO")


Response.Write ("AD_ID=" & AD_ID & "
")

Response.write("&AD_ID=" & AD_ID & "&DATA=" & DATA & "&TITOLO=" & TITOLO)


if Totale = 1 and muovi="precedente" then
end if

Response.Write (" ")

if (Totale = 1 and muovi="successivo") or muovi="" then
end if



objRS.close
set objRS = nothing

objConn.close
set objConn = nothing
%>