:0) det var den forkeret side!!
her er den rigtige!
<%If Not Session(\"uid\") > 0 Then Response.Redirect(\"
http://www.thebeat.dk/\") %>
<!-- #include file=\"top.asp\" -->
<%
ID = request.querystring(\"ID\")
set RS = Conn.Execute(\"SELECT * FROM users WHERE ID = \" & Session(\"uid\"))
RS.MoveFirst()
while not RS.EOF
%>
<%
username = RS.Fields(\"username\")
alias = username
%>
<form method=post action=\"retinfo.asp?action=gem\">
<table width=\"95%\">
<tr>
<td>Navn</td><td><input name=navn value=<%=alias%>></td>
</tr>
<tr>
<td>Køn</td>
<td>
<input name=\"p_sex\" type=\"radio\" value=\"Mand\">Mand<br>
<input name=\"p_sex\" type=\"radio\" value=\"Kvinde\">Kvinde<br>
</td>
</tr>
<tr>
<td>Højde:</td><td><input maxlength=\"3\" name=hojde value=<%=RS.Fields(\"hojde\")%>>CM.</td>
</tr>
<tr>
<td>Søger:</td><td>
<select style=\'width:155px\' name=\'soger\' size=\'1\'>
<%
soger=RS.Fields(\"soger\")
%>
<option value=\"<%=soger%>\"><%=soger%></option>
<option></option>
<option value=\"Ikke angivet\">Ikke angivet</option>
<option value=\"Ven\">Ven</option>
<option value=\"Kæreste\">Kæreste</option>
</select>
</td>
</tr>
<tr>
<td>Kropsbygning:</td><td>
<select style=\'width:155px\' name=\'bygning\' size=\'1\'>
<%
bygning=RS.Fields(\"bygning\")
%>
<option value=\"<%=bygning%>\"><%=bygning%></option>
<option></option>
<option value=\"Ikke angivet\">Ikke angivet</option>
<option value=\"Spinkel\">Spinkel</option>
<option value=\"Almindelig\">Almindelig</option>
<option value=\"Robust\">Robust</option>
<option value=\"Buttet\">Buttet</option>
<option value=\"Overvægtig\">Overvægtig</option>
<option value=\"Handicappet\">Handicappet</option>
</select>
</td>
</tr>
<tr>
<td>Øjnfarve:</td><td><input name=ojn value=<%=RS.Fields(\"ojn\")%>></td>
</tr>
<tr>
<td>Partnerstatus:</td><td>
<select style=\'width:155px\' name=\'Partner\' size=\'1\'>
<%
partner=RS.Fields(\"partner\")
%>
<option value=\"<%=partner%>\"><%=partner%></option>
<option></option>
<option value=\"Ikke angivet\">Ikke angivet</option>
<option value=\"Er single\">Er Single</option>
<option value=\"Har en kæreste\">Har Kæreste</option>
<option value=\"Er gift\">Er Gift</option>
</select></td>
</tr>
<tr>
<td>Jobtype:</td><td>
<select style=\'width:155px\' name=\'Job\' size=\'1\'>
<%
job=RS.Fields(\"job\")
%>
<option value=\"<%=job%>\"><%=job%></option>
<option></option>
<option value=\"Ikke angivet\">Ikke angivet</option>
<option value=\"Arbejdsløs\">Arbejdsløs</option>
<option value=\"Funktionær\">Funktionær</option>
<option value=\"Håndværker\">Håndværker</option>
<option value=\"Leder/Chef\">Leder/Chef</option>
<option value=\"Selvstændig\">Selvstændig</option>
<option value=\"Studerende\">Studerende</option>
<option value=\"Andet\">Andet</option></td>
</tr>
<tr>
<td>Stjernetegn:</td><td>
<select style=\'width:155px\' name=\'stjerne\' size=\'1\'>
<%
stjerne=RS.Fields(\"stjerne\")
%>
<option value=\"<%=stjerne%>\"><%=stjerne%></option>
<option></option>
<option value=\"Ikke angivet\">Ikke angivet</option>
<option value=\"Stenbuk\">Stenbuk</option>
<option value=\"Vandmand\">Vandmand</option>
<option value=\"Fisk\">Fisk</option>
<option value=\"Vædder\">Vædder</option>
<option value=\"Tyr\">Tyr</option>
<option value=\"Tvilling\">Tvilling</option>
<option value=\"Krebs\">Krebs</option>
<option value=\"Løve\">Løve</option>
<option value=\"Jomfru\">Jomfru</option>
<option value=\"Vægt\">Vægt</option>
<option value=\"Skorpion\">Skorpion</option>
<option value=\"Skytte\">Skytte</option>
</select></td>
</tr>
<tr>
<td>Hoppy</td><td>
<select style=\'width:155px\' name=\'Hobby\' size=\'2\' MULTIPLE>
<%
hobby=RS.Fields(\"hobby\")
%>
<option value=\"<%=hobby%>\"><%=hobby%></option>
<option></option>
<option value=\"Sport\">Sport</option>
<option value=\"Mad & Vin\">Mad & Vin</option>
<option value=\"Bøger\">Bøger</option>
<option value=\"Teater\">Teater</option>
<option value=\"Kunst\">Kunst</option>
<option value=\"Musik\">Musik</option>
<option value=\"Spille musik\">Spille musik</option>
<option value=\"Fotografering\">Fotografering</option>
<option value=\"Male/tegne\">Male/tegne</option>
<option value=\"Film\">Film</option>
<option value=\"Mystik\">Mystik</option>
<option value=\"Religion\">Religion</option>
<option value=\"Videnskab\">Videnskab</option>
<option value=\"Computer\">Computer</option>
<option value=\"Spil\">Spil</option>
<option value=\"Natur\">Natur</option>
<option value=\"Kæledyr\">Kæledyr</option>
<option value=\"Landbrug\">Landbrug</option>
<option value=\"Rejser\">Rejser</option>
<option value=\"Friluftsliv\">Friluftsliv</option>
<option value=\"Discotek\">Discotek</option>
<option value=\"Café\">Café</option>
<option value=\"Job/karriere\">Job/karriere</option>
<option value=\"Skole/uddannelse\">Skole/uddannelse</option>
<option value=\"Familie\">Familie</option>
<option value=\"Børn\">Børn</option>
<option value=\"Tøj\">Tøj</option>
<option value=\"Håndarbejde\">Håndarbejde</option>
<option value=\"Politik\">Politik</option>
<option value=\"Samler\">Samler</option>
<option value=\"Biler\">Biler</option>
</select>
</td>
</tr>
<tr>
<td>Alder:</td><td><input maxlength=\"2\" name=p_age value=<%=RS.Fields(\"p_age\")%>></td>
</tr>
<tr>
<td>Vægt:</td><td><input maxlength=\"3\" name=vagt value=<%=RS.Fields(\"vagt\")%>></td>
</tr>
<tr>
<td>Bopæl:</td><td><input name=p_bor value=<%=RS.Fields(\"p_bor\")%>></td>
</tr>
<tr>
<td>Hårfarve:</td><td>
<select style=\'width:155px\' name=\'Har\' size=\'1\'>
<%
har=RS.Fields(\"har\")
%>
<option value=\"<%=har%>\"><%=har%></option>
<option></option>
<option value=\"Ikke angivet\">Ikke angivet</option>
<option value=\"Hvidt\">Hvidt</option>
<option value=\"Blond\">Blond</option>
<option value=\"Mørke blond\">Mørke blond</option>
<option value=\"Mørke brunt\">Mørke brunt</option>
<option value=\"Sort\">Sort</option>
<option value=\"Brunt\">Brunt</option>
<option value=\"Gråt\">Gråt</option>
<option value=\"Rødt\">Rødt</option>
<option value=\"Mørke rødt\">Mørke rødt</option>
<option value=\"Andet\">Andet</option>
</select></td>
</tr>
<tr>
<td>Børn:</td><td>
<select style=\'width:155px\' name=\'born\' size=\'1\'>
<%
born=RS.Fields(\"born\")
%>
<option value=\"<%=born%>\"><%=born%></option>
<option></option>
<option value=\"Ikke angivet\">Ikke angivet</option>
<option value=\"Ingen\">Ingen</option>
<option value=\"1 Barn\">1 Barn</option>
<option value=\"2 børn\">2 børn</option>
<option value=\"3 børn eller flere\">3 børn eller flere</option>
<option value=\"Gravid\">Gravid</option>
</select></td>
</tr>
<tr>
<td>Ryger:</td><td>
<%
ryger=RS.Fields(\"ryger\")
%>
<select style=\'width:155px\' name=\'ryger\' size=\'1\'>
<option value=\"<%=ryger%>\"><%=ryger%></option>
<option></option>
<option value=\"Ikke angivet\">Ikke angivet</option>
<option value=\"Ikke ryger\">Ikke ryger</option>
<option value=\"Fest ryger\">Fest ryger</option>
<option value=\"Ryger\">Ryger</option>
<option value=\"Pibe\">Pibe</option>
<option value=\"Cigar\">Cigar</option>
</select></td>
</tr>
<tr>
<td>Uddannelse</td><td>
<select style=\'width:155px\' name=\'uddan\' size=\'1\'>
<%
uddan=RS.Fields(\"uddan\")
%>
<option value=\"<%=uddan%>\"><%=uddan%></option>
<option></option>
<option value=\"Ikke angivet\">Ikke angivet</option>
<option value=\"Faglært\">Faglært</option>
<option value=\"Gymnasie/HF\">Gymnasie/HF</option>
<option value=\"Ingen\">Ingen</option>
<option value=\"Videregående\">Videregående</option>
</select></td>
</tr>
<tr>
<td>Password<td><input name=vagt type=password value=<%=RS.Fields(\"password\")%>></td>
</tr>
<tr>
<td>Musik smag:</td><td>
<select style=\'width:155px\' name=\'Musik\' size=\'6\' MULTIPLE>
<%
musik=RS.Fields(\"musik\")
%>
<option value=\"<%=musik%>\"><%=musik%></option>
<option></option>
<option value=\"Lidt af hvert\">Lidt af hvert</option>
<option value=\"Pop\">Pop</option>
<option value=\"Disco\">Disco</option>
<option value=\"Blues\">Blues</option>
<option value=\"Soul\">Soul</option>
<option value=\"Funk\">Funk</option>
<option value=\"Country\">Country</option>
<option value=\"Death Metal\">Death Metal</option>
<option value=\"Rock\">Rock</option>
<option value=\"Hard Rock\">Hard Rock</option>
<option value=\"Grunge Rock\">Grunge Rock</option>
<option value=\"Heavy Metal\">Heavy Metal</option>
<option value=\"Punk\">Punk</option>
<option value=\"Hip Hop\">Hip Hop</option>
<option value=\"Rap\">Rap</option>
<option value=\"Indie\">Indie</option>
<option value=\"Alternative\">Alternative</option>
<option value=\"Industrial\">Industrial</option>
<option value=\"Klassisk\">Klassisk</option>
<option value=\"Jazz\">Jazz</option>
<option value=\"New Age\">New Age</option>
<option value=\"Ambient\">Ambient</option>
<option value=\"Techno\">Techno</option>
<option value=\"Ethnic\">Ethnic</option>
<option value=\"World Beat\">World Beat</option>
<option value=\"Celtic\">Celtic</option>
</select></td><td></td>
</tr>
</table>
<hr>
<textarea wrap=\"virtual\" rows=\"10\" name=\"p_txt\" cols=\"75\"><%=RS.Fields(\"p_txt\")%></textarea>
<br>
<hr>
<input type=submit value=GEM>
</form>
<%
RS.MoveNext()
WEND
%>
<% IF request.querystring(\"action\") = \"gem\" THEN
response.buffer=\"true\"
%>
<%
username = request.form(\"username\")
p_sex = request.form(\"p_sex\")
hojde = request.form(\"hojde\")
soger = request.form(\"soger\")
bygning = request.form(\"bygning\")
ojn = request.form(\"ojn\")
partner = request.form(\"partner\")
Job = request.form(\"Job\")
stjerne = request.form(\"stjerne\")
Hoppy = request.form(\"Hoppy\")
p_age = request.form(\"p_age\")
vagt = request.form(\"vagt\")
p_bor = request.form(\"p_bor\")
har = request.form(\"har\")
born = request.form(\"born\")
Ryger = request.form(\"Ryger\")
Udda = request.form(\"Udda\")
p_txt = request.form(\"p_txt\")
musik = request.form(\"musik\")
p_sex = request.form(\"p_sex\")
Id = Session(\"uid\")
connn = \"DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=\" & server.mappath(\"users.mdb\")
Set conn = Server.CreateObject(\"ADODB.Connection\")
conn.Open connn
Set RS = conn.Execute(\"UPDATE users SET username = \'\" & username & \"\', p_sex = \'\" & p_sex & \"\', hojde = \'\" & hojde & \"\', soger = \'\" & soger & \"\', bygning = \'\" & bygning & \"\', ojn = \'\" & ojn & \"\', partner = \'\" & partner & \"\', stjerne = \'\" & stjerne & \"\', vagt = \'\" & vagt & \"\', p_bor = \'\" & p_bor & \"\', har = \'\" & har & \"\', Ryger = \'\" & Ryger & \"\', born = \'\" & born & \"\', Hoppy = \'\" & Hoppy & \"\', Udda = \'\" & Udda & \"\', p_txt = \'\" & p_txt & \"\', musik = \'\" & musik & \"\', p_age = \'\" & p_age & \"\' where id = \" & id)
set RS=nothing
conn.close
set conn=nothing
Response.Redirect(\"retinfo.asp\")
END IF %>
<!-- #include file=\"bund.asp\" -->