Find X antal fejl i koden...

Jeg kan ikke få følgense kode til at virke
Hvad er der galt...
Det er det input der kommer fra formen (over stjernerne) der skal erstatte en af de nuværende datarækker i databasen...

<form method=\'post\' action=\'updok.asp\' name=\'tilfoej\'>
<input type=\'text\' name=\'movieid\' size=\'6\'>
<input type=\'text\' name=\'movieid\' size=\'60\'>
<input type=\'text\' name=\'movieid\' size=\'60\'>
<input type=\'text\' name=\'movieid\' size=\'60\'>
<input type=\'text\' name=\'movieid\' size=\'60\'>
<input type=\'text\' name=\'movieid\' size=\'60\'>

<input type=\"submit\" value=\"Ændre film\">

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

<%
Set Conn = Server.CreateObject(\"ADODB.Connection\")
DSN = \"DRIVER={Microsoft Access Driver (*.mdb)}; \"
DSN = DSN & \"DBQ=\" & Server.MapPath (\"/cgi-bin/program.mdb\")
Conn.Open DSN

strSQL = \"update program set \"
strSQL = strSQL & \"movieid = \'\" & request.form(\"movieid\") & \"\', \"
strSQL = strSQL & \"billed = \'\" & request.form(\"billed\") & \"\' , \"
strSQL = strSQL & \"titel = \'\" & request.form(\"titel\") & \"\' , \"
strSQL = strSQL & \"beskrivelse = \'\" & request.form(\"beskrivelsed\") & \"\' , \"
strSQL = strSQL & \"hverdagsspilletider = \'\" & request.form(\"hverdagsspilletider\") & \"\' , \"
strSQL = strSQL & \"weekendspilletider = \'\" & request.form(\"weekendspilletider\") & \"\' , \"
strSQL = strSQL & \" Where databaseID = \" & request.form(\"databaseID\") & \"\"

Conn.Execute(strSQL)%>

<%
Conn.Close
Set Conn = Nothing
%>