fejl i update

får fejl når jeg vil ændre level, og det er i
Conn.Execute(strSQL) hvorfor

<%
if session("bruger") = "" then
Response.Write "Du er ikke logget ind <a href='login.asp'>Log ind</a>"
end if
Set Conn = Server.CreateObject("ADODB.Connection")
DSN = "DRIVER={Microsoft Access Driver (*.mdb)}; "
DSN = DSN & "DBQ=" & Server.MapPath("System.mdb")
Conn.Open DSN
if Request.QueryString("ret") = "profil" then
strSQL = "Select * From Brugere Where Bruger = '" & session("bruger") & "'"
set rs = Conn.Execute(strSQL)

Kon = rs("Kon")
Oprettet = rs("Oprettet")
Profil = rs("Profil")
By = rs("Bynavn")

if Request.QueryString("ret") = "profil" AND Request.QueryString("confirm") = "profil" then
strSQL = "Update Brugere set "
strSQL = strSQL & "Profil= '" & Request.Form("profil") & "' "
strSQL = strSQL & " Where Bruger = '" & session("bruger") & "'"
Conn.Execute (strSQL)
end if


%>
<form method="post" action="ret.asp?ret=profil&confirm=profil">
  <b>Facts:</b><br>
<%
Response.Write "Køn: " & Kon & "<br>"
Response.Write "Oprettet: " & Oprettet & "<br>"
Response.Write "Du bor i: " & By & "<br>"
%> 
<p>
    <textarea rows="5" cols="50" name="profil"><%Response.Write Profil%></textarea>
    <br>
    <input type="submit" value="opdater">
    <input type="reset" value="slet det tilføjede">
  </p>
</form>
<%
end if
%>


<%
if Request.QueryString("ret") = "level" then
if Not cint(session("level")) = 10 then
response.write "Du er ikke berettiged til at se denne side <a href=java script:history.go(-1)>Tilbage</a>"
else
strSQL = "Select * From Brugere Where Bruger = '" & Request.Form("bruger") & "'"
set rs = Conn.Execute(strSQL)
if Request.QueryString("ret") = "level" AND Request.QueryString("confirm") = "level" then

strSQL = "Update Brugere set "
strSQL = strSQL & "Level= '" & Request.Form("level") & "' "
strSQL = strSQL & " Where Ucase(Bruger)= '" & Ucase(Request.Form("bruger")) & "'"
Conn.Execute(strSQL)
end if
%>
<form method="post" action="ret.asp?ret=level&confirm=level">
<input type="text" name="bruger">
<input type="text" name="level">
<input type="submit" value="Ændre level">
</form>
<%
end if
end if
if Request.QueryString("confirm") = "level" then
Response.Write rs("bruger") & "'s level ændret til " & rs("level")
end if
Conn.Close
set conn = nothing
%>