Zero lenght fejl i ASP

Hejsa NG.

Følgende kode giver fejl:

<%

ID = Request.QueryString("id")
if ID = "" then ID = Request.Form("id")
if Request.ServerVariables("REQUEST_METHOD") = "POST" then
  headline = Replace(Request.Form("headline"),"'","''")
  navn = Replace(Request.Form("navn"),"'","''")
  kommentar = Replace(Request.Form("kommentar"),"'","''")
  SQL = "INSERT INTO commentsanmeld (nyhedid, navn, comments,headline, [date]) VALUES ("
  SQL = SQL & "'" & id & "', "
  SQL = SQL & "'" & navn & "', "
  SQL = SQL & "'" & kommentar & "', "
  SQL = SQL & "'" & headline & "', "
  SQL = SQL & "now() )" 
  objConn.Execute (SQL) 
End if

if Request.ServerVariables("REQUEST_METHOD") = "POST" then 

  id = request.querystring("id")
  karakter = Request.Form("karakter")
  strSQL = "UPDATE anmeld SET stemmer = stemmer + 1, totalStjerner = totalStjerner + " & karakter & " WHERE ID = " & Request.Querystring("id")
  objConn.Execute (strSQL) 
end if


strSQL = "SELECT * FROM anmeld WHERE id LIKE '" & Request.QueryString("id") & "'"

Set rs = objConn.Execute(strSQL)

If Not rs.EOF Then
    titel = rs("titel")
   
    pic = rs("pic")
    omtale = rs("omtale")
    anmeld = rs("anmeld")
    forfatter = rs("forfatter")
    boksen = rs("boksen")
    premiere = rs("premiere")
    instruk = rs("instruk")
    spilletid = rs("spilletid")
    genre = rs("genre")
        star = rs("star")
stemmer = rs("stemmer")
totalStjerner = rs("totalStjerner")
 
Else
    Response.Redirect "reviews.asp?mode=teather_list&karakter=A"
End If


%>   

Når jeg bruger Request.Form("Karakter") går den ind og laver fejl. Den skriver fejl i commentsanmeld.comments. "Cannot be zero length. Men det er jo slet ikke den form jeg aktivere.
Og linien den mener er:
objConn.Execute (SQL) i comments koden.

Formen kommer her:

<% ' Vis antal stjerner
     
            if stemmer = 0 or stemmer = "" then
              billede = "s0"
            else
              snit = Round(totalStjerner / stemmer,3) * 2
              snit = round(snit) / 2
              snit = replace(snit, ".", "k")
              snit = replace(snit, ",", "k")
              billede = "s" & snit
            end if
           
            Response.Write "<img src=""pics/baggrund/" & billede & ".gif"">"
          %>
          <form name="stem" action="reviews.asp?mode=teather_read&id=<%=Request.QueryString("id")%>" method="post">
            <input type="radio" name="karakter" value="1">1
            <input type="radio" name="karakter" value="2">2
            <input type="radio" name="karakter" value="3">3
            <input type="radio" name="karakter" value="4">4
            <input type="radio" name="karakter" value="5">5
            <input class="formsknap" type="submit" name="Stem" value="Stem">
          </form>

Nogen der kan hjælpe?