FONCTION REMPLACE (MANQUE DANS ACCESS PAR EX.)

BruNews Messages postés 21040 Date d'inscription jeudi 23 janvier 2003 Statut Modérateur Dernière intervention 21 août 2019 - 7 août 2003 à 12:23
Chatmuel Messages postés 6 Date d'inscription mardi 12 octobre 2004 Statut Membre Dernière intervention 26 janvier 2005 - 26 janv. 2005 à 15:23
Cette discussion concerne un article du site. Pour la consulter dans son contexte d'origine, cliquez sur le lien ci-dessous.

https://codes-sources.commentcamarche.net/source/8167-fonction-remplace-manque-dans-access-par-ex

Chatmuel Messages postés 6 Date d'inscription mardi 12 octobre 2004 Statut Membre Dernière intervention 26 janvier 2005
26 janv. 2005 à 15:23
Oui mais il a quand meme une forme d'itération je pense puisque la méthode s'auto incémente ??
BruNews Messages postés 21040 Date d'inscription jeudi 23 janvier 2003 Statut Modérateur Dernière intervention 21 août 2019
26 janv. 2005 à 13:16
remplace2 s'appelle elle meme, il y a donc recursivite.
Chatmuel Messages postés 6 Date d'inscription mardi 12 octobre 2004 Statut Membre Dernière intervention 26 janvier 2005
26 janv. 2005 à 13:12
Function remplace2(Text, quoi, par, resultat) 'mettre "" pour resultat lors de l'appel de la methode
If InStr(Text, quoi) <> 0 Then
remplace2 = remplace2(Mid(Text, InStr(Text, quoi) + Len(quoi)), quoi, par, resultat & Mid(Text, 1, InStr(Text, quoi) - 1) & par)
Else
remplace2 = resultat & Text
End If
End Function

Est-ce que ça c'est itérarif ??? (ca marche j'ai essayé)
GarnetDiAlexandros Messages postés 55 Date d'inscription mercredi 31 juillet 2002 Statut Membre Dernière intervention 19 novembre 2004
19 nov. 2004 à 16:13
cool, pile poil ce que je cherchais
très simple et qui marche bien, rien à redire
BruNews Messages postés 21040 Date d'inscription jeudi 23 janvier 2003 Statut Modérateur Dernière intervention 21 août 2019
7 août 2003 à 12:23
Petite rectif mais importante:
Remplacer 'rapide car récursive'
par 'LENTE car récursive'.
La recursion est toujours plus lente que l'iteration, empilage et desempilage des parametres oblige.
Rejoignez-nous