FiveTech Support Forums

FiveWin / Harbour / xBase community
Board index FiveWin para Harbour/xHarbour usando TTxtFile() como crear archivo Texto UTF8 SIN BOM
Posts: 467
Joined: Fri Dec 09, 2005 12:41 AM
usando TTxtFile() como crear archivo Texto UTF8 SIN BOM
Posted: Tue Jul 02, 2019 12:37 AM

Buenas noches

Estoy usando la clase TTxFile() y necesito crear un archivo texto de varias líneas pero debe ser con formato: UTF8- NO BOM

Como se puede hacer con esta clase o de que otro modo se puede crear usando Harbour

Gracias

Lubin

Posts: 467
Joined: Fri Dec 09, 2005 12:41 AM
Re: usando TTxtFile() como crear archivo Texto UTF8 SIN BOM
Posted: Tue Jul 02, 2019 02:42 PM

Buen dia con todos

Alguna idea como crear este archivo texto con formato UTF8-SIN BOM, por favor,

Quizas creando el archivo y luego convertirlo, ?' o usando alguna función

Gracias por el salvavidas que puedan lanzar...

Lubin

Posts: 8515
Joined: Tue Dec 20, 2005 07:36 PM
Re: usando TTxtFile() como crear archivo Texto UTF8 SIN BOM
Posted: Tue Jul 02, 2019 03:13 PM
João Santos - São Paulo - Brasil - Phone: +55(11)95150-7341
Posts: 467
Joined: Fri Dec 09, 2005 12:41 AM
Re: usando TTxtFile() como crear archivo Texto UTF8 SIN BOM
Posted: Tue Jul 02, 2019 03:50 PM
Gracias Karinha.

Si manejo el TXTFILE pero necesito que al generar el archivo, debe ser grabado en formato UTF8-NO BOM para enviarlo a una webservice
de lo contario me lo rechaza. la verdad no tengo ni idea como lograrlo en FW


karinha wrote:haga una busqueda por TXTFILE.

http://forums.fivetechsupport.com/viewtopic.php?f=3&t=31456&p=182756&hilit=TXTFILE#p182756

Saludos.
Posts: 8515
Joined: Tue Dec 20, 2005 07:36 PM
Re: usando TTxtFile() como crear archivo Texto UTF8 SIN BOM
Posted: Tue Jul 02, 2019 04:13 PM

UTF8 - BOM(Byte order mark) no lo sé. Saludos.

João Santos - São Paulo - Brasil - Phone: +55(11)95150-7341
Posts: 476
Joined: Sat Feb 03, 2007 06:36 AM
Re: usando TTxtFile() como crear archivo Texto UTF8 SIN BOM
Posted: Fri Jul 05, 2019 11:19 AM
Hola Lubin,
Has probado con la funcion de Harbour hb_strToUTF8()

Yo lo hago de esta forma:
Code (fw): Select all Collapse
   cXml := hb_strToUTF8( cXml )
   cArchivo = cFilePath( GetModuleFileName( GetInstance() )) + "Xmls\archivo"+".xml"
   Ferase(cArchivo)
   oFile := TFile():Create(cArchivo)
   oFile:PutStr( cXml )
   oFile:End()


Espero te sirva.

Carlos.
Posts: 467
Joined: Fri Dec 09, 2005 12:41 AM
Re: usando TTxtFile() como crear archivo Texto UTF8 SIN BOM
Posted: Sat Jul 06, 2019 07:47 PM

Carlos

Utilice el StrToutf8 pero no grabe asi el archivo, Voy a probarlo hoy, espero que salga bien

Gracias por el tip!!!!

Lubin

Continue the discussion