Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
Converting foreign accents
Message
Information générale
Forum:
Visual FoxPro
Catégorie:
Visual FoxExpress
Divers
Thread ID:
01648083
Message ID:
01648190
Vues:
48
J'aime (1)
FOR lii=1 TO AFIELDS(laFields)
    IF NOT INLIST(laFields(lii,2),'C','V','M')
       LOOP
    ENDIF
    * add condition for your fields

    lcField=laFields(lii,1)
    REPLACE &lcField. WITH STRCONV(STRCONV(&lcField.,9,1250,1),11,1251,1) ALL
NEXT
>>i reproduce your "desirata" in the code below.
>>when browsing the globalinx cursor you can see the first field (addfield) is accentued and the converted field (unaccentued).
>>the conversion is made by a cursor scan
>>in the first field you can put your "Paris la défense" or any accentued string.
>>
>>create cursor globalinx (addfield  c(150),unaccentued c(150))
>>insert into globalinx values("Tellus donec pulvîar fancibüs à classé pésuéré arcu mattis, aliquét alèquam habitant juséo convallis tùrpus néc,","")
>>insert into globalinx values("adipiscing enim !","")
>>insert into globalinx values("énis nostra fuscé. Fringlilia vestibulum sed famès nostré morbi mattis ut, cubliâ classé curae metus conubia","") 
>>insert into globalinx values("cél litoré, primis donéc dictum aliquet pulvîar et orci interdum.","")
>>SELECT globalinx
>>SCAN
>>repl unaccentued with CHRTRAN(addfield, "ÀÁÂÃÄÅÇÈÉÊËÌÍÎÏÐÑÒÓÔÕÖÙÚÛÜÝàáâãäåçèéêëìíîïðñòóôõöùúûüýÿ","AAAAAACEEEEIIIIDNOOOOOUUUUYaaaaaaceeeeiiiidnooooouuuuyy")
>>endscan
>>brow
>>
>
>I am getting very confused my dbf file consists of about 1000 records and 20 fields of which 10 could have accents - I dont know what the accents are I just need to remove all accents from all of the 10 fields for all of the 1000 records - I dont understand your code - Is ther any other way you can explain i to me?
>
>Thanks
"Navision is evil that needs to be erazed... to the ground"

Jabber: gorila@dione.zcu.cz
Jabber? Jabbim
Précédent
Suivant
Répondre
Fil
Voir

Click here to load this message in the networking platform