Opdatering af data, ud fra QueryString

Jeg har en række probs med at åbne og opdatere noget indhold. Koden ser således ud:

<%
id = Request.QueryString("id")

Set Connect = Server.CreateObject("ADODB.Connection")
Connect.Open "Driver={Microsoft Access Driver (*.mdb)}; DBQ=" & server.mappath ("database.mdb")
Set rs = Server.CreateObject("ADODB.Recordset")
SQL = "SELECT * FROM news WHERE id=" & id & ""
rs.Open SQL, Connect, 3, 3

if request.QueryString("action")="update" then

rs("title") = request.form("title")
rs("content") = request.form("content")
rs("author") = request.form("author")

rs.update
response.Redirect "ok.asp"
end if

%>

<form method="POST" action="news.asp?action=update">
Title:<br>
<input type="text" name="title" size="50" tabindex="1" value="<%=rs("title")%>"><br>
Content:<br>
<input type="text" name="content" size="50" tabindex="2" value="<%=rs("content")%>"><br>
Author:<br>
<input type="text" name="author" size="50" tabindex="3" value="<%=rs("author")%>"><br>
<input type="submit" value="Update" name="submit" tabindex="4">
</form>

----

jeg får bare følgende fejl:

[Microsoft][ODBC Microsoft Access Driver] Syntax error (missing operator) in query expression 'id='.

Hvilket vel må skyldes at jeg ændre url'en i adresselinien fra *.asp?id=("id") til *.asp?action=update ?!?!

--

- Er der er nemmere måde at trække indholdet ud, udfra id og opdatere det?