Problema con retornos de carro

[u_goldman]

Fijate si esto te sirve, solamente te interesa sacarle los chr(10) y 13 si estan al prcincipio del texto verdad?

Código:

<%
Dim texto
Dim j

texto = chr(10)&chr(13)&chr(10)&chr(13)&chr(10)&chr(13)&"Este es un texto"

for j = 1 to len(texto)
    if left(texto, 1) = chr(10) or left(texto,1) = chr(13) then
	    texto = mid(texto, 2, len(texto))
    else
	    exit for   
    end if	
next
%>
<textarea rows="10" cols="30"><%Response.Write(texto)%></textarea>

Saludos