Les Snippets

Nouveaux snippets
Snippets les plus consultés
Proposer un snippet

 Abonnez vous à ce fil d'information Les rss

Rechercher :

Par langages :

Par Catégorie

Compteurs


Nombre de sujets : 551
Nombre de snippets : 1692
Connexion

Modifie les caractères spéciaux

Niveau requis pour utiliser/comprendre cette source : 1 ( Débutant )
Créé le 17/05/2006 10:24:01 et initié par danielamaury [Liste]
Date de mise à jour : 27/08/2007 12:35:47
Vue : 16540
Catégorie(s) : Chaîne de caractères, WinForm, WebForm
Langages dispo pour ce code :
- ASP.NET 2.x, VB 2005
- VB6
- VB6, VBA
- ASP.NET 1.x, ASP.NET 2.x, C# 1.x, C# 2.x
- Delphi 5
- Voir tous les langages pour ce code snippet
Proposer ce code dans un autre langage



Langage : VB 2005 , ASP.NET 2.x
Date ajout : 17/05/2006
Posté par danielamaury [Liste]

 Public Shared Function Modifcarracters(ByVal UnMot As String) As String
        UnMot = Replace(UnMot, Chr(138), "S")
        UnMot = Replace(UnMot, Chr(142), "Z")
        UnMot = Replace(UnMot, Chr(158), "z")
        UnMot = Replace(UnMot, Chr(159), "Y")
        UnMot = Replace(UnMot, Chr(192), "A")
        UnMot = Replace(UnMot, Chr(193), "A")
        UnMot = Replace(UnMot, Chr(194), "A")
        UnMot = Replace(UnMot, Chr(195), "A")
        UnMot = Replace(UnMot, Chr(196), "A")
        UnMot = Replace(UnMot, Chr(197), "A")
        UnMot = Replace(UnMot, Chr(200), "E")
        UnMot = Replace(UnMot, Chr(201), "E")
        UnMot = Replace(UnMot, Chr(202), "E")
        UnMot = Replace(UnMot, Chr(203), "E")
        UnMot = Replace(UnMot, Chr(204), "I")
        UnMot = Replace(UnMot, Chr(205), "I")
        UnMot = Replace(UnMot, Chr(206), "I")
        UnMot = Replace(UnMot, Chr(207), "I")
        UnMot = Replace(UnMot, Chr(208), "D")
        UnMot = Replace(UnMot, Chr(209), "N")
        UnMot = Replace(UnMot, Chr(210), "O")
        UnMot = Replace(UnMot, Chr(211), "O")
        UnMot = Replace(UnMot, Chr(212), "O")
        UnMot = Replace(UnMot, Chr(213), "O")
        UnMot = Replace(UnMot, Chr(214), "O")
        UnMot = Replace(UnMot, Chr(217), "U")
        UnMot = Replace(UnMot, Chr(218), "U")
        UnMot = Replace(UnMot, Chr(219), "U")
        UnMot = Replace(UnMot, Chr(220), "U")
        UnMot = Replace(UnMot, Chr(221), "Z")
        UnMot = Replace(UnMot, Chr(224), "a")
        UnMot = Replace(UnMot, Chr(225), "a")
        UnMot = Replace(UnMot, Chr(226), "a")
        UnMot = Replace(UnMot, Chr(227), "a")
        UnMot = Replace(UnMot, Chr(228), "a")
        UnMot = Replace(UnMot, Chr(229), "a")
        UnMot = Replace(UnMot, Chr(231), "c")
        UnMot = Replace(UnMot, Chr(232), "e")
        UnMot = Replace(UnMot, Chr(233), "e")
        UnMot = Replace(UnMot, Chr(234), "e")
        UnMot = Replace(UnMot, Chr(235), "e")
        UnMot = Replace(UnMot, Chr(236), "i")
        UnMot = Replace(UnMot, Chr(237), "i")
        UnMot = Replace(UnMot, Chr(238), "i")
        UnMot = Replace(UnMot, Chr(239), "i")
        UnMot = Replace(UnMot, Chr(241), "n")
        UnMot = Replace(UnMot, Chr(242), "o")
        UnMot = Replace(UnMot, Chr(243), "o")
        UnMot = Replace(UnMot, Chr(244), "o")
        UnMot = Replace(UnMot, Chr(245), "o")
        UnMot = Replace(UnMot, Chr(246), "o")
        UnMot = Replace(UnMot, Chr(249), "u")
        UnMot = Replace(UnMot, Chr(250), "u")
        UnMot = Replace(UnMot, Chr(251), "u")
        UnMot = Replace(UnMot, Chr(252), "u")
        UnMot = Replace(UnMot, Chr(253), "y")
        UnMot = Replace(UnMot, Chr(255), "y")
        Return CStr(UnMot)
End Function
Remarque :
Converti les caractères spéciaux en caractères simple.

Snippets en rapport avec : Caractères, Spéciaux

03/01/2008 - Convertit les caractères spéciaux en entités HTML (HtmlEncore / HtmlSpecialChars)

09/09/2007 - Remplacer des caractères d'une chaine

02/09/2007 - Split selon le nombre max de caractères voulu, en tenant compte des retours chariot et des chaînes non-sécables

15/04/2007 - Supprimer du texte en début ou en fin d'un fichier texte [avec option Par Lignes ou non]

06/02/2007 - Replace de masse, remplacer des chaînes par d'autres en une seule opération

01/06/2006 - Effacer des caractères à partir de la fin



Codes sources en rapport avec : Caractères, Spéciaux

{Javascript / DHTML} CONVERSION TEXTE ACCENTUÉ -> CODE HTML
Etant donné que je n'ai pas trouvé de code qui permettait de me générer un code HTML à partir d'un t...

{Delphi} CONVERTIR LES CODE HTML EN CARACTÈRES SPÉCIAUX
Voici le complément à la source poster par Japee : http://www.delphifr.com/codes/CONVERTIR-CARACTE...

{PHP} CONVERSION DES CARACTÈRES SPÉCIAUX DANS UNE BASE DE DONNÉES MYSQL
Ce script convertit les caractères spéciaux tel que les simple quote ou les accents ... dans tous le...

{Delphi} CONVERTIR LES CARACTÈRES SPÉCIAUX EN CODE HTML [TEXT TO HTML]
Conversion des caractères spéciaux vers leur équivalent en code html. Ce code (simplifié) est ext...

{PHP} GÉNÉRER UNE CHAÎNE ALÉATOIRE SANS BOUCLE NI CRYPTAGE (MD5 OU AUTRE)
Jusqu'à présent tous les générateurs de clé que j'ai trouvé utilisait une boucle ou les fonction sha...

{Delphi} VFONTS : OUTIL DE VISUALISATION DES POLICES CARACTÈRES INSTALLÉES - RECHERCHES, CRÉATION DE SÉLECTION MÉMORISÉES, AIDE COMPLÈTE EN FRANÇAIS.
Ce petit logiciel, sous licence GPL, est destiné à vous aider à choisir certaines polices de caractè...

{C / C++ / C++.NET} [C/WIN32] GÉNÉRATEUR DE CODE POUR UNE INITIALISATION SPÉCIALE DE CHAINE DE CARACTÈRES.
Yop, Voici BNMgenerator, à comprendre BruNews Method Generator. J'espère qu'il me pardonnera ce n...

{PHP} FORMATAGE AUTOMATIQUE D'UN TEXT EN FONCTION DE MOTS CLÉES
Je cherchais depuis quelque temps un script me permettant de souligner, ou mettre en gras certain mo...

{Visual Basic, VB6, VB.NET, VB 2005} LIMITER LA FRAPPE DANS DES ZONES COMBO OU TEXT À DES CHIFFRES
Il s'agit d'une petite mise à jour pour VB.NET des astuces déjà existantes pour VB5 et VB6 qui avaie...

{Visual Basic, VB6, VB.NET, VB 2005} RECHERCHE DE CHAINE DE CARACTÉRES SUR DES FICHIERS .TXT AVEC SÉPARATEURS ENTRE LES CHAMPS, ET AFFICHAGE AVEC ALIGNEMENT DES ZONES.
Ce programme sert à 'RAPIDEMENT' chercher et afficher des lignes d'enregistrements d'un fichier de t...