Page 1 sur 1
[..] Recherche d'une suite de caractères dans un fichier
Posté : jeu. 19 nov. 2009 19:05
par DJSIR
Bonjour. J'ai un petit prob'
J'ai dans un fichier tout un tas de site malveillants (660) dont un est extrait dans le spoiler :
► Afficher le texteExtrait
Code : Tout sélectionner
10CentCashoutPTC.com
10Dollar-Mail.com
10EuroMails.com
12Bux.com
1CentEmails.com
1DollarPTC.com
2-Dollar-Mail.com
2008Mails.com
200EuroMails.net
247Bux.com
247Payouts.com
2Dollar50Bux.com
3-Dollar-Mail.com
4990USD.com
5-Dollar-Mail.com
5EuroMails.com
Donc, j'aimerais vérifier que le site ou je navigue n'est pas dans la liste.
J'ai commencé a utiliser StringInStr mais, si je recherche "4990USD.com" dedans, ça fonctionne mais si je met "
http://4990usd.com/" bah, ça trouve rien.
C'est pour ça que j'ai besoin de vous !
Re: [..] Recherche d'une suite de caractères dans
Posté : jeu. 19 nov. 2009 19:22
par jbnh
Exemple :
Code : Tout sélectionner
_FileReadToArray("blabla.txt", $array)
For $X = 1 to $Array[0]
If StringInStr($array[$X], "google.com") Then
msgbox(0,"","string trouvée")
EndIf
Next
Re: [..] Recherche d'une suite de caractères dans un fichier
Posté : jeu. 19 nov. 2009 20:40
par DJSIR
Hum.. non ça ne fonctionne pas.
Code : Tout sélectionner
#include <File.au3>
Local $array
$e = 0
_FileReadToArray("safe.txt", $array)
For $X = 1 to $Array[0]
If StringInStr($array[$X], "http://2008Mails.com") Then $e = 1
Next
If $e = 1 Then
msgbox(0,"","string trouvée")
Else
msgbox(0,"","string non trouvée")
EndIf
Re: [..] Recherche d'une suite de caractères dans un fichier
Posté : jeu. 19 nov. 2009 21:14
par sylvanie
Normal, la
string et la
substring recherchée sont inversées dans l'appel :
Code : Tout sélectionner
If StringInStr( [color=#00BF00]"http://2008Mails.com"[/color],[color=#0040FF]$array[$X][/color]) Then $e = 1