HTML-kodad text finns sparad som PM i accessdatabas. Jag vill visa detta i en textarea för att kunna göra ändringar webbaserat men bara sista halvan av data hamnar där?

nummer =Clng(request.querystring("idnr"))
set con = server.createObject("ADODB.connection")
conStr = "Driver={Microsoft Access Driver (*.mdb)};DBQ=" & Server.MapPath("..\..\..\savmanwebb.mdb")
con.open conStr
sql = "select * from startsida where id=" & nummer & "; "
Set rst = con.execute(sql)
sTemp =Cstr(rst.Fields("indextext"))

%>
<br>

<form action="uppinfonu.asp" method="post">
<table cols="2">
<tr><td><b>
<input type="hidden" name="inr" value="<%=rst.Fields("ID")%>">
Rubrik:</td><td>
<input type="text" name="fr" size="72" maxlength="255" value="<%=rst.fields("indexrubrik")%>">
</td></tr><tr><td valign="top">
<b>Text:</td><td>
<textarea COLS="55" ROWS="15" wrap="hard" name="text" value="<%=sTEmp%>" ></textarea>

</td></tr><tr><td></td><td>
<input type="submit" value="Uppdatera information på startsidan">
</td></tr>
</table>
</form>

Det finns inget attribut "value" för textarea. Det förifyllda placerar man istället mellan start- och sluttaggen:
<code>
<textarea>Detta är förifyllt</textarea>
</code>

Eftersom du vill ha HTML-kod i textarean bör du första byta ut tecken mot sina teckenentiteter:
< byts ut mot &lt;
> byts ut mot &gt;
& byts ut mot &amp;

Tack! Nu fungerar det utan att byta tecken...

Även om det fungerar utan att byta ut de angivna tecknen mot sina teckenentiteter bör du ändå överväga att göra det. Annars kan den producerade HTML-koden bli felaktig. Å andra sidan, om du inte bryr dig om sådant, bryter din kod antagligen redan mot specifikationerna/standarderna.