Discussion :

[arn.oo]

Bonjour,

J'aimerais supprimer des points dans des chaines de caractères.
exemple les valeurs :
EXEMPLE.
EXEMPLE..
EXEMPLE...
sont toutes converties en :
EXEMPLE

en acces sur serveur oracle.

J'ai essayé Replace([LIBELLE_COMPLET];".";"") mais j'ai un message d'erreur "Fonction 'Replace' non définie dans l'expression".

Merci

[Jean-Philippe André]

Bonjour,
utilises-tu cette fonction dans le SQL ? Auquel cas, tu peux mettre des virgules à la place des point-virgules.

Sinon, vérifie qu'il n'y a pas de références manquantes dans ton projet.

Enfin, un SQL qui fonctionne sous Access :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

UPDATE SET MonChampText=Replace(MonChampText,'.','');

[arn.oo]

directement dans le SQL :

Code sql :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
SELECT Replace([LIBELLE_COMPLET],".","") AS NATURE
FROM GIPSI_NATURES_GROUPE
WHERE (((GIPSI_NATURES_GROUPE.GROUPE)="O.D."))
ORDER BY Replace([LIBELLE_COMPLET],".","");

idem ça me dis : Fonction 'Replace' non définie dans l'expression

Code sql :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
 
UPDATE SET [LIBELLE_COMPLET]=Replace([LIBELLE_COMPLET],".","") AS NATURE
FROM GIPSI_NATURES_GROUPE
WHERE (((GIPSI_NATURES_GROUPE.GROUPE)="O.D."))
ORDER BY Replace([LIBELLE_COMPLET],".","");

erreur de syntaxe dans l'instruction UPDATE

[Jean-Philippe André]

Si tu es directement dans le SQL, il faudra penser à remplacer les " par des '.

Sinon, as-tu regarder si des références étaient manquantes
Outils>Références...

[J1]

Bonjour,

malheureusement, tu n'indiques pas ta version d'Access.
Si tu utilises Access 97, la fonction Replace n'est en effet pas disponible.
Mais tu peux coder une fonction similaire en VBA et l'appeler depuis ta requête. Cette KB de Microsoft devrait t'aider.

[Jean-Philippe André]

Bonne remarque, je recommande alors d'aller utiliser le code issu de la FAQ :http://access.developpez.com/faq/?pa...DATA#ReplAcc97

[arn.oo]

Alors j'utilise Access 2000 et la fonction Replace() n'existe pas apparemment.
J'ai trouvé un module pour créer la fonction :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
Option Compare Database
 
Public Function MonReplace(Chaine As String, Cherche As String, remplace As String) As String
MonReplace = Replace(Chaine, Cherche, remplace)
End Function

et je l'utilise ainsi :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
SELECT MonReplace([LIBELLE_COMPLET],".","") AS NATURE, GIPSI_NATURES_GROUPE.GROUPE
FROM GIPSI_NATURES_GROUPE
GROUP BY MonReplace([LIBELLE_COMPLET],".",""), GIPSI_NATURES_GROUPE.GROUPE
HAVING (((GIPSI_NATURES_GROUPE.GROUPE)="O.D."))
ORDER BY MonReplace([LIBELLE_COMPLET],".","");

Merci à vous.