Ret i DB

Ja, så er jeg her endnu en gang !

Tidligere :
http://www.eksperten.dk/spm/41143
http://www.eksperten.dk/spm/41152

Jeg har endnu et problem !

Jeg kan ikke finde ud af at gemme (opdatere) en post i en DB !?

Min kode lige nu :

*****************************************

<%
\' Chekker om brugeren har en session.
\' Hvis ikke så smides han af
IF Session(\"password-session\") = \"\" Then
Response.Redirect(\"login.asp\")
end if
%>
<%
\'--------------------------------------------------------------------------------
\' Dette eksempel er skrevet af Dennis Knappe
\' Og omskrevet af Lars Hansen/Ole H. hansen  - logiweb.dk
\' Eksemplet kan downloades fra http://www.activeserverpages.dk, og er freeware
\' --------------------------------------------------------------------------------
Const adOpenKeyset = 1
Const adLockOptimistic = 3
strMode = Request.QueryString(\"mode\")
tempConn = \"PROVIDER=MSDASQL;DRIVER={Microsoft Access Driver (*.mdb)};DBQ=\" & Server.MapPath(\"db/all.mdb\") & \";UID=admin;PWD=;\"

If Request.Form(\"Gem\") <> \"\" Then
    strNavn = Trim(Request.Form(\"Overskrift\"))
    strAf = Trim(Request.Form(\"Af\"))
    strEmail = Trim(Request.Form(\"Email\"))
    strKommentar = Request.Form(\"Kommentar\")
    Set rs = Server.CreateObject(\"ADODB.RecordSet\")
    strSQL = \"SELECT * FROM news WHERE ID = \" & Request.QueryString(\"ID\")
    rs.Open strSQL, tempConn, adOpenKeyset, adLockOptimistic
    If (rs.BOF Or rs.EOF) Then
        rs.AddNew
        rs(\"Overskrift\") = strNavn
        rs(\"Kommentar\") = strKommentar
        rs(\"Af\") = strAf
        rs(\"Email\") = strEmail
        rs.Update
    End If
    rs.Close
    Set rs = Nothing
    Response.Redirect \"u-funk.asp\"
End If
%>
<!-- #include file=\"include/header.inc\"-->
Viderestiller
<!-- #include file=\"include/footer.inc\"-->

*****************************************