Tengo un fichero que cuando lo muestro en la consola, aparece coloreado (tiene unos códigos para que salga coloreado), Quisiera convertirlo en un texto sin colores, ¿como lo puedo hacer?
 


Os adjunto, el fichero en cuestion...

Bueno, al final era un problema del caracter "Escape", chr$(27).

Como lo que me interesaba es extraer el texto que estaba entre dos codigo de colores, lo he podido hacer asi:

 contacto = Between(ltmp, Chr$(27) & "[0;31m" & Chr$(27) & "[1;31m", Chr$(27) & "[0;31m")

Siendo:
ltmp: la linea de texto donde esta le texto coloreado
Between: una funcion que extrae el texto contenido entre dos textos (http://jsbsan.blogspot.com.es/2011/10/updaterayo-nueva-clase-up-poder-buscar.html)
contacto: el texto que me interesa

Yo tengo hecho algo parecido para "decolorar" la salida de un comando que genera cosas así. Lo hago directamente en el comando

Shordi:

Citar:

Public Function decolorar() As String

Muy buena la funcion, me ha servido mucho !!!, la voy a comentar en mi blog y subirla al curso de gambas.
Gracias