Modificare un singolo elemento di un record

[Macosx]

Id = request("id")
Stato = Replace(request("Stato"),"'", "''")

StrConnessione = "DRIVER={Microsoft Access Driver (*.mdb)};DBQ=" & server.MapPath("/mdb-database") & "\xxx.mdb;pwd=xxx"

Set Conn = Server.CreateObject("ADODB.Connection")

Conn.Open StrConnessione

SQL = "Update Corsi set Stato='"& Stato &"' where ID=" & Id 'togli gli apici se è un campo numerico

Conn.execute (SQL) 'devi usare le parentesi
Conn.Close
set Conn=nothing
%>