jeg tror ikke jeg helt forstår hvor erfaren du er mht. asp, men...
<%
...herover er alt dit andet asp osv...
strTekstfelt = Request.Form("tekstfelt")
strTekstfelt = replace(strTekstfelt,"&1Is;","<")
strTekstfelt = replace(strTekstfelt,"&dff;",">")
strTekstfelt = replace(strTekstfelt,vbCRLF,"<br>")
rs("tekstfelt") = strTekstfelt
rs.Update
%>
Det er ligegyldigt hvor du sætter det ind, du skal bare huste at poste til filen som afvikler koden.
f.eks.
Filen : form.html
<html>
<head>
<title>Form</title>
</head>
<body>
<form action="udfoer.asp" method="post">
<textarea cols="40" rows="10" name="tekstfelt"></textarea>
<br>
<input type="submit" name="submit" value="Godkend">
</form>
</body>
</html>
Filen udfoer.asp
<%
Set Conn = Server.CreateObject("ADODB.Connection")
strDNS = "DRIVER={Microsoft Access Driver (*.mdb)};DBQ=" & Server.MapPath ("din_database.mdb")
Conn.Open = strDNS
Set rs = Server.CreateObject("ADODB.RecordSet")
strTekstfelt = Request.Form("tekstfelt")
strTekstfelt = replace(strTekstfelt,"&1Is;","<")
strTekstfelt = replace(strTekstfelt,"&dff;",">")
strTekstfelt = replace(strTekstfelt,vbCRLF,"<br>")
rs.Open "din_tabel", Conn, adOpenKeySet, adLockOptimistic, adCmdTable
rs.AddNew
rs("tekstfelt") = strTekstfelt
rs.Update
Conn.Close
Set Conn = Nothing
Set rs = Nothing
Response.Redirect("vis.asp")
%>
Filen : vis.asp
<%
Set Conn = Server.CreateObject("ADODB.Connection")
strDNS = "DRIVER={Microsoft Access Driver (*.mdb)};DBQ=" & Server.MapPath ("din_database.mdb")
Conn.Open = strDNS
Set rs = Server.CreateObject("ADODB.RecordSet")
%>
<html>
<head>
<title>Vis DB indhold</title>
</head>
<body>
<h1>Tekstfelt fra DB'en</h1>
<%
strSQL = "SELECT * FROM din_tabel"
rs.Open strSQL, strDNS, 1
If Not (rs.BOF Or rs.EOF) Then
Response.Write rs(tekstfelt") & "<br><hr><br>" & VbCrLf
End If
Conn.Close
Set Conn = Nothing
Set rs = Nothing
%>
</body>
</html>
SLUT
Håber det var svar nok?
/Dysmorf
NB: Du skal naturligvis have en database med en tabel ("din_tabel" blev brugt i eksemplet), hvori du laver et felt ("tekstfelt" blev brugt i eksemplet)