Utilitaire pour supprimer les accents ?

Utilitaire pour supprimer les accents ? - Divers - Programmation

Marsh Posté le 09-08-2005 à 14:07:10    

N'ayant pas eu de succès en catégorie software, je me permets de demander la même chose là où sont les habitués de la technique.
 
Je dois convertir dans un texte tout caratère ne figurant dans la table commune ANSI/ASCII-low.
é -> e
ç -> c
œ -> oe
ect...
(En gros supprimer les accents)
 
Et ne je trouve rien de potable pour ça :
Otez les accents, outil en ligne mais interprète les balises html.
URM, utilitaire en ligne de commande mais ne supporte pas les noms long.
FastPaste, un outil de presse-papier qui supprime les accents, mais laisse passer ceux-là: àãåâäñ.  
 
Un éditeur de texte supportant la conversion de page de code vers ASCII-low devrait convenir, mais même ça je trouve pas.
 
Bref, si quelqu'un connait un programme faisant ça, et si possible en traitements par lot de fichier, ça m'arrangerait !


---------------
Bricocheap: Montage de ventilo sur paté de mastic silicone
Reply

Marsh Posté le 09-08-2005 à 14:07:10   

Reply

Marsh Posté le 09-08-2005 à 16:10:54    

context peut-être

Reply

Marsh Posté le 09-08-2005 à 16:34:03    

ca peut se programmer à la main ca, en vba par exemple :whistle:

Reply

Marsh Posté le 09-08-2005 à 17:54:44    

J'aimerais justement faire mon travail et non pas faire les outils dont j'ai besoin pour mon travail.
Mais si ça continue...
 
ConTEXT est un excellent programme que je ne connaissait pas, mais il ne fait pas ce que je demande.
Même les expressions régulières dans les fonctions de remplacement ne le permettent pas.
 
Mon dernier recours est une macro de recherché/remplacé successifs.
Ça n'a pas marché sous ConTEXT, mais sous UltraEdit si.
 
Le code de macro à insérer est :

Find MatchCase PreserveCase "Á"
Replace All SelectText "A"
Find MatchCase PreserveCase "À"
Replace All SelectText "A"
Find MatchCase PreserveCase "Â"
Replace All SelectText "A"
Find MatchCase PreserveCase "Ä"
Replace All SelectText "A"
Find MatchCase PreserveCase "Ã"
Replace All SelectText "A"
Find MatchCase PreserveCase "Å"
Replace All SelectText "A"
Find MatchCase PreserveCase "á"
Replace All SelectText "a"
Find MatchCase PreserveCase "à"
Replace All SelectText "a"
Find MatchCase PreserveCase "â"
Replace All SelectText "a"
Find MatchCase PreserveCase "ä"
Replace All SelectText "a"
Find MatchCase PreserveCase "ã"
Replace All SelectText "a"
Find MatchCase PreserveCase "å"
Replace All SelectText "a"
Find MatchCase PreserveCase "æ"
Replace All SelectText "ae"
Find MatchCase PreserveCase "Æ"
Replace All SelectText "Ae"
Find MatchCase PreserveCase "Ç"
Replace All SelectText "C"
Find MatchCase PreserveCase "ç"
Replace All SelectText "c"
Find MatchCase PreserveCase "É"
Replace All SelectText "E"
Find MatchCase PreserveCase "È"
Replace All SelectText "E"
Find MatchCase PreserveCase "Ê"
Replace All SelectText "E"
Find MatchCase PreserveCase "Ë"
Replace All SelectText "E"
Find MatchCase PreserveCase "é"
Replace All SelectText "e"
Find MatchCase PreserveCase "è"
Replace All SelectText "e"
Find MatchCase PreserveCase "ê"
Replace All SelectText "e"
Find MatchCase PreserveCase "ë"
Replace All SelectText "e"
Find MatchCase PreserveCase "Í"
Replace All SelectText "I"
Find MatchCase PreserveCase "Ì"
Replace All SelectText "I"
Find MatchCase PreserveCase "Î"
Replace All SelectText "I"
Find MatchCase PreserveCase "Ï"
Replace All SelectText "I"
Find MatchCase PreserveCase "i"
Replace All SelectText "i"
Find MatchCase PreserveCase "í"
Replace All SelectText "i"
Find MatchCase PreserveCase "ì"
Replace All SelectText "i"
Find MatchCase PreserveCase "î"
Replace All SelectText "i"
Find MatchCase PreserveCase "ï"
Replace All SelectText "i"
Find MatchCase PreserveCase "Ñ"
Replace All SelectText "N"
Find MatchCase PreserveCase "ñ"
Replace All SelectText "n"
Find MatchCase PreserveCase "Ó"
Replace All SelectText "O"
Find MatchCase PreserveCase "Ò"
Replace All SelectText "O"
Find MatchCase PreserveCase "Ô"
Replace All SelectText "O"
Find MatchCase PreserveCase "Ö"
Replace All SelectText "O"
Find MatchCase PreserveCase "Õ"
Replace All SelectText "O"
Find MatchCase PreserveCase "ó"
Replace All SelectText "o"
Find MatchCase PreserveCase "ò"
Replace All SelectText "o"
Find MatchCase PreserveCase "ô"
Replace All SelectText "o"
Find MatchCase PreserveCase "ö"
Replace All SelectText "o"
Find MatchCase PreserveCase "õ"
Replace All SelectText "o"
Find MatchCase PreserveCase "Ú"
Replace All SelectText "U"
Find MatchCase PreserveCase "Ù"
Replace All SelectText "U"
Find MatchCase PreserveCase "Û"
Replace All SelectText "U"
Find MatchCase PreserveCase "Ü"
Replace All SelectText "U"
Find MatchCase PreserveCase "ú"
Replace All SelectText "u"
Find MatchCase PreserveCase "ù"
Replace All SelectText "u"
Find MatchCase PreserveCase "û"
Replace All SelectText "u"
Find MatchCase PreserveCase "ü"
Replace All SelectText "u"
Find MatchCase PreserveCase "Ý"
Replace All SelectText "Y"
Find MatchCase PreserveCase "ÿ"
Replace All SelectText "y"
Find MatchCase PreserveCase "ý"
Replace All SelectText "y"


Amis de la simplicité, bonsoir !


---------------
Bricocheap: Montage de ventilo sur paté de mastic silicone
Reply

Marsh Posté le 09-08-2005 à 18:14:51    

et ca marche avec tous les jeux de caractères ? :D

Reply

Marsh Posté le 10-08-2005 à 13:05:06    

Reply

Marsh Posté le 10-08-2005 à 13:29:03    

0x90 a écrit :

une regexp [:pingouino]


une regexp pcre peut etre, en perl tu faire un truc comme çà :

Code :
  1. $s = "azerty";
  2. $s =~ tr/abcde/01234/;
  3. print "$s\n";  # affiche 0z4rty


 
edit: tr existe aussi en tant que commande sous unix.


Message édité par manatane le 10-08-2005 à 13:30:20
Reply

Marsh Posté le 10-08-2005 à 15:59:49    

theshockwave a écrit :

et ca marche avec tous les jeux de caractères ? :D

Ça aurait pu... mais non, visiblement UltraEdit-32 utilises les codes ANSI en natif.
ConTEXT, par contre, serait bien du genre à le faire...
 

0x90 a écrit :

une regexp [:pingouino]

ConTEXT utilises "TRegExp Delphi library", et d'après ce que j'en ai vu une expression régulière ne permet pas de faire plusieurs remplacements différents en même temps.
J'aurais juste pu simplifier ma macro en recherchant [áàâäãå] par exemple.


---------------
Bricocheap: Montage de ventilo sur paté de mastic silicone
Reply

Marsh Posté le 11-08-2005 à 21:29:17    

Ma macro ne respectait pas certaines casses (bizarrerie d'UltraEdit)
 
La revoilà corrigée:

Find MatchCase RegExp "[ÁÀÂÄÃÅ]"
Replace All SelectText "A"
Find MatchCase RegExp "[áàâäãå]"
Replace All SelectText "a"
Find MatchCase RegExp "[ÉÈÊË]"
Replace All SelectText "E"
Find MatchCase RegExp "[éèêë]"
Replace All SelectText "e"
Find MatchCase RegExp "[ÍÌÎÏ]"
Replace All SelectText "I"
Find MatchCase RegExp "[íìîï]"
Replace All SelectText "i"
Find MatchCase RegExp "[ÓÒÔÖÕ]"
Replace All SelectText "O"
Find MatchCase RegExp "[óòôöõ]"
Replace All SelectText "o"
Find MatchCase RegExp "[ÚÙÛÜ]"
Replace All SelectText "U"
Find MatchCase RegExp "[úùûü]"
Replace All SelectText "u"
Find MatchCase RegExp "[ÿý]"
Replace All SelectText "y"
Find MatchCase "Æ"
Replace All SelectText "Ae"
Find MatchCase "æ"
Replace All SelectText "ae"
Find MatchCase "Ç"
Replace All SelectText "C"
Find MatchCase "ç"
Replace All SelectText "c"
Find MatchCase "Ñ"
Replace All SelectText "N"
Find MatchCase "ñ"
Replace All SelectText "n"
Find MatchCase "Ý"
Replace All SelectText "Y"

Ça s'apelle la méthode boeuf je crois...
 
Cadeau bonus: Fichier macro tout fait pour UltraEdit


---------------
Bricocheap: Montage de ventilo sur paté de mastic silicone
Reply

Sujets relatifs:

Leave a Replay

Make sure you enter the(*)required information where indicate.HTML code is not allowed