Hjælp til update kode...

Jeg har den herside som hedder andreprofi.asp som ser således ud:

<%
Set Conn = Server.CreateObject("ADODB.Connection")
DSN = "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.Mappath("klan.mdb")
Conn.Open DSN

strSQL = "SELECT * from stammeinfo where id = " & request.querystring("id") & ""
set rs = Conn.Execute(strSQL)
%>
<html>
<head>
<title>ændre data</title>
</head>
<body>

<form action="opdater.asp?id=<% =request.querystring("id") %>" method="post">
<table border="1" bordercolor="#000000">
    <tr>
        <td bordercolor="#ffffff"><b><font class="small">Brugernavn</font></b></td>
        <td bordercolor="#ffffff"><font class="small"><%=rs("Brugernavn")%></td>
    </tr>

    <tr>
        <td bordercolor="#ffffff"><font class="small">Stammenavn</font></td>
        <td bordercolor="#ffffff"><input type="text" name="Stammenavn" value="<%=rs("Stammenavn")%>"></td>
    </tr>

    <tr>
        <td bordercolor="#ffffff"><font class="small">StammeID</font></td>
        <td bordercolor="#ffffff"><input type="text" name="SID" value="<%=rs("SID")%>"></td>
    </tr>


    <tr>
        <td bordercolor="#ffffff"><font class="small">Kodeord/password</font></td>
        <td bordercolor="#ffffff"><input type="text" name="kodeord" value="<%=rs("kodeord")%>"></td>
    </tr>

    <tr>
        <td bordercolor="#ffffff"><font class="small">E-mail</font></td>
        <td bordercolor="#ffffff"><input type="text" name="mail" value="<%=rs("mail")%>"></td>
    </tr>

    <tr>
        <td bordercolor="#ffffff"><font class="small">MSN</font></td>
        <td bordercolor="#ffffff"><input type="text" name="msn" value="<%=rs("msn")%>"></td>
    </tr>

    <tr>
        <td bordercolor="#ffffff"><font class="small">ICQ nummer</font></td>
        <td bordercolor="#ffffff"><input type="text" name="icq" value="<%=Rs("icq")%>"></td>
    </tr>

    <tr>
        <td bordercolor="#ffffff">&nbsp;</td>
        <td bordercolor="#ffffff"><input type="submit" value="Tilbage til forsiden" onclick="java script:location.href='siden.asp'"></td>
    </tr>

    <tr>
        <td bordercolor="#ffffff">&nbsp;</td>
        <td bordercolor="#ffffff"><input type="submit" value="OPDATER"></td>
    </tr>
</table>
</form>

</body>
</html>



og så har jeg opdater.asp som ser således ud:

<%
Set Conn = Server.CreateObject("ADODB.Connection")
DSN = "DRIVER={Microsoft Access Driver (*.mdb)}; "
DSN = DSN & "DBQ=" & Server.MapPath("klan.mdb")
Conn.Open DSN

strSQL = "Update stammeinfo set "
strSQL = strSQL & "Stammenavn= '" & request.form("Stammenavn") & "', "
strSQL = strSQL & "SID= '" & request.form("SID") & "', "
strSQL = strSQL & "kodeord= '" & request.form("kodeord") & "', "
strSQL = strSQL & "mail= '" & request.form("mail") & "', "
strSQL = strSQL & "msn= '" & request.form("msn") & "' "
strSQL = strSQL & "icq= '" & request.form("icq") & "' "
strSQL = strSQL & "Where id = " & request.querystring("id") & ""

Conn.Execute(strSQL)

Response.write "Dinne oplysninger er nu ændret<br><br>"
Response.write "<a href=""siden.asp"">Gå til forsiden</a><br>"
%>


Er der nogen der kan hjælpe med at få det til at virke?