|
| Débuté par Paul, 22 mai 2011 18:55 - 4 réponses |
| |
| | | |
|
| |
Posté le 22 mai 2011 - 18:55 |
Bonjour,
Ma question est simple : existe-t-il une fonction permettant de transformer les caractères spéciaux sous forme de code en lettre avec accent ?
Exemple : "é" doit être "é".
Merci d'avance !
PG |
| |
| |
| | | |
|
| | |
| |
Posté le 23 mai 2011 - 11:01 |
Bonjour,
Peut-être UTF8VersChaine() ?
Frédéric.
"Paul" <paul.gera@free.fr> a écrit dans le message de
news:e3965ef5ca464bb21dbf03f608588081@news.pcsoft...
Bonjour,
Ma question est simple : existe-t-il une fonction permettant de
transformer les caractères spéciaux sous forme de code en lettre avec
accent ?
Exemple : "é" doit être "é".
Merci d'avance !
PG
|
| |
| |
| | | |
|
| | |
| |
Posté le 23 mai 2011 - 11:02 |
UnicodeVersAnsi ou active simplement la gestion de l'Unicode
Paul wrote in news message <e3965ef5ca464bb21dbf03f608588081@news.pcsoft>:
Bonjour,
Ma question est simple : existe-t-il une fonction permettant de transformer les caractères spéciaux sous forme de code en lettre avec accent ?
Exemple : "é" doit être "é".
Merci d'avance !
PG |
| |
| |
| | | |
|
| | |
| |
Membre enregistré
1 298 messages
Popularité : +20 (72 votes) |
|
Posté le 12 février 2020 - 11:39 |
POur info et partage , j'ai retrouvé deux codes
// Résumé :
// Syntaxe :
//[ = ] MailJet_Caracteres_speciaux ( [ est chaîne UNICODE [, est chaîne]])
//
// Paramètres :
// sMaChaineHtml (chaîne UNICODE - valeur par défaut="") :
// sMaChaineHtmlANSI (chaîne ANSI - valeur par défaut="") :
// Valeur de retour :
// chaîne UNICODE : // Aucune
//
// Exemple :
// Indiquez ici un exemple d'utilisation.
//
PROCEDURE MailJet_Caracteres_speciaux(sMaChaineHtml est une chaîne UNICODE= "", sMaChaineHtmlANSI est une chaîne ANSI= "")
maChaine est une chaîne UNICODE
SI sMaChaineHtml <> "" ALORS
maChaine= sMaChaineHtml
SINON
maChaine = AnsiVersUnicode(sMaChaineHtmlANSI)
FIN
maChaine = Remplace(maChaine,"“", "“")
maChaine = Remplace(maChaine,"”", "”")
maChaine = Remplace(maChaine,"„", "„")
maChaine = Remplace(maChaine,"'", "' ")
maChaine = Remplace(maChaine,"‘", "‘")
maChaine = Remplace(maChaine,"’", "’")
maChaine = Remplace(maChaine,"‚", "‚")
maChaine = Remplace(maChaine,"’","'" )
maChaine = Remplace(maChaine,"'","'" )
maChaine = Remplace(maChaine,"€","€" )
//maChaine = Remplace(maChaine,"<","<" )
//maChaine = Remplace(maChaine,">",">" )
maChaine = Remplace(maChaine,"œ","œ" )
maChaine = Remplace(maChaine,"À","À" )
maChaine = Remplace(maChaine,"Â","Â" )
maChaine = Remplace(maChaine,"Ã","Ã" )
maChaine = Remplace(maChaine,"Ä","Ä" )
maChaine = Remplace(maChaine,"Å","Å" )
maChaine = Remplace(maChaine,"Ç","Ç" )
maChaine = Remplace(maChaine,"È","È" )
maChaine = Remplace(maChaine,"É","É" )
maChaine = Remplace(maChaine,"Ê","Ê" )
maChaine = Remplace(maChaine,"Ë","Ë" )
maChaine = Remplace(maChaine,"Ì","Ì" )
maChaine = Remplace(maChaine,"Î","Î" )
maChaine = Remplace(maChaine,"Ñ","Ñ" )
maChaine = Remplace(maChaine,"Ò","Ò" )
maChaine = Remplace(maChaine,"Ó","Ó" )
maChaine = Remplace(maChaine,"Ô","Ô" )
maChaine = Remplace(maChaine,"Õ","Õ" )
maChaine = Remplace(maChaine,"Ö","Ö" )
maChaine = Remplace(maChaine,"×","×" )
maChaine = Remplace(maChaine,"Ø","Ø" )
maChaine = Remplace(maChaine,"Ù","Ù" )
maChaine = Remplace(maChaine,"Ú","Ú" )
maChaine = Remplace(maChaine,"Û","Û" )
maChaine = Remplace(maChaine,"Ü","Ü" )
maChaine = Remplace(maChaine,"þ","þ" )
maChaine = Remplace(maChaine,"ß","ß" )
maChaine = Remplace(maChaine, "Ÿ" ,"Ÿ")
maChaine = Remplace(maChaine, "¢" ,"¢")
maChaine = Remplace(maChaine, "£" ,"£")
maChaine = Remplace(maChaine, "¤" ,"¤")
maChaine = Remplace(maChaine, "¥" ,"¥")
maChaine = Remplace(maChaine, "¦" ,"¦")
maChaine = Remplace(maChaine, "§" ,"§")
maChaine = Remplace(maChaine, "¨" ,"¨")
maChaine = Remplace(maChaine, "©" ,"©")
maChaine = Remplace(maChaine, "ª" ,"ª")
maChaine = Remplace(maChaine, "«" ,"«")
maChaine = Remplace(maChaine, "¬" ,"¬")
maChaine = Remplace(maChaine, "" ,"")
maChaine = Remplace(maChaine, "®" ,"®")
maChaine = Remplace(maChaine, "°" ,"°")
maChaine = Remplace(maChaine, "±" ,"±")
maChaine = Remplace(maChaine, "²" ,"²")
maChaine = Remplace(maChaine, "³" ,"³")
maChaine = Remplace(maChaine, "´" ,"´")
maChaine = Remplace(maChaine, "µ" ,"µ")
maChaine = Remplace(maChaine, "¶" ,"¶")
maChaine = Remplace(maChaine, "·" ,"·")
maChaine = Remplace(maChaine, "¸" ,"¸")
maChaine = Remplace(maChaine, "¹" ,"¹")
maChaine = Remplace(maChaine, "º" ,"º")
maChaine = Remplace(maChaine, "»" ,"»")
maChaine = Remplace(maChaine, "¼" ,"¼")
maChaine = Remplace(maChaine, "½" ,"½")
maChaine = Remplace(maChaine, "¾" ,"¾")
maChaine = Remplace(maChaine, "¿" ,"¿")
maChaine = Remplace(maChaine, "Á" ,"Á")
maChaine = Remplace(maChaine, "Í" ,"Í")
maChaine = Remplace(maChaine, "Ý" ,"Ý")
maChaine = Remplace(maChaine, "à" ,"à")
maChaine = Remplace(maChaine, "á" ,"á")
maChaine = Remplace(maChaine, "â" ,"â")
maChaine = Remplace(maChaine, "ã" ,"ã")
maChaine = Remplace(maChaine, "ä" ,"ä")
maChaine = Remplace(maChaine, "å" ,"å")
maChaine = Remplace(maChaine, "æ" ,"æ")
maChaine = Remplace(maChaine, "ç" ,"ç")
maChaine = Remplace(maChaine, "è" ,"è")
maChaine = Remplace(maChaine, "é" ,"é")
maChaine = Remplace(maChaine, "ê" ,"ê")
maChaine = Remplace(maChaine, "ë" ,"ë")
maChaine = Remplace(maChaine, "ì" ,"ì")
maChaine = Remplace(maChaine, "í" ,"í")
maChaine = Remplace(maChaine, "î" ,"î")
maChaine = Remplace(maChaine, "ï" ,"ï")
maChaine = Remplace(maChaine, "ð" ,"ð")
maChaine = Remplace(maChaine, "ñ" ,"ñ")
maChaine = Remplace(maChaine, "ò" ,"ò")
maChaine = Remplace(maChaine, "ó" ,"ó")
maChaine = Remplace(maChaine, "ô" ,"ô")
maChaine = Remplace(maChaine, "õ" ,"õ")
maChaine = Remplace(maChaine, "ö" ,"ö")
maChaine = Remplace(maChaine, "÷" ,"÷")
maChaine = Remplace(maChaine, "ø" ,"ø")
maChaine = Remplace(maChaine, "ù" ,"ù")
maChaine = Remplace(maChaine, "ú" ,"ú")
maChaine = Remplace(maChaine, "û" ,"û")
maChaine = Remplace(maChaine, "ü" ,"ü")
maChaine = Remplace(maChaine, "ý" ,"ý")
maChaine = Remplace(maChaine, "þ" ,"þ")
RENVOYER maChaine
oui si ce n'est que les code & sont transformé à l'affichage de la page
// Résumé : <indiquez ici ce que fait la procédure>
// Syntaxe :
//[ <Résultat> = ] MailJet_Caracteres_speciaux ( [<sMaChaineHtml> est chaîne UNICODE [, <sMaChaineHtmlANSI> est chaîne]])
//
// Paramètres :
// sMaChaineHtml (chaîne UNICODE - valeur par défaut="") : <indiquez ici le rôle de sMaChaineHtml>
// sMaChaineHtmlANSI (chaîne ANSI - valeur par défaut="") : <indiquez ici le rôle de sMaChaineHtmlANSI>
// Valeur de retour :
// chaîne UNICODE : // Aucune
//
// Exemple :
// Indiquez ici un exemple d'utilisation.
//
PROCEDURE MailJet_Caracteres_speciaux(sMaChaineHtml est une chaîne UNICODE= "", sMaChaineHtmlANSI est une chaîne ANSI= "")
maChaine est une chaîne UNICODE
SI sMaChaineHtml <> "" ALORS
maChaine= sMaChaineHtml
SINON
maChaine = AnsiVersUnicode(sMaChaineHtmlANSI)
FIN
maChaine = Remplace(maChaine,"“", " & ldquo;")
maChaine = Remplace(maChaine,"”", " & rdquo;")
maChaine = Remplace(maChaine,"„", " & bdquo;")
maChaine = Remplace(maChaine,"'", " & apos; ")
maChaine = Remplace(maChaine,"‘", " & lsquo;")
maChaine = Remplace(maChaine,"’", " & rsquo;")
maChaine = Remplace(maChaine,"‚", " & sbquo;")
maChaine = Remplace(maChaine,"’"," & apos;" )
maChaine = Remplace(maChaine,"'"," & apos;" )
maChaine = Remplace(maChaine,"€"," & euro;" )
//maChaine = Remplace(maChaine,"<"," & lt;" )
//maChaine = Remplace(maChaine,">"," & gt;" )
maChaine = Remplace(maChaine,"œ"," & oelig;" )
maChaine = Remplace(maChaine,"À"," & Agrave;" )
maChaine = Remplace(maChaine,"Â"," & Acirc;" )
maChaine = Remplace(maChaine,"Ã"," & Atilde;" )
maChaine = Remplace(maChaine,"Ä"," & Auml;" )
maChaine = Remplace(maChaine,"Å"," & Aring;" )
maChaine = Remplace(maChaine,"Ç"," & Ccedil;" )
maChaine = Remplace(maChaine,"È"," & Egrave;" )
maChaine = Remplace(maChaine,"É"," & Eacute;" )
maChaine = Remplace(maChaine,"Ê"," & Ecirc;" )
maChaine = Remplace(maChaine,"Ë"," & Euml;" )
maChaine = Remplace(maChaine,"Ì"," & Igrave;" )
maChaine = Remplace(maChaine,"Î"," & Icirc;" )
maChaine = Remplace(maChaine,"Ñ"," & Ntilde;" )
maChaine = Remplace(maChaine,"Ò"," & Ograve;" )
maChaine = Remplace(maChaine,"Ó"," & Oacute;" )
maChaine = Remplace(maChaine,"Ô"," & Ocirc;" )
maChaine = Remplace(maChaine,"Õ"," & Otilde;" )
maChaine = Remplace(maChaine,"Ö"," & Ouml;" )
maChaine = Remplace(maChaine,"×"," & times;" )
maChaine = Remplace(maChaine,"Ø"," & Oslash;" )
maChaine = Remplace(maChaine,"Ù"," & Ugrave;" )
maChaine = Remplace(maChaine,"Ú"," & Uacute;" )
maChaine = Remplace(maChaine,"Û"," & Ucirc;" )
maChaine = Remplace(maChaine,"Ü"," & Uuml;" )
maChaine = Remplace(maChaine,"þ"," & thorn;" )
maChaine = Remplace(maChaine,"ß"," & szlig;" )
maChaine = Remplace(maChaine, "Ÿ" ," & Yuml;")
maChaine = Remplace(maChaine, "¢" ," & cent;")
maChaine = Remplace(maChaine, "£" ," & pound;")
maChaine = Remplace(maChaine, "¤" ," & curren;")
maChaine = Remplace(maChaine, "¥" ," & yen;")
maChaine = Remplace(maChaine, "¦" ," & brvbar;")
maChaine = Remplace(maChaine, "§" ," & sect;")
maChaine = Remplace(maChaine, "¨" ," & uml;")
maChaine = Remplace(maChaine, "©" ," & copy;")
maChaine = Remplace(maChaine, "ª" ," & ordf;")
maChaine = Remplace(maChaine, "«" ," & laquo;")
maChaine = Remplace(maChaine, "¬" ," & not;")
maChaine = Remplace(maChaine, "" ," & shy;")
maChaine = Remplace(maChaine, "®" ," & reg;")
maChaine = Remplace(maChaine, "°" ," & deg;")
maChaine = Remplace(maChaine, "±" ," & plusmn;")
maChaine = Remplace(maChaine, "²" ," & sup2;")
maChaine = Remplace(maChaine, "³" ," & sup3;")
maChaine = Remplace(maChaine, "´" ," & acute;")
maChaine = Remplace(maChaine, "µ" ," & micro;")
maChaine = Remplace(maChaine, "¶" ," & para;")
maChaine = Remplace(maChaine, "·" ," & middot;")
maChaine = Remplace(maChaine, "¸" ," & cedil;")
maChaine = Remplace(maChaine, "¹" ," & sup1;")
maChaine = Remplace(maChaine, "º" ," & ordm;")
maChaine = Remplace(maChaine, "»" ," & raquo;")
maChaine = Remplace(maChaine, "¼" ," & frac14;")
maChaine = Remplace(maChaine, "½" ," & frac12;")
maChaine = Remplace(maChaine, "¾" ," & frac34;")
maChaine = Remplace(maChaine, "¿" ," & iquest;")
maChaine = Remplace(maChaine, "Á" ," & Aacute;")
maChaine = Remplace(maChaine, "Í" ," & Iacute;")
maChaine = Remplace(maChaine, "Ý" ," & Yacute;")
maChaine = Remplace(maChaine, "à" ," & agrave;")
maChaine = Remplace(maChaine, "á" ," & aacute;")
maChaine = Remplace(maChaine, "â" ," & acirc;")
maChaine = Remplace(maChaine, "ã" ," & atilde;")
maChaine = Remplace(maChaine, "ä" ," & auml;")
maChaine = Remplace(maChaine, "å" ," & aring;")
maChaine = Remplace(maChaine, "æ" ," & aelig;")
maChaine = Remplace(maChaine, "ç" ," & ccedil;")
maChaine = Remplace(maChaine, "è" ," & egrave;")
maChaine = Remplace(maChaine, "é" ," & eacute;")
maChaine = Remplace(maChaine, "ê" ," & ecirc;")
maChaine = Remplace(maChaine, "ë" ," & euml;")
maChaine = Remplace(maChaine, "ì" ," & igrave;")
maChaine = Remplace(maChaine, "í" ," & iacute;")
maChaine = Remplace(maChaine, "î" ," & icirc;")
maChaine = Remplace(maChaine, "ï" ," & iuml;")
maChaine = Remplace(maChaine, "ð" ," & eth;")
maChaine = Remplace(maChaine, "ñ" ," & ntilde;")
maChaine = Remplace(maChaine, "ò" ," & ograve;")
maChaine = Remplace(maChaine, "ó" ," & oacute;")
maChaine = Remplace(maChaine, "ô" ," & ocirc;")
maChaine = Remplace(maChaine, "õ" ," & otilde;")
maChaine = Remplace(maChaine, "ö" ," & ouml;")
maChaine = Remplace(maChaine, "÷" ," & divide;")
maChaine = Remplace(maChaine, "ø" ," & oslash;")
maChaine = Remplace(maChaine, "ù" ," & ugrave;")
maChaine = Remplace(maChaine, "ú" ," & uacute;")
maChaine = Remplace(maChaine, "û" ," & ucirc;")
maChaine = Remplace(maChaine, "ü" ," & uuml;")
maChaine = Remplace(maChaine, "ý" ," & yacute;")
maChaine = Remplace(maChaine, "þ" ," & thorn;")
RENVOYER maChaine
donc il faut remplacer ''' & ''' par '''& '''
ou encore
// Résumé :
// Syntaxe :
//[ = ] Utf8caractere ()
//
// Paramètres :
// Chaineatransformer :
// Valeur de retour :
// Type indéterminé : // Aucune
//
// Exemple :
// Indiquez ici un exemple d'utilisation.
//
PROCEDURE Utf8caractere(Chaineatransformer)
Chaineatransformer = Remplace(Chaineatransformer,"À" , "À") //capital a, grave accent
Chaineatransformer = Remplace(Chaineatransformer,"Á" , "Á") //capital a, acute accent
Chaineatransformer = Remplace(Chaineatransformer,"Â" , "Â") //capital a, circumflex accent
Chaineatransformer = Remplace(Chaineatransformer,"Ã" , "Ã") //capital a, tilde
Chaineatransformer = Remplace(Chaineatransformer,"Ä" , "Ä") //capital a, umlaut mark
Chaineatransformer = Remplace(Chaineatransformer,"Å" , "Å") //capital a, ring
Chaineatransformer = Remplace(Chaineatransformer,"Æ" , "Æ") //capital ae
Chaineatransformer = Remplace(Chaineatransformer,"Ç" , "Ç") //capital c, cedilla
Chaineatransformer = Remplace(Chaineatransformer,"È" , "È") //capital e, grave accent
Chaineatransformer = Remplace(Chaineatransformer,"É" , "É") //capital e, acute accent
Chaineatransformer = Remplace(Chaineatransformer,"Ê" , "Ê") //capital e, circumflex accent
Chaineatransformer = Remplace(Chaineatransformer,"Ë" , "Ë") //capital e, umlaut mark
Chaineatransformer = Remplace(Chaineatransformer,"Ì" , "Ì") //capital i, grave accent
Chaineatransformer = Remplace(Chaineatransformer,"Í" , "Í") //capital i, acute accent
Chaineatransformer = Remplace(Chaineatransformer,"Î" , "Î") //capital i, circumflex accent
Chaineatransformer = Remplace(Chaineatransformer,"Ï" , "Ï") //capital i, umlaut mark
Chaineatransformer = Remplace(Chaineatransformer,"Ð" , "Ð") //capital eth, Icelandic
Chaineatransformer = Remplace(Chaineatransformer,"Ñ" , "Ñ") //capital n, tilde
Chaineatransformer = Remplace(Chaineatransformer,"Ò" , "Ò") //capital o, grave accent
Chaineatransformer = Remplace(Chaineatransformer,"Ó" , "Ó") //capital o, acute accent
Chaineatransformer = Remplace(Chaineatransformer,"Ô" , "Ô") //capital o, circumflex accent
Chaineatransformer = Remplace(Chaineatransformer,"Õ" , "Õ") //capital o, tilde
Chaineatransformer = Remplace(Chaineatransformer,"Ö" , "Ö") //capital o, umlaut mark
Chaineatransformer = Remplace(Chaineatransformer,"Ø" , "Ø") //capital o, slash
Chaineatransformer = Remplace(Chaineatransformer,"Ù" , "Ù") //capital u, grave accent
Chaineatransformer = Remplace(Chaineatransformer,"Ú" , "Ú") //capital u, acute accent
Chaineatransformer = Remplace(Chaineatransformer,"Û" , "Û") //capital u, circumflex accent
Chaineatransformer = Remplace(Chaineatransformer,"Ü" , "Ü") //capital u, umlaut mark
Chaineatransformer = Remplace(Chaineatransformer,"Ý" , "Ý") //capital y, acute accent
Chaineatransformer = Remplace(Chaineatransformer,"Þ" , "Þ") //capital THORN, Icelandic
Chaineatransformer = Remplace(Chaineatransformer,"ß" , "ß") //small sharp s, German
Chaineatransformer = Remplace(Chaineatransformer,"à" , "à") //small a, grave accent
Chaineatransformer = Remplace(Chaineatransformer,"á" , "á") //small a, acute accent
Chaineatransformer = Remplace(Chaineatransformer,"â" , "â") //small a, circumflex accent
Chaineatransformer = Remplace(Chaineatransformer,"ã" , "ã") //small a, tilde
Chaineatransformer = Remplace(Chaineatransformer,"ä" , "ä") //small a, umlaut mark
Chaineatransformer = Remplace(Chaineatransformer,"å" , "å") //small a, ring
Chaineatransformer = Remplace(Chaineatransformer,"æ" , "æ") //small ae
Chaineatransformer = Remplace(Chaineatransformer,"ç" , "ç") //small c, cedilla
Chaineatransformer = Remplace(Chaineatransformer,"è" , "è") //small e, grave accent
Chaineatransformer = Remplace(Chaineatransformer,"é" , "é") //small e, acute accent
Chaineatransformer = Remplace(Chaineatransformer,"ê" , "ê") //small e, circumflex accent
Chaineatransformer = Remplace(Chaineatransformer,"ë" , "ë") //small e, umlaut mark
Chaineatransformer = Remplace(Chaineatransformer,"ì" , "ì") //small i, grave accent
Chaineatransformer = Remplace(Chaineatransformer,"í" , "í") //small i, acute accent
Chaineatransformer = Remplace(Chaineatransformer,"î" , "î") //small i, circumflex accent
Chaineatransformer = Remplace(Chaineatransformer,"ï" , "ï") //small i, umlaut mark
Chaineatransformer = Remplace(Chaineatransformer,"ð" , "ð") //small eth, Icelandic
Chaineatransformer = Remplace(Chaineatransformer,"ñ" , "ñ") //small n, tilde
Chaineatransformer = Remplace(Chaineatransformer,"ò" , "ò") //small o, grave accent
Chaineatransformer = Remplace(Chaineatransformer,"ó" , "ó") //small o, acute accent
Chaineatransformer = Remplace(Chaineatransformer,"ô" , "ô") //small o, circumflex accent
Chaineatransformer = Remplace(Chaineatransformer,"õ" , "õ") //small o, tilde
Chaineatransformer = Remplace(Chaineatransformer,"ö" , "ö") //small o, umlaut mark
Chaineatransformer = Remplace(Chaineatransformer,"ø" , "ø") //small o, slash
Chaineatransformer = Remplace(Chaineatransformer,"ù" , "ù") //small u, grave accent
Chaineatransformer = Remplace(Chaineatransformer,"ú" , "ú") //small u, acute accent
Chaineatransformer = Remplace(Chaineatransformer,"û" , "û") //small u, circumflex accent
Chaineatransformer = Remplace(Chaineatransformer,"ü" , "ü") //small u, umlaut mark
Chaineatransformer = Remplace(Chaineatransformer,"ý" , "ý") //small y, acute accent
Chaineatransformer = Remplace(Chaineatransformer,"þ" , "þ") //small thorn, Icelandic
Chaineatransformer = Remplace(Chaineatransformer,"ÿ" , "ÿ") //small y, umlaut mark"À" , "À") //capital a, grave accent
Chaineatransformer = Remplace(Chaineatransformer,"Á" , "Á") //capital a, acute accent
Chaineatransformer = Remplace(Chaineatransformer,"Â" , "Â") //capital a, circumflex accent
Chaineatransformer = Remplace(Chaineatransformer,"Ã" , "Ã") //capital a, tilde
Chaineatransformer = Remplace(Chaineatransformer,"Ä" , "Ä") //capital a, umlaut mark
Chaineatransformer = Remplace(Chaineatransformer,"Å" , "Å") //capital a, ring
Chaineatransformer = Remplace(Chaineatransformer,"Æ" , "Æ") //capital ae
Chaineatransformer = Remplace(Chaineatransformer,"Ç" , "Ç") //capital c, cedilla
Chaineatransformer = Remplace(Chaineatransformer,"È" , "È") //capital e, grave accent
Chaineatransformer = Remplace(Chaineatransformer,"É" , "É") //capital e, acute accent
Chaineatransformer = Remplace(Chaineatransformer,"Ê" , "Ê") //capital e, circumflex accent
Chaineatransformer = Remplace(Chaineatransformer,"Ë" , "Ë") //capital e, umlaut mark
Chaineatransformer = Remplace(Chaineatransformer,"Ì" , "Ì") //capital i, grave accent
Chaineatransformer = Remplace(Chaineatransformer,"Í" , "Í") //capital i, acute accent
Chaineatransformer = Remplace(Chaineatransformer,"Î" , "Î") //capital i, circumflex accent
Chaineatransformer = Remplace(Chaineatransformer,"Ï" , "Ï") //capital i, umlaut mark
Chaineatransformer = Remplace(Chaineatransformer,"Ð" , "Ð") //capital eth, Icelandic
Chaineatransformer = Remplace(Chaineatransformer,"Ñ" , "Ñ") //capital n, tilde
Chaineatransformer = Remplace(Chaineatransformer,"Ò" , "Ò") //capital o, grave accent
Chaineatransformer = Remplace(Chaineatransformer,"Ó" , "Ó") //capital o, acute accent
Chaineatransformer = Remplace(Chaineatransformer,"Ô" , "Ô") //capital o, circumflex accent
Chaineatransformer = Remplace(Chaineatransformer,"Õ" , "Õ") //capital o, tilde
Chaineatransformer = Remplace(Chaineatransformer,"Ö" , "Ö") //capital o, umlaut mark
Chaineatransformer = Remplace(Chaineatransformer,"Ø" , "Ø") //capital o, slash
Chaineatransformer = Remplace(Chaineatransformer,"Ù" , "Ù") //capital u, grave accent
Chaineatransformer = Remplace(Chaineatransformer,"Ú" , "Ú") //capital u, acute accent
Chaineatransformer = Remplace(Chaineatransformer,"Û" , "Û") //capital u, circumflex accent
Chaineatransformer = Remplace(Chaineatransformer,"Ü" , "Ü") //capital u, umlaut mark
Chaineatransformer = Remplace(Chaineatransformer,"Ý" , "Ý") //capital y, acute accent
Chaineatransformer = Remplace(Chaineatransformer,"Þ" , "Þ") //capital THORN, Icelandic
Chaineatransformer = Remplace(Chaineatransformer,"ß" , "ß") //small sharp s, German
Chaineatransformer = Remplace(Chaineatransformer,"à" , "à") //small a, grave accent
Chaineatransformer = Remplace(Chaineatransformer,"á" , "á") //small a, acute accent
Chaineatransformer = Remplace(Chaineatransformer,"â" , "â") //small a, circumflex accent
Chaineatransformer = Remplace(Chaineatransformer,"ã" , "ã") //small a, tilde
Chaineatransformer = Remplace(Chaineatransformer,"ä" , "ä") //small a, umlaut mark
Chaineatransformer = Remplace(Chaineatransformer,"å" , "å") //small a, ring
Chaineatransformer = Remplace(Chaineatransformer,"æ" , "æ") //small ae
Chaineatransformer = Remplace(Chaineatransformer,"ç" , "ç") //small c, cedilla
Chaineatransformer = Remplace(Chaineatransformer,"è" , "è") //small e, grave accent
Chaineatransformer = Remplace(Chaineatransformer,"é" , "é") //small e, acute accent
Chaineatransformer = Remplace(Chaineatransformer,"ê" , "ê") //small e, circumflex accent
Chaineatransformer = Remplace(Chaineatransformer,"ë" , "ë") //small e, umlaut mark
Chaineatransformer = Remplace(Chaineatransformer,"ì" , "ì") //small i, grave accent
Chaineatransformer = Remplace(Chaineatransformer,"í" , "í") //small i, acute accent
Chaineatransformer = Remplace(Chaineatransformer,"î" , "î") //small i, circumflex accent
Chaineatransformer = Remplace(Chaineatransformer,"ï" , "ï") //small i, umlaut mark
Chaineatransformer = Remplace(Chaineatransformer,"ð" , "ð") //small eth, Icelandic
Chaineatransformer = Remplace(Chaineatransformer,"ñ" , "ñ") //small n, tilde
Chaineatransformer = Remplace(Chaineatransformer,"ò" , "ò") //small o, grave accent
Chaineatransformer = Remplace(Chaineatransformer,"ó" , "ó") //small o, acute accent
Chaineatransformer = Remplace(Chaineatransformer,"ô" , "ô") //small o, circumflex accent
Chaineatransformer = Remplace(Chaineatransformer,"õ" , "õ") //small o, tilde
Chaineatransformer = Remplace(Chaineatransformer,"ö" , "ö") //small o, umlaut mark
Chaineatransformer = Remplace(Chaineatransformer,"ø" , "ø") //small o, slash
Chaineatransformer = Remplace(Chaineatransformer,"ù" , "ù") //small u, grave accent
Chaineatransformer = Remplace(Chaineatransformer,"ú" , "ú") //small u, acute accent
Chaineatransformer = Remplace(Chaineatransformer,"û" , "û") //small u, circumflex accent
Chaineatransformer = Remplace(Chaineatransformer,"ü" , "ü") //small u, umlaut mark
Chaineatransformer = Remplace(Chaineatransformer,"ý" , "ý") //small y, acute accent
Chaineatransformer = Remplace(Chaineatransformer,"þ" , "þ") //small thorn, Icelandic
Chaineatransformer = Remplace(Chaineatransformer,"ÿ" , "ÿ") //small y, umlaut mark
RENVOYER Chaineatransformer
oui si ce n'est que les code | sont ransformés dans l'affichage de la page ...
// Résumé : <indiquez ici ce que fait la procédure>
// Syntaxe :
//[ <Résultat> = ] Utf8caractere (<Chaineatransformer>)
//
// Paramètres :
// Chaineatransformer : <indiquez ici le rôle de Chaineatransformer>
// Valeur de retour :
// Type indéterminé : // Aucune
//
// Exemple :
// Indiquez ici un exemple d'utilisation.
//
PROCEDURE Utf8caractere(Chaineatransformer)
Chaineatransformer = Remplace(Chaineatransformer,"À" , " & Agrave") //capital a, grave accent
Chaineatransformer = Remplace(Chaineatransformer,"Á" , " & Aacute") //capital a, acute accent
Chaineatransformer = Remplace(Chaineatransformer,"Â" , " & Acirc") //capital a, circumflex accent
Chaineatransformer = Remplace(Chaineatransformer,"Ã" , " & Atilde") //capital a, tilde
Chaineatransformer = Remplace(Chaineatransformer,"Ä" , " & Auml") //capital a, umlaut mark
Chaineatransformer = Remplace(Chaineatransformer,"Å" , " & Aring") //capital a, ring
Chaineatransformer = Remplace(Chaineatransformer,"Æ" , " & AElig") //capital ae
Chaineatransformer = Remplace(Chaineatransformer,"Ç" , " & Ccedil") //capital c, cedilla
Chaineatransformer = Remplace(Chaineatransformer,"È" , " & Egrave") //capital e, grave accent
Chaineatransformer = Remplace(Chaineatransformer,"É" , " & Eacute") //capital e, acute accent
Chaineatransformer = Remplace(Chaineatransformer,"Ê" , " & Ecirc") //capital e, circumflex accent
Chaineatransformer = Remplace(Chaineatransformer,"Ë" , " & Euml") //capital e, umlaut mark
Chaineatransformer = Remplace(Chaineatransformer,"Ì" , " & Igrave") //capital i, grave accent
Chaineatransformer = Remplace(Chaineatransformer,"Í" , " & Iacute") //capital i, acute accent
Chaineatransformer = Remplace(Chaineatransformer,"Î" , " & Icirc") //capital i, circumflex accent
Chaineatransformer = Remplace(Chaineatransformer,"Ï" , " & Iuml") //capital i, umlaut mark
Chaineatransformer = Remplace(Chaineatransformer,"Ð" , " & ETH") //capital eth, Icelandic
Chaineatransformer = Remplace(Chaineatransformer,"Ñ" , " & Ntilde") //capital n, tilde
Chaineatransformer = Remplace(Chaineatransformer,"Ò" , " & Ograve") //capital o, grave accent
Chaineatransformer = Remplace(Chaineatransformer,"Ó" , " & Oacute") //capital o, acute accent
Chaineatransformer = Remplace(Chaineatransformer,"Ô" , " & Ocirc") //capital o, circumflex accent
Chaineatransformer = Remplace(Chaineatransformer,"Õ" , " & Otilde") //capital o, tilde
Chaineatransformer = Remplace(Chaineatransformer,"Ö" , " & Ouml") //capital o, umlaut mark
Chaineatransformer = Remplace(Chaineatransformer,"Ø" , " & Oslash") //capital o, slash
Chaineatransformer = Remplace(Chaineatransformer,"Ù" , " & Ugrave") //capital u, grave accent
Chaineatransformer = Remplace(Chaineatransformer,"Ú" , " & Uacute") //capital u, acute accent
Chaineatransformer = Remplace(Chaineatransformer,"Û" , " & Ucirc") //capital u, circumflex accent
Chaineatransformer = Remplace(Chaineatransformer,"Ü" , " & Uuml") //capital u, umlaut mark
Chaineatransformer = Remplace(Chaineatransformer,"Ý" , " & Yacute") //capital y, acute accent
Chaineatransformer = Remplace(Chaineatransformer,"Þ" , " & THORN") //capital THORN, Icelandic
Chaineatransformer = Remplace(Chaineatransformer,"ß" , " & szlig") //small sharp s, German
Chaineatransformer = Remplace(Chaineatransformer,"à" , " & agrave") //small a, grave accent
Chaineatransformer = Remplace(Chaineatransformer,"á" , " & aacute") //small a, acute accent
Chaineatransformer = Remplace(Chaineatransformer,"â" , " & acirc") //small a, circumflex accent
Chaineatransformer = Remplace(Chaineatransformer,"ã" , " & atilde") //small a, tilde
Chaineatransformer = Remplace(Chaineatransformer,"ä" , " & auml") //small a, umlaut mark
Chaineatransformer = Remplace(Chaineatransformer,"å" , " & aring") //small a, ring
Chaineatransformer = Remplace(Chaineatransformer,"æ" , " & aelig") //small ae
Chaineatransformer = Remplace(Chaineatransformer,"ç" , " & ccedil") //small c, cedilla
Chaineatransformer = Remplace(Chaineatransformer,"è" , " & egrave") //small e, grave accent
Chaineatransformer = Remplace(Chaineatransformer,"é" , " & eacute") //small e, acute accent
Chaineatransformer = Remplace(Chaineatransformer,"ê" , " & ecirc") //small e, circumflex accent
Chaineatransformer = Remplace(Chaineatransformer,"ë" , " & euml") //small e, umlaut mark
Chaineatransformer = Remplace(Chaineatransformer,"ì" , " & igrave") //small i, grave accent
Chaineatransformer = Remplace(Chaineatransformer,"í" , " & iacute") //small i, acute accent
Chaineatransformer = Remplace(Chaineatransformer,"î" , " & icirc") //small i, circumflex accent
Chaineatransformer = Remplace(Chaineatransformer,"ï" , " & iuml") //small i, umlaut mark
Chaineatransformer = Remplace(Chaineatransformer,"ð" , " & eth") //small eth, Icelandic
Chaineatransformer = Remplace(Chaineatransformer,"ñ" , " & ntilde") //small n, tilde
Chaineatransformer = Remplace(Chaineatransformer,"ò" , " & ograve") //small o, grave accent
Chaineatransformer = Remplace(Chaineatransformer,"ó" , " & oacute") //small o, acute accent
Chaineatransformer = Remplace(Chaineatransformer,"ô" , " & ocirc") //small o, circumflex accent
Chaineatransformer = Remplace(Chaineatransformer,"õ" , " & otilde") //small o, tilde
Chaineatransformer = Remplace(Chaineatransformer,"ö" , " & ouml") //small o, umlaut mark
Chaineatransformer = Remplace(Chaineatransformer,"ø" , " & oslash") //small o, slash
Chaineatransformer = Remplace(Chaineatransformer,"ù" , " & ugrave") //small u, grave accent
Chaineatransformer = Remplace(Chaineatransformer,"ú" , " & uacute") //small u, acute accent
Chaineatransformer = Remplace(Chaineatransformer,"û" , " & ucirc") //small u, circumflex accent
Chaineatransformer = Remplace(Chaineatransformer,"ü" , " & uuml") //small u, umlaut mark
Chaineatransformer = Remplace(Chaineatransformer,"ý" , " & yacute") //small y, acute accent
Chaineatransformer = Remplace(Chaineatransformer,"þ" , " & thorn") //small thorn, Icelandic
Chaineatransformer = Remplace(Chaineatransformer,"ÿ" , " & yuml") //small y, umlaut mark"À" , " & Agrave") //capital a, grave accent
Chaineatransformer = Remplace(Chaineatransformer,"Á" , " & Aacute") //capital a, acute accent
Chaineatransformer = Remplace(Chaineatransformer,"Â" , " & Acirc") //capital a, circumflex accent
Chaineatransformer = Remplace(Chaineatransformer,"Ã" , " & Atilde") //capital a, tilde
Chaineatransformer = Remplace(Chaineatransformer,"Ä" , " & Auml") //capital a, umlaut mark
Chaineatransformer = Remplace(Chaineatransformer,"Å" , " & Aring") //capital a, ring
Chaineatransformer = Remplace(Chaineatransformer,"Æ" , " & AElig") //capital ae
Chaineatransformer = Remplace(Chaineatransformer,"Ç" , " & Ccedil") //capital c, cedilla
Chaineatransformer = Remplace(Chaineatransformer,"È" , " & Egrave") //capital e, grave accent
Chaineatransformer = Remplace(Chaineatransformer,"É" , " & Eacute") //capital e, acute accent
Chaineatransformer = Remplace(Chaineatransformer,"Ê" , " & Ecirc") //capital e, circumflex accent
Chaineatransformer = Remplace(Chaineatransformer,"Ë" , " & Euml") //capital e, umlaut mark
Chaineatransformer = Remplace(Chaineatransformer,"Ì" , " & Igrave") //capital i, grave accent
Chaineatransformer = Remplace(Chaineatransformer,"Í" , " & Iacute") //capital i, acute accent
Chaineatransformer = Remplace(Chaineatransformer,"Î" , " & Icirc") //capital i, circumflex accent
Chaineatransformer = Remplace(Chaineatransformer,"Ï" , " & Iuml") //capital i, umlaut mark
Chaineatransformer = Remplace(Chaineatransformer,"Ð" , " & ETH") //capital eth, Icelandic
Chaineatransformer = Remplace(Chaineatransformer,"Ñ" , " & Ntilde") //capital n, tilde
Chaineatransformer = Remplace(Chaineatransformer,"Ò" , " & Ograve") //capital o, grave accent
Chaineatransformer = Remplace(Chaineatransformer,"Ó" , " & Oacute") //capital o, acute accent
Chaineatransformer = Remplace(Chaineatransformer,"Ô" , " & Ocirc") //capital o, circumflex accent
Chaineatransformer = Remplace(Chaineatransformer,"Õ" , " & Otilde") //capital o, tilde
Chaineatransformer = Remplace(Chaineatransformer,"Ö" , " & Ouml") //capital o, umlaut mark
Chaineatransformer = Remplace(Chaineatransformer,"Ø" , " & Oslash") //capital o, slash
Chaineatransformer = Remplace(Chaineatransformer,"Ù" , " & Ugrave") //capital u, grave accent
Chaineatransformer = Remplace(Chaineatransformer,"Ú" , " & Uacute") //capital u, acute accent
Chaineatransformer = Remplace(Chaineatransformer,"Û" , " & Ucirc") //capital u, circumflex accent
Chaineatransformer = Remplace(Chaineatransformer,"Ü" , " & Uuml") //capital u, umlaut mark
Chaineatransformer = Remplace(Chaineatransformer,"Ý" , " & Yacute") //capital y, acute accent
Chaineatransformer = Remplace(Chaineatransformer,"Þ" , " & THORN") //capital THORN, Icelandic
Chaineatransformer = Remplace(Chaineatransformer,"ß" , " & szlig") //small sharp s, German
Chaineatransformer = Remplace(Chaineatransformer,"à" , " & agrave") //small a, grave accent
Chaineatransformer = Remplace(Chaineatransformer,"á" , " & aacute") //small a, acute accent
Chaineatransformer = Remplace(Chaineatransformer,"â" , " & acirc") //small a, circumflex accent
Chaineatransformer = Remplace(Chaineatransformer,"ã" , " & atilde") //small a, tilde
Chaineatransformer = Remplace(Chaineatransformer,"ä" , " & auml") //small a, umlaut mark
Chaineatransformer = Remplace(Chaineatransformer,"å" , " & aring") //small a, ring
Chaineatransformer = Remplace(Chaineatransformer,"æ" , " & aelig") //small ae
Chaineatransformer = Remplace(Chaineatransformer,"ç" , " & ccedil") //small c, cedilla
Chaineatransformer = Remplace(Chaineatransformer,"è" , " & egrave") //small e, grave accent
Chaineatransformer = Remplace(Chaineatransformer,"é" , " & eacute") //small e, acute accent
Chaineatransformer = Remplace(Chaineatransformer,"ê" , " & ecirc") //small e, circumflex accent
Chaineatransformer = Remplace(Chaineatransformer,"ë" , " & euml") //small e, umlaut mark
Chaineatransformer = Remplace(Chaineatransformer,"ì" , " & igrave") //small i, grave accent
Chaineatransformer = Remplace(Chaineatransformer,"í" , " & iacute") //small i, acute accent
Chaineatransformer = Remplace(Chaineatransformer,"î" , " & icirc") //small i, circumflex accent
Chaineatransformer = Remplace(Chaineatransformer,"ï" , " & iuml") //small i, umlaut mark
Chaineatransformer = Remplace(Chaineatransformer,"ð" , " & eth") //small eth, Icelandic
Chaineatransformer = Remplace(Chaineatransformer,"ñ" , " & ntilde") //small n, tilde
Chaineatransformer = Remplace(Chaineatransformer,"ò" , " & ograve") //small o, grave accent
Chaineatransformer = Remplace(Chaineatransformer,"ó" , " & oacute") //small o, acute accent
Chaineatransformer = Remplace(Chaineatransformer,"ô" , " & ocirc") //small o, circumflex accent
Chaineatransformer = Remplace(Chaineatransformer,"õ" , " & otilde") //small o, tilde
Chaineatransformer = Remplace(Chaineatransformer,"ö" , " & ouml") //small o, umlaut mark
Chaineatransformer = Remplace(Chaineatransformer,"ø" , " & oslash") //small o, slash
Chaineatransformer = Remplace(Chaineatransformer,"ù" , " & ugrave") //small u, grave accent
Chaineatransformer = Remplace(Chaineatransformer,"ú" , " & uacute") //small u, acute accent
Chaineatransformer = Remplace(Chaineatransformer,"û" , " & ucirc") //small u, circumflex accent
Chaineatransformer = Remplace(Chaineatransformer,"ü" , " & uuml") //small u, umlaut mark
Chaineatransformer = Remplace(Chaineatransformer,"ý" , " & yacute") //small y, acute accent
Chaineatransformer = Remplace(Chaineatransformer,"þ" , " & thorn") //small thorn, Icelandic
Chaineatransformer = Remplace(Chaineatransformer,"ÿ" , " & yuml") //small y, umlaut mark
RENVOYER Chaineatransformer
le ''' & ''' est a remplacer par '''&'''
--
Bertin CARRIERE - SPRL RGPD.Zen-Project.be
bertin.carriere@gmail.com
http://www.zen-project.be http://www.linkedin.com/in/bertincarriere
Belgique +32(0)2/318.02.67
France +33(0)3/66.722.542
Espagne +34.5/12.702.266
http://www.be-dev.beMessage modifié, 12 février 2020 - 11:43 |
| |
| |
| | | |
|
| | |
| |
Posté le 09 avril 2020 - 15:18 |
Bonjour,
j'utilise la fonction standard
chaine_correcte=UTF8VersChaîne(chaine_bisard, alphabetAnsi)
La doc indique plusieurs possibilités de transformations
Cordialement. |
| |
| |
| | | |
|
| | | | |
| | |
|