FoxPro/Visual FoxPro - Hilo viejo no respondido : Importar acentos desde txt

 
Vista:
sin imagen de perfil
Val: 3
Ha aumentado su posición en 15 puestos en FoxPro/Visual FoxPro (en relación al último mes)
Gráfica de FoxPro/Visual FoxPro

Hilo viejo no respondido : Importar acentos desde txt

Publicado por DALSOM (611 intervenciones) el 24/02/2017 16:26:50
Hola a todos, al importar acentos y las "ñ" se cambian por caracteres extranos.

Vea ejemplo en este hilo anterior : http://www.lawebdelprogramador.com/foros/FoxPro-Visual-FoxPro/1332594-problemas-al-importar-texto.html

No he podido seleccionar el character devuelto, ya que siempre pone el mismo para mas de uno o todos.

Alguien sabe como ?

Estoy probando con el append from y codepages 437 y 1252.

Saludos cordiales.
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder

Hilo viejo no respondido : Importar acentos desde txt

Publicado por José M. Ferrer A. (31 intervenciones) el 24/02/2017 17:48:19
Si usas la función GETCP(437, "Seleccione el Código de Página", "Selección de Código de Página") y no te funciona,, puedes probar con la función de conversión de caracteres de ANSI a OEM a través del UPDATE de SQL o REPLACE de xBase.

Para que tengas una mejor idea de lo que estoy diciendo, prueba el en Ventana de Comandos de VFP lo siguiente:

1
2
3
4
5
6
cText="Canción y Ñandú"
cTextANSI=OEMTOANSI(cText)
cTextConAcentos=ANSITOOEM(cTextANSI)
? cText
? cTextANSI
? cTextConAcentos
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

Hilo viejo no respondido : Importar acentos desde txt

Publicado por wences (35 intervenciones) el 03/03/2017 18:37:30
Si no puedes con el append ... puedes hacer lo siguiente , una vez añadido , sustituir los caracteres extraños por su caracter normal ..

usando el strtran ... algo así :

1
2
3
4
5
6
7
8
9
10
11
12
13
m.direccion=STRTRAN(m.direccion,"ß","ß")
m.direccion=STRTRAN(m.direccion,"á","á")
m.direccion=STRTRAN(m.direccion,"ú","ú")
m.direccion=STRTRAN(m.direccion,"ö","ö")
m.direccion=STRTRAN(m.direccion,"é","é")
m.direccion=STRTRAN(m.direccion,"ó","ó")
m.direccion=STRTRAN(m.direccion,"ü","ü")
m.direccion=STRTRAN(m.direccion,"ñ","ñ")
m.direccion=STRTRAN(m.direccion,"à","à")
m.direccion=STRTRAN(m.direccion,-","í")
m.direccion=STRTRAN(m.direccion,"Ó","Ó")
m.direccion=STRTRAN(m.direccion,"Ñ","Ñ")
replace lineas.direccion WITH m.direccion

así lo puedes hacer por las bravas ...
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar