scusa non ho capito 
per recupero intendi questo:
codice:
cp = Request.form("cp") &"
"
uoat = Request.querystring("uoat")
response.write cp
response.write uoat
Dim strDenominazione
strDenominazione = Replace(Request("cp"), "_", " ")
Dim ConnDown
Set ConnDown=Server.CreateObject("ADODB.Connection")
ConnDown.Open "driver={Microsoft Access Driver (*.mdb)};dbq="& server.MapPath(path&"upload.mdb")
Dim SQLDown,RECDown
if cp = "TUTTE" then
SQLDown = "select * from analisi"
Set RECDown = ConnDown.Execute(SQLDown)
else
SQLDown="SELECT * FROM analisi WHERE uoat = '"&uoat&"' and stato = '"&cp&"' order by ID asc"
Set RECDown=ConnDown.Execute(SQLDown)