Opdatere DB via form

Hej eksperter.

Jeg har et problem med at opdatere en database med input via en form. Jeg bruger følgende kode:

<%
If Request.QueryString("mode") = "update" then
Set objConn = Server.CreateObject("ADODB.Connection")
conStr = "Provider=Microsoft.Jet.OLEDB.4.0;"
%><!--#INCLUDE FILE="../include/db.inc" --><%
objConn.Open conStr
strSQL = "Update brugere set "
strSQL = strSQL & "email = '" & Request.form("email") & "'"
strSQL = strSQL & " Where Id = Session(&#8216;login&#8217;)"
objConn.Execute(strSQL)
objConn.Close
Set objConn = Nothing
response.Redirect "setmail.asp"
end if
%>

Mit problemer i linien med:

strSQL = strSQL & " Where Id = Session(&#8216;login&#8217;)"

Id-feltet I databasen er et autonummerfelt, og derfor en talværdi, hvis jeg evt. skriver

strSQL = strSQL & " Where Id = 10&#8221;

Så virker det fint.

Så mit problem ligger i tegnsætningen