<%
Dim Conn
Set Conn=Server.CreateObject("ADODB.Connection")
Conn.Open "driver={Microsoft Access Driver (*.mdb)};dbq="& server.MapPath("db3.mdb")
%>

<%
Dim cod
cod=Request.Querystring("cod")
Dim SQL,Rec
SQL="SELECT * FROM SR WHERE id="&cod
Set rec= Server.CreateObject("ADODB.Recordset")
Set Rec= Conn.Execute(SQL)

CIAO2 = request.querystring("CIAO")

STATO= "CHIUSO"
SQL= "UPDATE SR set STATO='"&STATO&"' WHERE id="&cod
Conn.Execute(SQL)
Response.Redirect "APERTE_CHECK2.ASP?CIAO=request.querystring("CIAO")"

%>

il problema è nell'ultima riga ed esattamente :
Response.Redirect "APERTE_CHECK2.ASP?CIAO=request.querystring("CIAO")"

mille grazie