skrives lidt om

<%
Set Conn = Server.CreateObject("ADODB.Connection")
DSN = "DRIVER={Microsoft Access Driver (*.mdb)}; "
DSN = DSN & "DBQ=" & Server.MapPath("db.mdb")
Conn.Open DSN

For Each Id in Request.Form("id")

If Request.Form("slet"& id) = "slet" Then

    strSQL = "Delete * from barometer WHERE id ="& id

Else

strSQL = "Update barometer SET " _
& "billede = '" & Request.Form("billede" & Id) & "', "_
& "alder = " & Request.Form("alder" & Id) & ", "_
& "klasse = '" & Request.Form("klasse" & Id) & "', "_
& "patter = " & Request.Form("patter" & Id) & ", "_
& "roev = " & Request.Form("roev" & Id) & ", "_
& "krop = " & Request.Form("krop" & Id) & ", "_
& "cme = " & Request.Form("cme" & Id) & ", "_
& "aksp = '" & Request.Form("aksp" & Id) & "', "_
& "kommentar = '" & Request.Form("kommentar" & Id) & "' "_
& "WHERE id = " & Id

End If

Conn.execute(strSQL)
'Response.Write(strSQL)&"<br>"

Next

Conn.Close
Set Conn = Nothing
response.redirect("default1.asp")
%>
<html>

<head>
<title></title>
</head>

<body>
</body>
</html>

Hvordan kan man få denne her til at opdatere et felt (sidst) med den der er logget ind