script vil ikke gemme i db

Hvorfor vil denne ikke gemme i db når jeg lavet er ny input?

<%
If Request("mode") = "ny" then

Set Conn = Server.CreateObject("ADODB.Connection")
Conn.Open "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & ("d:\xxxx\tirsdag.mdb")

SQL= "INSERT INTO nyheder (overskrift, tekst, skribent)"
SQL = SQL & " VALUES ('" & request.form("overskrift") & "','" & request.form("tekst") & "','" & request.form("skribent") & "')"

Conn.Execute (SQL)

conn.Close
Set conn = nothing
Set SQL = nothing

response.write "Nyheden er nu oprettet."

ElseIf Request("mode") = "gem" then

overskrift = request.form("overskrift")
tekst = request.form("tekst")
skribent = request.form("skribent")


set conn = server.createobject("ADODB.connection")
path = ("d:\xxxx\tirsdag.mdb")
conn.Open "DBQ="& path &";DefaultDir="& path & ";Driver={Microsoft Access Driver (*.mdb)}"

overskrift = Replace(request.form("overskrift"),vbCrLf, "<br>")
tekst = Replace(request.form("tekst"),vbCrLf, "<br>")
skribent = Replace(request.form("skribent"),vbCrLf, "<br>")

SQL="UPDATE nyheder SET "
SQL = SQL & "overskrift='" & overskrift & "', "
SQL = SQL & "tekst='" & tekst & "', "
SQL = SQL & "skribent='" & skribent & "'"
SQL = SQL & " where ID =" & Request.Querystring("ID")
'response.write sql

Set RS = Conn.Execute(SQL)

response.redirect ("default_02.asp")

else
end if
%>

Den står mare stille i gem_nyhed.asp i adresselinien og intet sker ellers, ej heller en fejl...

/cdc