Salut
Avec une boucle Do....Loop ? ligne 33 à 43 de ton code
Do While Not OpenFile.AtEndOfStream
CurrentLine = OpenFile.ReadLine
If InStr(UCase(CurrentLine), UCase(FichierAlerteParc)) > 0...
Salut
Avec une boucle Do....Loop ? ligne 33 à 43 de ton code
Do While Not OpenFile.AtEndOfStream
CurrentLine = OpenFile.ReadLine
If InStr(UCase(CurrentLine), UCase(FichierAlerteParc)) > 0...
Vous avez un bloqueur de publicités installé.
Le Club Developpez.com n'affiche que des publicités IT, discrètes et non intrusives.
Afin que nous puissions continuer à vous fournir gratuitement du contenu de qualité, merci de nous soutenir en désactivant votre bloqueur de publicités sur Developpez.com.