få replace(text, "<br/>", vbcrlf) att funka med server.execute?

Nu börjar jag nog bli lite tjatig med alla mina frågor =P
Men hur ska man göra för att få replace(text, "<br/>", vbcrlf) att funka med server.execute?

kod::
<% text=Request.Form("fil")%>
<%input= Server.Execute(text)
input=replace(text, "<br/>", vbcrlf)%>
<form method="post" action="skicka.asp">
<input name="filnamn" type="hidden" value="<%Response.Write(text)%>">
<br>
Text:
<br>
<textarea name="text" cols="50" rows="15" wrap="PHYSICAL" >
<% Response.Write(input)%>
</textarea>

<br>
<input type="submit" value="skicka">
<input type="reset" value="återställ">
</form>

tack på förhand

//Martin

ska det inte vara input=replace(text, vbCrLf, "<br>")%>

mjansson: Server.Execute fungerar inte på det sättet.. det som du exekverar exekveras
iom anropet, du kan inte fånga upp det i ett värde på det sättet som du försöker.

Om du vill hämta data från en fil får du använda FSO istället.

WebbisNet:: nej.. det har jag i den filen som den skickar.
och se när man går in och ska redigera den så visar den alla <br/> och då vill jag att den ska göra om dem till vbCrLf igen =)

Palle:: hur gör man det då?

Request.Form("fil")

Vad är detta?
Är detta en fil på servern?

HEJ!

Om detta handlar om att spara data, ska du inte ändra något förrän du presenterar texten igen, då gör du din Replace.

Den data som lagras ska ha VbCrLf i sig, inget annat.

detta är när man redigerar texen som finns i hem.txt
då visas den i en textarea och då vill jag ha bort alla <br/> och ha vbCrLF
sen när man sparar texten igen gör den om det till <br/> igen =)

Löste det =D

kod::

<% fil=Request.Form("fil")%>
<%
Set fs = CreateObject("Scripting.FileSystemObject")

Set wfile = fs.OpenTextFile(fil)

input = wfile.ReadAll

wfile.close
Set wfile=nothing
Set fs=nothing
text = replace(input, "<br/>", vbcrlf)
%>

<form method="post" action="skicka.asp">
<input name="filnamn" type="hidden" value="<%Response.Write(fil)%>">
<br>Text:<br> <textarea name="text" cols="50" rows="15" wrap="PHYSICAL" ><%Response.Write(text) %></textarea>

men hur får man så att den inte skapar en <br/> där det är en automatisk radbrytning? utan bara skapar en där man har gjort radbryningen själv (ENTER)??

Om du använder wrap="virtual" på textarean så borde det fungera som du önskar.