Hola Amigos, saludos a todos... Necesito exportar desde visual un archivo de texto en UNICODE UTF-7. Cómo puedo hacer eso? y tambien necesito saber como exportarlo UNICODE UTF-8. Necesito lograr eso porque trabajo con corel, y necesito tomar los datos de un TXT, y cuando lo hago, no me salen los ACENTOS, Ñ (EÑE), y otra cosas... Mi programa exporta en archivos de texto, y logré generarlo en el formato q usa corel, pero me sigue dando el problema ese... Ayúdenme por favor... Gracias

Hey... que tal??? Ya solucioné el problema, y todo va perfecto con Visual BAsic 6 + Corel Draw... He creado un archivo con un formato en Corel Draw, y con un archivo de texto creado por mi aplicación en Visual Basic, el Corel Draw puede IMPORTARLO y generar muchos registros, a partir de una sola página. Es decir, por cada registro, en corel se crea una copia del formato, con los datos del registro actual... La estructura del archivo de texto que requiere Corel Draw 12 es propia de sus desarrolladores, y es fácil de entender... PAra que reconozca el archivo, debe estar en UNICODE... Y bueno, por si alguien no lo sabe, para crear archivo en UNICODE se utiliza el CreateTextFile del Objeto Scripting... Aquí les dejo el código...


Dim Obj, Arc, Ruta as String, Datos as String
Ruta="C:\registros.txt"
Datos="Este archivo ha sido creado en Unicode"
Set Obj = CreateObject("Scripting.FileSystemObject")
Set Arc = Obj.CreateTextFile(Ruta, True, True)

Arc.WriteLine (Datos)
Arc.Close