Rediger bruger
Jeg har en rediger bruger side :<%If Request.QueryString("side") = "edituser" Then
if Request.ServerVariables("REQUEST_METHOD") = "POST" then
besked = Server.HTMLEncode(Request.Form("fri_tekst"))
Besked = Replace(besked, VbCrLf, "<br>")
'Replace(brugertekst, <br> , "Chr(13)")
'Opdaterer felterner
rs10.update
rs10("Password") = Server.HTMLEncode(Request("adgangskode"))
rs10("brugeralder") = Server.HTMLEncode(Request("alder"))
rs10("realname") = Server.HTMLEncode(Request("navn"))
rs10("brugeremail") = Server.HTMLEncode(Request("email"))
rs10("brugerHjemmeside") = Server.HTMLEncode(Request("hjemmeside"))
rs10("brugerIcq") = Server.HTMLEncode(Request("icq"))
rs10("brugerTekst") = besked
rs10.update
end if
%>
<center><b>Rediger bruger</b></center><br>
<form method="post" action="community.asp?side=edituser">
<table border="0" bordercolor="#000000" align="center">
<tr>
<td bordercolor="#ffffff"><font class="small">Brugernavn</font></td>
<td bordercolor="#ffffff"><font class="small"><%=rs10("Username")%></font></td>
</tr>
<tr>
<td bordercolor="#ffffff"><font class="small">Brugerlevel</font></td>
<td bordercolor="#ffffff"><font class="small"><%=rs10("Access_Level")%></font></td>
</tr>
<tr>
<td bordercolor="#ffffff"><font class="small">Adgangskode</font></td>
<td bordercolor="#ffffff"><input type="text" name="adgangskode" style="border: 1px solid #000000;" value="<%=rs10("Password")%>"></td>
</tr>
<tr>
<td bordercolor="#ffffff"><font class="small">Email</font></td>
<td bordercolor="#ffffff"><input type="text" name="email" style="border: 1px solid #000000;" value="<%=rs10("brugeremail")%>"></td>
</tr>
<tr>
<td bordercolor="#ffffff"><font class="small">Rigtigt navn</font></td>
<td bordercolor="#ffffff"><input type="text" name="navn" style="border: 1px solid #000000;" value="<%=rs10("realname")%>"></td>
</tr>
<tr>
<td bordercolor="#ffffff"><font class="small">Hjemmeside</font></td>
<td bordercolor="#ffffff"><input type="text" name="hjemmeside" style="border: 1px solid #000000;" value="<%=rs10("brugerhjemmeside")%>"></td>
</tr>
<tr>
<td bordercolor="#ffffff"><font class="small">Alder</font></td>
<td bordercolor="#ffffff"><input type="text" name="alder" style="border: 1px solid #000000;" value="<%=rs10("brugeralder")%>"></td>
</tr>
<tr>
<td bordercolor="#ffffff"><font class="small">ICQ nummer</font></td>
<td bordercolor="#ffffff"><input type="text" name="icq" style="border: 1px solid #000000;" value="<%=Rs10("brugericq")%>"></td>
</tr>
<tr>
<td bordercolor="#ffffff" valign="top"><font class="small">Fri tekst</font></td>
<td bordercolor="#ffffff"><textarea cols="40" rows="10" style="border: 1px solid #000000;" name="fri_tekst"><%=Rs10("brugertekst")%></textarea></td>
</tr>
<tr>
<td bordercolor="#ffffff"> </td>
<td bordercolor="#ffffff"><input type="submit" style="border: 1px solid #000000;" value="Opdater" id=submit1 name=submit1></td>
</tr>
</table>
</form>
<%
rs10.close
set rs10 = nothing
end if %>
og den udskifter chr(13) med <br> ( chr(13) = linjeskift )
men næste gang man skal redigere sin profil, så skriver den <br> og ikke bare et helt normalt linjeskift, hvordan laver jeg det
