Repetition d'un mot dans un fichier texte
Pantoute
Messages postés
2
Date d'inscription
lundi 16 mai 2005
Statut
Membre
Dernière intervention
18 mai 2005
-
16 mai 2005 à 18:39
Pantoute Messages postés 2 Date d'inscription lundi 16 mai 2005 Statut Membre Dernière intervention 18 mai 2005 - 18 mai 2005 à 00:32
Pantoute Messages postés 2 Date d'inscription lundi 16 mai 2005 Statut Membre Dernière intervention 18 mai 2005 - 18 mai 2005 à 00:32
A voir également:
- Repetition d'un mot dans un fichier texte
- Vba écrire dans un fichier texte - Conseils pratiques -Visual Basic / VB.NET
- Melangeur de mot ✓ - Forum Visual Basic
- Créer un mot mêlé - Forum Java
- Crypter un fichier texte ✓ - Forum Visual Basic
- Fichier .ini - Conseils pratiques -Visual Basic / VB.NET
2 réponses
cs_CanisLupus
Messages postés
3757
Date d'inscription
mardi 23 septembre 2003
Statut
Membre
Dernière intervention
13 mars 2006
20
17 mai 2005 à 12:05
17 mai 2005 à 12:05
Salut,
Si ton fichier n'est pas trop grand, un exemple de vb6 qui, je pense que est adaptable en vbs :
Dim s As String
Dim Mot_A_Trouver As String
Mot_A_Trouver = "TonMot"
Open "TonFichier" For Input As #1
s = Input(LOF(1), #1)
Close #1
MsgBox "Nombre de mots = " & (Len(s) - Len(Replace(s, Mot_A_Trouver, ""))) / Len(Mot_A_Trouver)
-------------------------------------------------
Dresseur de puces, .... normal pour un loup !?
Si ton fichier n'est pas trop grand, un exemple de vb6 qui, je pense que est adaptable en vbs :
Dim s As String
Dim Mot_A_Trouver As String
Mot_A_Trouver = "TonMot"
Open "TonFichier" For Input As #1
s = Input(LOF(1), #1)
Close #1
MsgBox "Nombre de mots = " & (Len(s) - Len(Replace(s, Mot_A_Trouver, ""))) / Len(Mot_A_Trouver)
-------------------------------------------------
Dresseur de puces, .... normal pour un loup !?
Pantoute
Messages postés
2
Date d'inscription
lundi 16 mai 2005
Statut
Membre
Dernière intervention
18 mai 2005
18 mai 2005 à 00:32
18 mai 2005 à 00:32
Merci de ta reponse je vais l'essayer