Discussion :

[chenevierebooks]

Bonjour,

je dois nettoyer des textes dans une base de données HF , je recherche un moyen de supprimer les retours chariots en trop.

Ces retours chariots peuvent être en milieu de texte ou à la fin ...

Je n'ai pas trouver de moyen simple pour le faire , il en existe ?

[tbc92]

Code :

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

1
2
3
4
5
ch = fchargefichier(fic)
ch = remplace ( ch, RC+RC+RC, RC)
ch = remplace ( ch, RC+RC+RC, RC)
ch = remplace ( ch, RC+RC, RC)
ch = remplace ( ch, RC+RC, RC)

J'ai mis plusieurs fois l'instruction remplace(), comme ça, s'il y a une dizaine de RC qui se suivent, ils sont remplacés par un seul RC.
Si le fichier est énorme, ma solution ne fonctionnera pas , parceq que fchargeTexte ne fonctionnera pas

[rudolfrudolf]

Bonjour,

je dois nettoyer des textes dans une base de données HF , je recherche un moyen de supprimer les retours chariots en trop.

Ces retours chariots peuvent être en milieu de texte ou à la fin ...

Je n'ai pas trouver de moyen simple pour le faire , il en existe ?

Bonjour,

@tbc92 Salut,
si je le lis bien il ne cherche pas a nettoyer un fichier plat, mais des chaines dans un fichier hyperfile. enfin je me trompe peut-être.

@chenevierebooks

le Rc que tu doit nettoyer sont dans une chaine et peuvent se trouver n'importe ou ? et tu ne veux garder que le dernier ?

dans ce cas comme te l'as sugéré tbc92 j'utiliserais aussi le remplace. mais de cette façon

Code :

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

1
2
machaine =remplace(machaine,rc,"") // je remplace tout les rc par rien
machaine=machaine+rc // je rajoute une retour chariot en fin de la chaine

Bien sur ceci est valable uniquement si ce que je t'ai dis auparavant est exact.

ceci dit en te relisant j'ai l'impression que tes retours chariots peuvent être en milieu de chaine et dans ce cas le code proposé par tbc92 est le plus approprié à l'exception du fchargefichier qui ne te sert à rien.

j'ai bien en tête une petite idée en utilisant extraitchaine et chaineoccurence, mais je me torture probablement la tête surtout que je suis pas sur d'arriver à un truc simple et surtout que je ne suis pas absolument sur de ce que tu veux
un petit exemple serait le bienvenu.

Edit: évidement si je ne fait pas fausse route pour le fichier qui est un ficher hyperfile tu dois faire une boucle pour lire chaque enregistrement, chose que tu n'a pas à faire avec un fchargefichier, ce commentaire au cas ou tbc92 est dans le vrai

[philouZ]

Bonjour,

En complément tu peux faire pour simplifier,

Code :

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

1
2
3
pour i = 10 a 2
machaine =remplace(machaine,repete(rc,i),rc)
fin

[midou23175]

Bonsoir,

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
 
sChaineRemplacée est une chaîne
 
HLitPremier(MonFichier)
TANTQUE PAS HEnDehors()
     // rubrique du fichier FIC "MonFichier.LIBELLE"
     sChaineRemplacée=MonFichier.LIBELLE
 
     // exemple pour un nombre maximum de RC = 10
     POUR i=10 A 2 PAS -1
          sChaineRemplacée=Remplace(sChaineRemplacée,Répète(RC,i),RC)
     FIN
 
     MonFichier.LIBELLE=sChaineRemplacée
     HModifie(MonFichier)
     hLitSuivant(MonFichier)
FIN

[tatayo]

Bonjour,
Ou plus simple:

Code WinDev :

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

1
2
3
4
 
TANTQUE chaineoccurrence(MaChaine,rc + rc) > 0
	MaChaine = remplace(MaChaine,rc+rc,rc)
FIN

Ainsi peu importe le nombre de "doublons".

Tatayo.