remplacer caractères avec VB6 - VB/VBA/VBS - Programmation
Marsh Posté le 31-07-2007 à 10:42:16
salut
Code :
|
Marsh Posté le 31-07-2007 à 15:00:01
Par contre j'ai un problème au niveau de l'acquisition d'un nom de fichier: Ã400
Lorsque je liste les noms de mes fichiers via une liste dans VB6 j'ai Ã400 qui devient Ã? 400
Que faire pour remedier à ce problème ?
Cela me pose un problème pour renommer le nom de mon fichier !!!
Merci pour vos réponses
Marsh Posté le 28-08-2011 à 09:59:51
Bonjour,
Tu fais de la même manière :
retour = replace (chaineOrigine,"? ","" ) ou retour = replace (chaineOrigine,"","" ) *
Où le retour est une variable string, mais tu peux aussi écraser ton résultat par la fonction.
Donc cela donnerait :
chaineOrigine = replace (chaineOrigine,"? ","" )
* : cela provient de l'affichage que je reçoit. Une fois, ta question affiche un "? " et en éditant j'obtiens un ""; interprétation de la DB/php je suppose.
Je sais, la réponse est tardive, mais pour d'autres, cela pourrait servir ..
Marsh Posté le 31-07-2007 à 08:26:33
Bonjour tout le monde !!!
Je suis sur une impasse, je dois remplacer des caractères dans une zone de texte. Pour cela j'utilise la fonction "replace"
exemple: nouveau_nom = Replace(Text1.Text, "è", "è" ) => fonctionne bien
Par contre je dois remplacer plusieurs caractères à la fois comme ç , ô , é ... toujours dans la même zone de texte
Lorsque je fais ceci seul le dernier replace est pris en compte:
exemple: nouveau_fichier = Replace(Text1.Text, "è", "è" )
nouveau_fichier = Replace(Text1.Text, "ç", "ç" )
Ma question est peut-t-on remplacer plusieurs caractères à la fois avec la fonction replace? Comment faire? Ou par une autre méthode?
Merci de vos réponses