Page 1 sur 1
[R] Supprimer toutes les chaines de caractères en double
Posté : dim. 22 févr. 2009 14:37
par sambalec
Salut
Je me demandais comment supprimer toutes les lignes identiques dans un fichier texte ( lignes en double ou en triple)
J'aimerais au final avoir mon fichier texte avec aucune lignes identiques.
Merci d'avance
Re: [..] Supprimer toutes les chaines de carateres en double
Posté : dim. 22 févr. 2009 14:55
par Tlem
1 - Lecture du fichier dans un tableau (_FileReadToArray).
2 - Filtrage du tableau (_ArrayUnique).
3 - Écriture du nouveau fichier (_FileWriteFromArray).
Re: [..] Supprimer toutes les chaines de caractères en double
Posté : dim. 22 févr. 2009 14:59
par sambalec
Merci ! Etant donné que je suis encore un peu newbie, un exemple plus concret me serait d'une grande aide
Re: [..] Supprimer toutes les chaines de caractères en double
Posté : dim. 22 févr. 2009 15:13
par Tlem
En faisant light, cela devrait donner quelque chose dans ce genre :
Code : Tout sélectionner
#Include <File.au3>
#Include <Array.au3>
Dim $aArray, $aNewArray
Dim $Src = "C:\LeFichierALire.txt"
Dim $Dst = "C:\LeFichierFiltré.txt"
_FileReadToArray($Src, $aArray)
_ArrayDelete($aArray, 0)
$aNewArray = _ArrayUnique($aArray)
_FileWriteFromArray($Dst, $aNewArray, 1)
ShellExecute($Dst)
Re: [..] Supprimer toutes les chaines de caractères en double
Posté : dim. 22 févr. 2009 15:22
par sambalec
Génial ! Merci infiniment ! Par contre peut-on enlever le nombre de array qu'il affiche en haut du nouveau txt ?
Re: [..] Supprimer toutes les chaines de caractères en double
Posté : dim. 22 févr. 2009 15:24
par Tlem
J'ai édité le script précédent.
Le nombre d'éléments n'apparaît plus.
Re: [..] Supprimer toutes les chaines de caractères en double
Posté : dim. 22 févr. 2009 15:28
par sambalec
Perfect ! Merci beaucoup !!!
J'adore cette petite communauté !