ciclo update

[skylab]

qualcuno mi puo dire cosa ce di sbagliato nel mio codice:

<% 
Dim tot, id, tab
tot=request.querystring("tot")
tab=request.querystring("tab")
for i = 0 to tot
val=Request.Form("form"&i)
id=Request.Form("id"&i)

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

SQL="UPDATE " & tab & " set selezione='"& val &"' WHERE id="&id
Conn.Execute(SQL)
conn.Close
Set conn=Nothing

next
%>