Je voudrais savoir si un mot existe dans un fichier Txt.
Je r=E9cup=E8re dans le buffer le contenu du fichier par=20
l'=E9criture ci-apr=E8s :
Num1 =3D FreeFile
Open "D:\Monfichier.txt" For Binary As #Num1
=20
strBuffer =3D String$(LOF(Num1), vbNullChar)
Get Num1, , strBuffer
Close Num1
=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D
et je voudrais savoir si un mot pr=E9cis (par exemple OK)=20
existe dans le fichier ??
Pourriez-vous me donner la r=E9ponse. Par avance merci
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire
Veuillez sélectionner un problème
Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
PR-VB6
instr(strBuffer,"OK") renvoie 0 si absence , la position de OK si présence
"Marie" a écrit dans le message de news: 145a201c444c4$2348d130$ Bonjour à tous,
Je voudrais savoir si un mot existe dans un fichier Txt.
Je récupère dans le buffer le contenu du fichier par l'écriture ci-après :
Num1 = FreeFile Open "D:Monfichier.txt" For Binary As #Num1
strBuffer = String$(LOF(Num1), vbNullChar) Get Num1, , strBuffer Close Num1 ==================== et je voudrais savoir si un mot précis (par exemple OK) existe dans le fichier ??
Pourriez-vous me donner la réponse. Par avance merci
instr(strBuffer,"OK") renvoie 0 si absence , la position de OK si présence
"Marie" <anonymous@discussions.microsoft.com> a écrit dans le message de
news: 145a201c444c4$2348d130$a501280a@phx.gbl...
Bonjour à tous,
Je voudrais savoir si un mot existe dans un fichier Txt.
Je récupère dans le buffer le contenu du fichier par
l'écriture ci-après :
Num1 = FreeFile
Open "D:Monfichier.txt" For Binary As #Num1
strBuffer = String$(LOF(Num1), vbNullChar)
Get Num1, , strBuffer
Close Num1
====================
et je voudrais savoir si un mot précis (par exemple OK)
existe dans le fichier ??
Pourriez-vous me donner la réponse. Par avance merci
instr(strBuffer,"OK") renvoie 0 si absence , la position de OK si présence
"Marie" a écrit dans le message de news: 145a201c444c4$2348d130$ Bonjour à tous,
Je voudrais savoir si un mot existe dans un fichier Txt.
Je récupère dans le buffer le contenu du fichier par l'écriture ci-après :
Num1 = FreeFile Open "D:Monfichier.txt" For Binary As #Num1
strBuffer = String$(LOF(Num1), vbNullChar) Get Num1, , strBuffer Close Num1 ==================== et je voudrais savoir si un mot précis (par exemple OK) existe dans le fichier ??
Pourriez-vous me donner la réponse. Par avance merci
ng
Salut,
Regarde du coté de InStr() ou de Like.
-- Nicolas G. FAQ VB : http://faq.vb.free.fr API Guide : http://www.allapi.net Google Groups : http://groups.google.fr/ MZ-Tools : http://www.mztools.com/ http://apisvb.europe.webmatrixhosting.net/
Marie a écrit :
Bonjour à tous,
Je voudrais savoir si un mot existe dans un fichier Txt.
Je récupère dans le buffer le contenu du fichier par l'écriture ci-après :
Num1 = FreeFile Open "D:Monfichier.txt" For Binary As #Num1
strBuffer = String$(LOF(Num1), vbNullChar) Get Num1, , strBuffer Close Num1 ==================== > et je voudrais savoir si un mot précis (par exemple OK) existe dans le fichier ??
Pourriez-vous me donner la réponse. Par avance merci
Salut,
Regarde du coté de InStr() ou de Like.
--
Nicolas G.
FAQ VB : http://faq.vb.free.fr
API Guide : http://www.allapi.net
Google Groups : http://groups.google.fr/
MZ-Tools : http://www.mztools.com/
http://apisvb.europe.webmatrixhosting.net/
Marie <anonymous@discussions.microsoft.com> a écrit :
Bonjour à tous,
Je voudrais savoir si un mot existe dans un fichier Txt.
Je récupère dans le buffer le contenu du fichier par
l'écriture ci-après :
Num1 = FreeFile
Open "D:Monfichier.txt" For Binary As #Num1
strBuffer = String$(LOF(Num1), vbNullChar)
Get Num1, , strBuffer
Close Num1
==================== >
et je voudrais savoir si un mot précis (par exemple OK)
existe dans le fichier ??
Pourriez-vous me donner la réponse. Par avance merci
-- Nicolas G. FAQ VB : http://faq.vb.free.fr API Guide : http://www.allapi.net Google Groups : http://groups.google.fr/ MZ-Tools : http://www.mztools.com/ http://apisvb.europe.webmatrixhosting.net/
Marie a écrit :
Bonjour à tous,
Je voudrais savoir si un mot existe dans un fichier Txt.
Je récupère dans le buffer le contenu du fichier par l'écriture ci-après :
Num1 = FreeFile Open "D:Monfichier.txt" For Binary As #Num1
strBuffer = String$(LOF(Num1), vbNullChar) Get Num1, , strBuffer Close Num1 ==================== > et je voudrais savoir si un mot précis (par exemple OK) existe dans le fichier ??
Pourriez-vous me donner la réponse. Par avance merci