Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
Converting foreign accents
Message
General information
Forum:
Visual FoxPro
Category:
Visual FoxExpress
Miscellaneous
Thread ID:
01648083
Message ID:
01648190
Views:
49
Likes (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
Previous
Next
Reply
Map
View

Click here to load this message in the networking platform