Vous êtes ici : Forums > Langage SQL > function dans SQL
function dans SQL
Bonjour a tous, Je viens de creer une petite function dans access pour enlever certain caracteres,
Function remplaceAccents(strTrie)
Dim strIllegal, strlegal
' Liste des caracteres illégaux *******************************************************
strIllegal = Array("'", "é", "Á", "Â", "Ã", "Ä", "Å", "Æ", "Ç", "È", "É", "Ê", "Ë", "Ì", "Í", "Î", "Ï", "Ñ", "Ò", "Ó", "Ô", "Õ", "Ö", "Ù", "Ú", "Û", "Ü", "Ý", "à", "á", "â", "ã", "ä", "å", "æ", "ç", "è", "é", "ê", "ë", "ì", "í", "î", "ï", "ð", "ñ", "ò", "ó", "ô", "õ", "ö", "ù", "ú", "û", "ü", "ý", "ÿ")
' Liste des caracteres que nous voulons remplacer *************************************
strlegal = Array("''", "e", "A", "A", "A", "A", "A", "ae", "C", "e", "e", "e", "e", "i", "i", "i", "i", "N", "O", "O", "O", "O", "O", "U", "U", "U", "U", "Y", "a", "a", "a", "a", "a", "a", "ae", "c", "e", "e", "e", "e", "i", "i", "i", "i", "o", "n", "o", "o", "o", "o", "o", "u", "u", "u", "u", "y", "y")
For i = 0 To UBound(strIllegal)
strTrie = Replace(strTrie, strIllegal(i), strlegal(i))
Next
remplaceAccents = strTrie
End Function
bien surs que je fais une requete dans access tout fonctionne
SELECT remplaceAccents([Liste_TAB.Prenom]) AS Prenom, remplaceAccents([Liste_TAB.Nom]) AS Nom
FROM Liste_TAB;
mais des que j'essaye de cette requette SQL depuis une page asp cela ne marche plus, la message que je recois et que la function n'existe pas. Jespere que quelqu'un aura une reponse pour m'aider. Merci
JP
Message posté le 03/10/2003
par Jean Philippe
Répondre à ce message |
|
