Page 1 of 1

Problemas con UTF8 en base de datos

Posted: Wed Jun 10, 2020 12:48 pm
by leandro
Buenos días para todos,

En estos días, tuve la necesidad de importar información desde un archivo plano csv separados por punto y coma, pero tengo problemas con el temas de las ñ y las tildes, cuando abro el archivo en block de notas, se ve perfectamente:

Image

En la aplicación, específicamente en un xbrowse, también se ve de manera correcta:

Image

Pero en la base de datos, no se visualiza correctamente:

Image

El problema radica en que al momento de hacer una búsqueda que incluya _ retorna falso.

El código de la busqueda:

Code: Select all

*******************************
*HACEMOS EL FILTRO DEL RECORSET
*******************************
METHOD hacefiltro(cBrw,vGbus,oGbus) CLASS cBusc
IF Empty(vGbus)
    ::oRsBar:Filter := ""
ELSE
  ::oRsBar:Filter := ::hCampos["codigo"]+" LIKE '%" + alltrim(vGbus) + "%' OR "+::hCampos["nombre"]+" LIKE '%"+alltrim(vGbus)+"%'"
  IF ::oRsBar:EOF .and. ::oRsBar:BOF
    MsgStop( oLamcla:mBusc,oLamcla:mDato)
    ::oRsBar:Filter := ""
    oGbus:setfocus()
  ENDIF
ENDIF
::oRsBar:REQUERY()
cBrw:Refresh()
RETURN NIL 
 

Re: Problemas con UTF8 en base de datos

Posted: Wed Jun 10, 2020 5:43 pm
by cnavarro
Cuando el CSV lo abres con el notepad, y le dices "Guardar como", qué te indica en la "codificación", UTF8?

Re: Problemas con UTF8 en base de datos

Posted: Sun Aug 16, 2020 5:41 pm
by ORibeiro
hb_utf8tostr() não funciona?

Re: Problemas con UTF8 en base de datos

Posted: Mon Aug 17, 2020 11:53 am
by karinha
Aqui, funcionou bem.

Tente / Intente:

Code: Select all

   HB_SETCODEPAGE( "UTF8" )

   mxBairro := HB_OemToAnsi( HB_UTF8ToStr( mxBairro ))
   mxEndere := AllTrim( HB_OemToAnsi( HB_UTF8ToStr( mxEndere )) )
   mCidade  := HB_OemToAnsi( HB_UTF8ToStr( mCidade ))
 
Regards, saludos.