leggere file asp

[bonzox]

Leggo un file asp così e lo carico nella textarea.

MyFile=Server.MapPath(mod_path)

	Set FileObject=CreateObject("Scripting.FileSystemObject")
	Set InStream=FileObject.OpenTextFile(MyFile,tipo,true)


	Response.Write "<form name=""azienda"" method=""post"" action=""action.asp"">"

	Response.Write "<textarea name=""content"" cols=""80%"" rows=""30%"">"

	Do While not InStream.AtEndOfStream
	testo=InStream.ReadLine
	Response.Write "" &testo 
	loop
	
	Response.Write "</textarea>"
	
	Response.Write "

" 
	Response.Write "<input type=""submit"" name=""invio_2"" value=""Invio Dati"">"
	Response.Write "</p>"

	Response.Write "</form>"
	
%>

Purtroppo non mi legge i caratteri dopo il <% e quindi dopo non posso riscrivere il file perché non funzionerebbe.

Come mai?

[santino83_11_04]

prova a mettere:

testo=server.htmlEncode(InStream.ReadLine)

[bonzox]

Il problema rimane, grazie intanto

[bonzox]

<%sTitlePage

diventa:

<!--itlePage

----

altra cosa, come faccio a fargli mettere i ritorni a capo solo nel codice, non i

[santino83_11_04]

i ritorni nel codice con vbcrlf

[bonzox]

Originariamente inviato da santino83_11_04
i ritorni nel codice con vbcrlf

Ok, grazie ma allora è un problema di tinymce, non li fuma.

Per la codifia altre idee?

[santino83_11_04]

forse non ho ben capito il problema

[bonzox]

Devo modificare un file asp tramite tinymce.
Lo leggo e lo carico nella textarea, e qui tutto bene.
Però mi trasformava i caratteri <% in <!--eliminando un carattere..

Ora però ho visto meglio , non elimina i caratteri ma <% lo sostituisce lo stesso

L'unica cosa nella textarea di tinymce non mi mette i ritorni a capo nel codice.

[bonzox]

in pratica credo che il problema sia di codifica del carattere %, che diventa !--

il problema si ripresenta in scrittura

[bonzox]

Forse potrei leggere il file dopo quelle righe e vedere di inserire il tutto in append.

Come faccio a leggere un file dalla 13° riga?