Convertir TXT UTF-8 a ASCII (Problema con la Ñ)

Posts: 582

Joined: Fri Oct 07, 2005 02:17 PM

Convertir TXT UTF-8 a ASCII (Problema con la Ñ)
Posted: Wed Jul 20, 2016 07:07 AM

Saludos Estimados,

Tengo un problema, al hacer un "Append From ARCH.TXT SDF" de un archivo UTF-8, las letras con Tilde o la "Ñ" me las cambia por 2 caracteres, cambiando asi toda la posición del registro importado.
Hay alguna forma de evitar ese problema ? y que la Ñ pase tal como esta asi como las letras con tilde ??

Yo lo he solucionado (solo para pruebas) abriendo el archivo con un editor (EmEditor) y grabandolo inmediatamente, pero cambiando en guardar como la codificación de "UTF-8 sin firma" a "Binario (Vista Ascii)", el TXT grabado de esta forma, si es importado de manera correcta, dejando la Ñ y las vocales con tilde tal como se ven en el editor.

Alguna idea ??, gracias

Enrrique Vertiz Pitta

Lima-Peru

xHb 1.23.1026X, Fwh 25.01, BCC74, MySQL 8.0.X, SQLLIB 1.9m

cnavarro

Posts: 6755

Joined: Wed Feb 15, 2012 08:25 PM

Re: Convertir TXT UTF-8 a ASCII (Problema con la Ñ)
Posted: Wed Jul 20, 2016 09:45 AM

Has intentado utilizar ?

HB_StrToUTF8( cStr )
HB_UTF8ToStr( cUtf8 )

Cristobal Navarro

Hay dos tipos de personas: las que te hacen perder el tiempo y las que te hacen perder la noción del tiempo

El secreto de la felicidad no está en hacer lo que te gusta, sino en que te guste lo que haces

Enrrique Vertiz

Posts: 582

Joined: Fri Oct 07, 2005 02:17 PM

Re: Convertir TXT UTF-8 a ASCII (Problema con la Ñ)
Posted: Wed Jul 20, 2016 03:33 PM

Cristobal, buen dia, gracias por contestar

Esas funciones son de Hb, Yo uso xHb, hay funciones equivalentes ??
Para aplicarlas le hago un memoread y luego un memowrite al archivo y asi convertiría el TXT completo ??
Gracias por tu atención.

Enrrique Vertiz Pitta

Lima-Peru

xHb 1.23.1026X, Fwh 25.01, BCC74, MySQL 8.0.X, SQLLIB 1.9m

karinha

Posts: 8515

Joined: Tue Dec 20, 2005 07:36 PM

Re: Convertir TXT UTF-8 a ASCII (Problema con la Ñ)
Posted: Thu Jul 21, 2016 12:59 PM

Code (fw): Select all Collapse

#Include "FiveWin.ch"

REQUEST HB_CODEPAGE_PTISO  // lib: CODEPAGE.LIB de xHarbour
REQUEST HB_CODEPAGE_PT850
REQUEST HB_LANG_PT

FUNCTION Main()

   LOCAL cStr, cAsc, cUtf8

   HB_SETCODEPAGE( "PT850" )  // cambia a espanhol
   HB_LANGSELECT( "PT" )      // cambia a espanhol
   HB_SETCODEPAGE( "UTF8EX" ) // or HB_CDPSELECT( "UTF8EX" )

   cStr := "Isto é um teste de conversão."

   cUtf8 := hb_strToUTF8( cStr )

   cAsc := hb_UTF8ToStr( cUtf8 )

   ? "Texto: ",+ cStr

   ? "Utf8:  ", cUtf8

   ? "Asc:  ", cAsc

RETURN NIL

/*

REQUEST HB_CODEPAGE_ESWIN

        cAnsi := "áéíóú"
        cUTF8 := HB_STRTOUTF8(cAnsi, "ESWIN")

        HB_MemoWrit ("ejemplo.txt", cUTF8)
*/

// fin

João Santos - São Paulo - Brasil - Phone: +55(11)95150-7341

karinha

Posts: 8515

Joined: Tue Dec 20, 2005 07:36 PM

Re: Convertir TXT UTF-8 a ASCII (Problema con la Ñ)
Posted: Thu Jul 21, 2016 01:02 PM

Code (fw): Select all Collapse

proc main()

   REQUEST HB_CODEPAGE_RU866

   memowrit('c:\utf8',hb_strtoutf8(hb_ansitooem('ðÒÉ×ÅÔ, ÒÏÍÁÛËÉ!'),'RU866'))

return nl

João Santos - São Paulo - Brasil - Phone: +55(11)95150-7341

Enrrique Vertiz

Posts: 582

Joined: Fri Oct 07, 2005 02:17 PM

Re: Convertir TXT UTF-8 a ASCII (Problema con la Ñ)
Posted: Thu Jul 21, 2016 08:09 PM

Kariña, Cristóbal, GRACIAS ...

Con vuestras indicaciones funciono OK

Enrrique Vertiz Pitta

Lima-Peru

xHb 1.23.1026X, Fwh 25.01, BCC74, MySQL 8.0.X, SQLLIB 1.9m

FiveTech Support Forums

Continue the discussion