Was ist falsch?

[Heiner Tanner]

Guten Morgen!

Ich habe eine ASP-Site und eine MySQL-DB.
Nun sind in der DB die Spalten Person, Wert und WertWeg.

Die Seite sieht so aus, dass eine Liste mit Namen der Personen gemacht wird.
Dann sind neben jedem Namen 2 Radiobuttons, wo man wählen kann, ob man an eine Veranstaltung kommt, oder nicht.
Wenn man kommt, wird in das DB-Feld WERT den Wert 1 geschrieben, sonst 0.
Wenn man nicht kommt, wird ins Feld WERTWEG der Wert 1 geschrieben, und ins Feld WERT der Wert 0.

Nun will ich die Tabelle mit einer Schleife aufbauen, und die Werte aus der DB auslesen. Dies klappt auch.
Beim OnChange -event sollte der Name der Person dann in ein hidden-field geschrieben werden, und dieser wird durch ein Submit an ein neues File geschickt, welches den SQL-Syntax beihnhaltet, der dann die DB aktualisiert.
Fehlermeldung erhalte ich keine mehr, aber die Werte werden nicht aktualisiert.
Kann mir jemand sagen, was ich falsch gemacht habe?

CODE
------------
<%
set db = server.createobject("adodb.connection")
     db.open ("absenzDB")

Set rs = Server.CreateObject("ADODB.Recordset")
rs.open "SELECT person,wert,wertweg FROM tbl_personen ORDER BY person", db
%>

<form action="content2.asp" method="post">
<table>
<%while not rs.eof%>
<tr>
<td>
<%response.write rs("person")%>
</td>
<td>
 <input type=radio name=<%response.write rs("person")%><%if rs("wert")="1" then%> checked<%end if%>
 onchange=document.forms[0].hiddenfieldname.value=<%response.write rs("person")%>;document.forms[0].submit();>
</td>
<td>
 <input type=radio name=<%response.write rs("person")%><%if rs("wertweg")="1" then%> checked<%end if%>
 onchange=document.forms[0].hiddenfieldname.value=<%response.write rs("person")%>;document.forms[0].submit();>
</td>
</tr>
<input type=hidden name=hiddenfieldname value='rs("person")'>
<%
rs.movenext
wend

rs.close
%>
</table>

</form>
------------

File Content2.asp :
----------------

<%
set db = server.createobject("adodb.connection")
     db.open ("absenzDB")

Set rs = Server.CreateObject("ADODB.Recordset")
rs.open "SELECT person,wert,wertweg FROM tbl_personen ORDER BY person", db

Select wert from tbl_personen WHERE person = form.person

if rs.wert = 1 then

UPDATE tbl_personen set wert =0, wertweg = 1 WHERE person = form.person

else

UPDATE tbl_personen set wert =1, wertweg = 0 WHERE person = form.person

end if

%>
-------------

Ich danke im Voraus, viele Grüsse,
Heiner