replace

Prøv at skriv vbCrLf i stedet for Chr(13) !

Fx.

FELTNAVN = Replace(feltnavn, "<br>",vbCrLf)

//>Rune

nope / virker stadig ikke

nu kalder den endda <br> med ind i textarea

Jamen det kommer jo an på hvad du vil ha' den til...

Hvis du vil undgå <br> skal du skrive:
Response.Write(Replace(feltnavn, "<br>",vbCrLf))

Hvis du vil undgå et oprindelig linjeskift skal du skrive:
Response.Write(Replace(feltnavn, vbCrLf, "<br>"))

//>Rune

det er inde på asp-siden hvor jeg retter teksten - jeg kalder teksten ind i et textarea, og derinde ville jeg helst undgå at der står <br>, hvor linieskiftene egentlig er.

lige nu, når jeg kalder rs("tekstefelt") står der

blablabla<br>blablabla.

i stedet skulle der stå

blablabla
blablabla

Ok, så skriver du:

<textarea cols="10" rows="10" name="tekstfelt"><% Response.Write(Replace(rs("tekstfelt"),"<br>",vbCrLf)) %></textarea>

//>Rune

hmmm - viser stadig <br>

???? Er du sikker på det?

-Prøv lige at lad mig se hele din kode...

Og har du sikret dig at du har opdateret!=?

//>Rune

jep - har lige tømt cache:

formen (jeg har kun ændret i første post for at se om det virkede):
Set Conn = Server.CreateObject("ADODB.Connection")
Conn.Open "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & server.MapPath("../database/beskrivelse.mdb")
SQL = "Select * from beskriv where ID=" & request("id")
set RS = conn.execute(sql)

%>
<FORM action="edit_descript.asp?mode=edit&id=<%=rs("id")%>" method="post">
    <h2>Beskrivelse til villaen</h2>
    <h5>Generel beskrivelse</h5>
    <h5><textarea rows="4" name="beskrivelse" cols="40"><% Response.Write(Replace(rs("beskrivelse"),"<br>",vbCrLf)) %></textarea></h5>
    <h5>Generelt</h5>
    <h5><textarea rows="4" name="generelt" cols="40"><%=rs("generelt")%></textarea></h5>
    <h5>Udstyr &amp; Hårde hvidevarer</h5>
    <h5><textarea rows="4" name="udstyr" cols="40"><%=rs("udstyr")%></textarea></h5>
    <h5>Soveværelse</h5>
    <h5><textarea rows="4" name="sovevaer" cols="40"><%=rs("sovevaer")%></textarea></h5>
    <h5>Badeværelse</h5>
    <h5><textarea rows="4" name="badevaer" cols="40"><%=rs("badevaer")%></textarea></h5>
    <h5>Andre faciliteter</h5>
    <h5><textarea rows="4" name="faciliteter" cols="40"><%=rs("faciliteter")%></textarea></h5>
    <h5>Underholdning</h5>
    <h5><textarea rows="4" name="underholdning" cols="40"><%=rs("underholdning")%></textarea></h5>
    <h5>Udendørs</h5>
    <h5><textarea rows="4" name="udendors" cols="40"><%=rs("udendors")%></textarea></h5>
    <h5>Afstande</h5>
    <h5><textarea rows="4" name="afstande" cols="40"><%=rs("afstande")%></textarea></h5>
    <h5>Husdyr</h5>
    <h5><textarea rows="4" name="husdyr" cols="40"><%=rs("husdyr")%></textarea></h5>
    <h5>Nærmeste byer</h5>
    <h5><textarea rows="4" name="byer" cols="40"><%=rs("byer")%></textarea></h5>

    <h5><INPUT type=submit value=OK>&nbsp;&nbsp; <INPUT type=reset value=Reset name=B2></h5>

</form>


updaten:
<%
conn.Close
Set conn = nothing
Set SQLstmt = nothing
%>
<% if mode = "edit" then

beskrivelse = request.form("beskrivelse")
generelt = request.form("generelt")
udstyr = request.form("udstyr")
sovevaer = request.form("sovevaer")
badevaer = request.form("badevaer")
faciliteter = request.form("faciliteter")
underholdning = request.form("underholdning")
udendors = request.form("udendors")
afstande = request.form("afstande")
husdyr = request.form("husdyr")
byer = request.form("byer")

beskrivelse = replace(beskrivelse, vbCrLf, "<BR>")
generelt = replace(generelt, vbCrLf, "<BR>")
udstyr = replace(udstyr, vbCrLf, "<BR>")
sovevaer = replace(sovevaer, vbCrLf, "<BR>")
bade = replace(badevaer, vbCrLf, "<BR>")
faci = replace(faciliteter, vbCrLf, "<BR>")
underh = replace(underholdning, vbCrLf, "<BR>")
udendors = replace(udendors, vbCrLf, "<BR>")
afstande = replace(afstande, vbCrLf, "<BR>")
afstande = replace(afstande, vbCrLf, "<BR>")
husdyr = replace(husdyr, vbCrLf, "<BR>")
byer = replace(byer, vbCrLf, "<BR>")


beskrivelse = replace(beskrivelse, "'", "''")
generelt = replace(generelt, "'", "''")
udstyr = replace(udstyr, "'", "''")
sove = replace(sovevaer, "'", "''")
bade = replace(badevaer, "'", "''")
faci = replace(faciiliteter, "'", "''")
underh = replace(underholdning, "'", "''")
udendors = replace(udendors, "'", "''")
afstande = replace(afstande, "'", "''")
husdyr = replace(husdyr, "'", "''")
byer = replace(byer, "'", "''")

Set Conn = Server.CreateObject("ADODB.Connection")
Conn.Open "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & server.MapPath("../database/beskrivelse.mdb")

SQLstmt = "UPDATE DISTINCTROW beskriv SET beskrivelse = '" & beskrivelse & "',generelt = '" & generelt & "',udstyr = '" & udstyr & "',sovevaer = '" & sovevaer & "',badevaer = '" & badevaer & "',faciliteter = '" & faciliteter & "',underholdning = '" & underholdning & "',udendors = '" & udendors & "',afstande = '" & afstande & "',husdyr = '" & husdyr & "',byer = '" & byer & "' WHERE ID=" & request("id")
'SQLstmt = SQLstmt & "VALUES ('" & request.form("beskrivelse") & "','" & request.form("generelt") & "','" & request.form("udstyr") & "','" & request.form("sovevaer") & "','" & request.form("badevaer") & "','" & request.form("faciliteter") & "','" & request.form("underholdning") & "','" & request.form("udendors") & "','" & request.form("afstande") & "','" & request.form("husdyr") & "','" & request.form("byer") & "')"

'response.write sqlstmt

Conn.Execute (SQLstmt)

conn.Close
Set conn = nothing
Set SQLstmt = nothing

response.redirect ("../index.asp?mode=ok")

end if %>

Det der det er fanme underligt!!! *G*

//>Rune

Vildt gæt eller ikke...
Når du indsætter <br> er det: <BR> altså store bogstaver og når du lave <br> om til vbCrLf igen så er det <br> altså små bogstaver.

Prøv at bruger små bogstaver i de linier som ændre vbCrLf til <br>.

Du kan også lave denne replace så den er ligeglad medn store og små bogstaver:
<% Response.Write(Replace(rs("beskrivelse"),"<br>",vbCrLf)) %>

Sådner her:
<% Response.Write(Replace(rs("beskrivelse"),"<br>",vbCrLf,1,-1,1)) %>

Se evt mere om replace functionen her:
http://www.asp-help.com/getstarted/ms/vbscript/142.asp

det var lige det, der manglede (forskellen i store og små bogstaver)

Hmm fair nok *G*
Thx 4 Poinz

//>Rune