se scrivi Set RsProd = Server.CreateObject("ADODB.Recordset")
SqlRsProd = "SELECT * FROM AnaProd"
RsProd.Open SqlRsProd, Connect, adOpenStatic, adLockOptimistic

RsProd.AddNew

RsProd("CodicePro") = Request.Form("Prodotto")

RsProd.Update

response.write "|" & RsProd("id") & "|"
cosa ti restituisce ?