Jeg er enten for træt, syg eller dum til at finde fejlen

take your pick :)

når brugeren trykker på ret knappen >>>
<form name=\"form2\" method=\"post\" form action=\'ret_medlem.asp\'>

ret_medlem.asp>>>>>

<%
if isEmpty(Session(\"UserID\")) Then
Response.Redirect(\"login.asp\")
End If
Session(\"UserName\")
%>

<% response.buffer = true %>

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

<%
sql = \"UPDATE Users SET Dato =\'\" & request.form(\"Nydato\") &\"\'\"
sql = sql & \", Fornavn= \'\" & request.form(\"Fornavn\") &\"\'\"
sql = sql & \", Efternavn= \'\" & request.form(\"Efternavn\") &\"\'\"
sql = sql & \", Adresse= \'\" & request.form(\"Adresse\") &\"\'\"
sql = sql & \", Telefon= \'\" & request.form(\"Telefon\") &\"\'\"
sql = sql & \", Mobil= \'\" & request.form(\"Mobil\") &\"\'\"
sql = sql & \", Mobil1= \'\" & request.form(\"Mobil1\") &\"\'\"
sql = sql & \", Email= \'\" & request.form(\"Email\") &\"\'\"
sql = sql & \", Email1= \'\" & request.form(\"Email1\") &\"\'\"
sql = sql & \", Foedselsdato= \'\" & request.form(\"Foedselsdato\") &\"\'\"
sql = sql & \", Postnr= \'\" & request.form(\"Postnr\") &\"\'\"
sql = sql & \", By= \'\" & request.form(\"By\") &\"\'\"
sql = sql & \"WHERE UserID= \" & Session(\"UserID\")   
Set rs = Conn.Execute (sql)
Conn.Close
%>

<% response.redirect (\"medlemsliste.asp\")%>

dm013