he encontrado esto.
<%
Cadena="Esta es la cadena de texto "&chr(13)&"
http://www.comunidadguru.com"&chr(13)&"como"&chr(13)&" lo ves?"
Cadena=Replace(Cadena,"[/url]","[/url] ")
Cadena=Replace(Cadena,chr(13)," "&chr(13)&" ")
Cadena=Split(Cadena," ")
For i=0 to Ubound(Cadena)
Longitud=Len(Cadena(i))-11
If Instr(Cadena(i),"
http://") Then <br />
URL=Mid(Caden...ww.pruebas.com
pero yo tengo así:
url=www.pruebas.com]Inicio[/url]
Un saludo