fejl

kan ikke finde den:
elseif Request.QueryString("mode") = "gem" Then
response.write "mmm"
strKlar = "ja"
If Request.form("baadtype") = "0" Then
strText = strText & "Du skal vælge en både type....<br>"
strKlar = "nej"
End if
If Request.form("modelnavn") = "" Then
strText = strText & "du skal indtaste et Model navn..<br>"
strKlar = "nej"
End if
If Request.form("pristil") = "" Then
strText = strText & "du skal indtaste et pris til.<br>"
strKlar = "nej"
End if
If Request.form("visfraeuro") = "" Then
strText = strText & "Der er sket en fejl.<br>"
strKlar = "nej"
End if
If Request.form("email") = "" Then
strText = strText & "INdtast en email... agntet skal sende til....<br>"
strKlar = "nej"
End if
If strKlar = "ja" Then
strSQL = "Select * from agenter where id=" & Request.QueryString("id")
response.write strSQl
Set rs = Conn.Execute(strSQL)
resposne.write "hvad men"
if rs.eof Then
response.write "agenten findes ikke!"
elseif rs("brugernavn") <> session("brugernavn") Then
sTRSQL="Update agent Set email = '" & request.form("email") & "' , modelnavn = '" & request.form("modelnavn") & "' , mindstepris = '" & request.form("prisfra") & "' Where id = " & Request.QueryString("id")
set rs = conn.ExeCute(strSQL)
response.write "ok gutter"
else
response.write "det er fejl <p>" & strText
end if
end if



den udskriver mmm og ikke strSQl-sætningen
kan nogen finde den?