Re: [R] Créer une WhiteList
Posté : dim. 17 juin 2012 00:02
Pas de solution ?
Code : Tout sélectionner
If StringCompare($ar_Array[$J], $whilelist[$k]) = 0 Then [strike]ContinueLoop[/strike] ExitLoopPage 2 sur 2
Re: [R] Créer une WhiteList
Posté : dim. 17 juin 2012 10:43
par mikell
Scuz j'étais ailleurs...
Re: [R] Créer une WhiteList
Posté : dim. 17 juin 2012 18:39
par Saachaa
Salut,
Fonctionne pas : Whitelist, et réécrit la détection du nombre de rang de l'array de la whitelist.
Fonctionne pas : Whitelist, et réécrit la détection du nombre de rang de l'array de la whitelist.
► Afficher le texte
Code : Tout sélectionner
| *crack* | C:\Program Files\GIMP-2.0\share\gimp\2.0\patterns\cracked.pat
| *crack* | C:\Program Files\GIMP-2.0\share\gimp\2.0\patterns\cracked.pat
| *crack* | C:\Program Files\GIMP-2.0\share\gimp\2.0\patterns\cracked.pat
| *crack* | C:\Program Files\GIMP-2.0\share\gimp\2.0\patterns\cracked.pat
| *crack* | C:\Program Files\GIMP-2.0\share\gimp\2.0\patterns\cracked.pat
| *crack* | C:\Program Files\GIMP-2.0\share\gimp\2.0\patterns\cracked.pat
| *crack* | C:\Program Files\GIMP-2.0\share\gimp\2.0\patterns\cracked.pat
| *crack* | C:\Program Files\GIMP-2.0\share\gimp\2.0\patterns\cracked.pat
| *crack* | C:\Program Files\GIMP-2.0\share\gimp\2.0\patterns\cracked.pat
| *crack* | C:\Program Files\GIMP-2.0\share\gimp\2.0\patterns\cracked.pat
| *crack* | C:\Program Files\GIMP-2.0\share\gimp\2.0\patterns\cracked.pat
| *crack* | C:\Program Files\GIMP-2.0\share\gimp\2.0\patterns\cracked.pat
| *crack* | C:\Program Files\GIMP-2.0\share\gimp\2.0\patterns\cracked.pat
| *crack* | C:\Program Files\GIMP-2.0\share\gimp\2.0\patterns\cracked.pat
| *crack* | C:\Program Files\GIMP-2.0\share\gimp\2.0\patterns\cracked.pat
| *crack* | C:\Program Files\GIMP-2.0\share\gimp\2.0\patterns\cracked.pat
| *crack* | C:\Program Files\GIMP-2.0\share\gimp\2.0\patterns\cracked.pat
| *crack* | C:\Program Files\GIMP-2.0\share\gimp\2.0\patterns\cracked.pat
| *crack* | C:\Program Files\GIMP-2.0\share\gimp\2.0\patterns\cracked.pat
| *crack* | C:\Program Files\GIMP-2.0\share\gimp\2.0\patterns\cracked.pat
| *crack* | C:\Program Files\GIMP-2.0\share\gimp\2.0\patterns\cracked.pat
| *crack* | C:\Program Files\GIMP-2.0\share\gimp\2.0\patterns\cracked.pat
| *crack* | C:\Program Files\GIMP-2.0\share\gimp\2.0\patterns\cracked.pat
| *crack* | C:\Program Files\GIMP-2.0\share\gimp\2.0\patterns\cracked.pat
| *crack* | C:\Windows.old\Documents and Settings\Saachaa Corporation\Bureau\Softs\Crack Fighter\Crack Fighter.cbp
| *crack* | C:\Windows.old\Documents and Settings\Saachaa Corporation\Bureau\Softs\Crack Fighter\Crack Fighter.cbp
| *crack* | C:\Windows.old\Documents and Settings\Saachaa Corporation\Bureau\Softs\Crack Fighter\Crack Fighter.cbp
| *crack* | C:\Windows.old\Documents and Settings\Saachaa Corporation\Bureau\Softs\Crack Fighter\Crack Fighter.cbp
| *crack* | C:\Windows.old\Documents and Settings\Saachaa Corporation\Bureau\Softs\Crack Fighter\Crack Fighter.cbp
| *crack* | C:\Windows.old\Documents and Settings\Saachaa Corporation\Bureau\Softs\Crack Fighter\Crack Fighter.cbp
| *crack* | C:\Windows.old\Documents and Settings\Saachaa Corporation\Bureau\Softs\Crack Fighter\Crack Fighter.cbp
| *crack* | C:\Windows.old\Documents and Settings\Saachaa Corporation\Bureau\Softs\Crack Fighter\Crack Fighter.cbp
| *crack* | C:\Windows.old\Documents and Settings\Saachaa Corporation\Bureau\Softs\Crack Fighter\Crack Fighter.cbp
| *crack* | C:\Windows.old\Documents and Settings\Saachaa Corporation\Bureau\Softs\Crack Fighter\Crack Fighter.cbp
| *crack* | C:\Windows.old\Documents and Settings\Saachaa Corporation\Bureau\Softs\Crack Fighter\Crack Fighter.cbp
| *crack* | C:\Windows.old\Documents and Settings\Saachaa Corporation\Bureau\Softs\Crack Fighter\Crack Fighter.cbp
| *crack* | C:\Windows.old\Documents and Settings\Saachaa Corporation\Bureau\Softs\Crack Fighter\Crack Fighter.cbp
| *crack* | C:\Windows.old\Documents and Settings\Saachaa Corporation\Bureau\Softs\Crack Fighter\Crack Fighter.cbp
| *crack* | C:\Windows.old\Documents and Settings\Saachaa Corporation\Bureau\Softs\Crack Fighter\Crack Fighter.cbp
| *crack* | C:\Windows.old\Documents and Settings\Saachaa Corporation\Bureau\Softs\Crack Fighter\Crack Fighter.cbp
| *crack* | C:\Windows.old\Documents and Settings\Saachaa Corporation\Bureau\Softs\Crack Fighter\Crack Fighter.cbp
| *crack* | C:\Windows.old\Documents and Settings\Saachaa Corporation\Bureau\Softs\Crack Fighter\Crack Fighter.cbp
| *crack* | C:\Windows.old\Documents and Settings\Saachaa Corporation\Bureau\Softs\Crack Fighter\Crack Fighter.cbp
| *crack* | C:\Windows.old\Documents and Settings\Saachaa Corporation\Bureau\Softs\Crack Fighter\Crack Fighter.cbp
| *crack* | C:\Windows.old\Documents and Settings\Saachaa Corporation\Bureau\Softs\Crack Fighter\Crack Fighter.cbp
| *crack* | C:\Windows.old\Documents and Settings\Saachaa Corporation\Bureau\Softs\Crack Fighter\Crack Fighter.cbp
| *crack* | C:\Windows.old\Documents and Settings\Saachaa Corporation\Bureau\Softs\Crack Fighter\Crack Fighter.cbp
| *crack* | C:\Windows.old\Documents and Settings\Saachaa Corporation\Bureau\Softs\Crack Fighter\Crack Fighter.cbp
| *crack* | C:\Windows.old\Documents and Settings\Saachaa Corporation\Bureau\Softs\Crack Fighter\Crack Fighter.layout
| *crack* | C:\Windows.old\Documents and Settings\Saachaa Corporation\Bureau\Softs\Crack Fighter\Crack Fighter.layout
| *crack* | C:\Windows.old\Documents and Settings\Saachaa Corporation\Bureau\Softs\Crack Fighter\Crack Fighter.layout
| *crack* | C:\Windows.old\Documents and Settings\Saachaa Corporation\Bureau\Softs\Crack Fighter\Crack Fighter.layout
| *crack* | C:\Windows.old\Documents and Settings\Saachaa Corporation\Bureau\Softs\Crack Fighter\Crack Fighter.layout
| *crack* | C:\Windows.old\Documents and Settings\Saachaa Corporation\Bureau\Softs\Crack Fighter\Crack Fighter.layout
| *crack* | C:\Windows.old\Documents and Settings\Saachaa Corporation\Bureau\Softs\Crack Fighter\Crack Fighter.layout
| *crack* | C:\Windows.old\Documents and Settings\Saachaa Corporation\Bureau\Softs\Crack Fighter\Crack Fighter.layout
| *crack* | C:\Windows.old\Documents and Settings\Saachaa Corporation\Bureau\Softs\Crack Fighter\Crack Fighter.layout
| *crack* | C:\Windows.old\Documents and Settings\Saachaa Corporation\Bureau\Softs\Crack Fighter\Crack Fighter.layout
| *crack* | C:\Windows.old\Documents and Settings\Saachaa Corporation\Bureau\Softs\Crack Fighter\Crack Fighter.layout
| *crack* | C:\Windows.old\Documents and Settings\Saachaa Corporation\Bureau\Softs\Crack Fighter\Crack Fighter.layout
| *crack* | C:\Windows.old\Documents and Settings\Saachaa Corporation\Bureau\Softs\Crack Fighter\Crack Fighter.layout
| *crack* | C:\Windows.old\Documents and Settings\Saachaa Corporation\Bureau\Softs\Crack Fighter\Crack Fighter.layout
| *crack* | C:\Windows.old\Documents and Settings\Saachaa Corporation\Bureau\Softs\Crack Fighter\Crack Fighter.layout
| *crack* | C:\Windows.old\Documents and Settings\Saachaa Corporation\Bureau\Softs\Crack Fighter\Crack Fighter.layout
| *crack* | C:\Windows.old\Documents and Settings\Saachaa Corporation\Bureau\Softs\Crack Fighter\Crack Fighter.layout
| *crack* | C:\Windows.old\Documents and Settings\Saachaa Corporation\Bureau\Softs\Crack Fighter\Crack Fighter.layout
| *crack* | C:\Windows.old\Documents and Settings\Saachaa Corporation\Bureau\Softs\Crack Fighter\Crack Fighter.layout
| *crack* | C:\Windows.old\Documents and Settings\Saachaa Corporation\Bureau\Softs\Crack Fighter\Crack Fighter.layout
| *crack* | C:\Windows.old\Documents and Settings\Saachaa Corporation\Bureau\Softs\Crack Fighter\Crack Fighter.layout
| *crack* | C:\Windows.old\Documents and Settings\Saachaa Corporation\Bureau\Softs\Crack Fighter\Crack Fighter.layout
| *crack* | C:\Windows.old\Documents and Settings\Saachaa Corporation\Bureau\Softs\Crack Fighter\Crack Fighter.layout
| *crack* | C:\Windows.old\Documents and Settings\Saachaa Corporation\Bureau\Softs\Crack Fighter\Crack Fighter.layout
| *crack* | C:\Windows.old\Documents and Settings\Saachaa Corporation\Bureau\STC\search_the_crack.txt
| *crack* | C:\Windows.old\Documents and Settings\Saachaa Corporation\Bureau\STC\search_the_crack.txt
| *crack* | C:\Windows.old\Documents and Settings\Saachaa Corporation\Bureau\STC\search_the_crack.txt
| *crack* | C:\Windows.old\Documents and Settings\Saachaa Corporation\Bureau\STC\search_the_crack.txt
| *crack* | C:\Windows.old\Documents and Settings\Saachaa Corporation\Bureau\STC\search_the_crack.txt
| *crack* | C:\Windows.old\Documents and Settings\Saachaa Corporation\Bureau\STC\search_the_crack.txt
| *crack* | C:\Windows.old\Documents and Settings\Saachaa Corporation\Bureau\STC\search_the_crack.txt
| *crack* | C:\Windows.old\Documents and Settings\Saachaa Corporation\Bureau\STC\search_the_crack.txt
| *crack* | C:\Windows.old\Documents and Settings\Saachaa Corporation\Bureau\STC\search_the_crack.txt
| *crack* | C:\Windows.old\Documents and Settings\Saachaa Corporation\Bureau\STC\search_the_crack.txt
| *crack* | C:\Windows.old\Documents and Settings\Saachaa Corporation\Bureau\STC\search_the_crack.txt
| *crack* | C:\Windows.old\Documents and Settings\Saachaa Corporation\Bureau\STC\search_the_crack.txt
| *crack* | C:\Windows.old\Documents and Settings\Saachaa Corporation\Bureau\STC\search_the_crack.txt
| *crack* | C:\Windows.old\Documents and Settings\Saachaa Corporation\Bureau\STC\search_the_crack.txt
| *crack* | C:\Windows.old\Documents and Settings\Saachaa Corporation\Bureau\STC\search_the_crack.txt
| *crack* | C:\Windows.old\Documents and Settings\Saachaa Corporation\Bureau\STC\search_the_crack.txt
| *crack* | C:\Windows.old\Documents and Settings\Saachaa Corporation\Bureau\STC\search_the_crack.txt
| *crack* | C:\Windows.old\Documents and Settings\Saachaa Corporation\Bureau\STC\search_the_crack.txt
| *crack* | C:\Windows.old\Documents and Settings\Saachaa Corporation\Bureau\STC\search_the_crack.txt
| *crack* | C:\Windows.old\Documents and Settings\Saachaa Corporation\Bureau\STC\search_the_crack.txt
| *crack* | C:\Windows.old\Documents and Settings\Saachaa Corporation\Bureau\STC\search_the_crack.txt
| *crack* | C:\Windows.old\Documents and Settings\Saachaa Corporation\Bureau\STC\search_the_crack.txt
| *crack* | C:\Windows.old\Documents and Settings\Saachaa Corporation\Bureau\STC\search_the_crack.txt
| *crack* | C:\Windows.old\Documents and Settings\Saachaa Corporation\Bureau\STC\search_the_crack.txt
| *removeWAT* | C:\Windows\System32\slmgr.vbs.removewat
| *removeWAT* | C:\Windows\System32\slmgr.vbs.removewat
| *removeWAT* | C:\Windows\System32\slmgr.vbs.removewat
| *removeWAT* | C:\Windows\System32\slmgr.vbs.removewat
| *removeWAT* | C:\Windows\System32\slmgr.vbs.removewat
| *removeWAT* | C:\Windows\System32\slmgr.vbs.removewat
| *removeWAT* | C:\Windows\System32\slmgr.vbs.removewat
| *removeWAT* | C:\Windows\System32\slmgr.vbs.removewat
| *removeWAT* | C:\Windows\System32\slmgr.vbs.removewat
| *removeWAT* | C:\Windows\System32\slmgr.vbs.removewat
| *removeWAT* | C:\Windows\System32\slmgr.vbs.removewat
| *removeWAT* | C:\Windows\System32\slmgr.vbs.removewat
| *removeWAT* | C:\Windows\System32\slmgr.vbs.removewat
| *removeWAT* | C:\Windows\System32\slmgr.vbs.removewat
| *removeWAT* | C:\Windows\System32\slmgr.vbs.removewat
| *removeWAT* | C:\Windows\System32\slmgr.vbs.removewat
| *removeWAT* | C:\Windows\System32\slmgr.vbs.removewat
| *removeWAT* | C:\Windows\System32\slmgr.vbs.removewat
| *removeWAT* | C:\Windows\System32\slmgr.vbs.removewat
| *removeWAT* | C:\Windows\System32\slmgr.vbs.removewat
| *removeWAT* | C:\Windows\System32\slmgr.vbs.removewat
| *removeWAT* | C:\Windows\System32\slmgr.vbs.removewat
| *removeWAT* | C:\Windows\System32\slmgr.vbs.removewat
| *removeWAT* | C:\Windows\System32\slmgr.vbs.removewat
| *Keyfinder* | C:\Users\Sacha\Dropbox\Mes documents\Exe2Aut\!SourceCode\SRC\FrmAHK_KeyFinder.frm
| *Keyfinder* | C:\Users\Sacha\Dropbox\Mes documents\Exe2Aut\!SourceCode\SRC\FrmAHK_KeyFinder.frm
| *Keyfinder* | C:\Users\Sacha\Dropbox\Mes documents\Exe2Aut\!SourceCode\SRC\FrmAHK_KeyFinder.frm
| *Keyfinder* | C:\Users\Sacha\Dropbox\Mes documents\Exe2Aut\!SourceCode\SRC\FrmAHK_KeyFinder.frm
| *Keyfinder* | C:\Users\Sacha\Dropbox\Mes documents\Exe2Aut\!SourceCode\SRC\FrmAHK_KeyFinder.frm
| *Keyfinder* | C:\Users\Sacha\Dropbox\Mes documents\Exe2Aut\!SourceCode\SRC\FrmAHK_KeyFinder.frm
| *Keyfinder* | C:\Users\Sacha\Dropbox\Mes documents\Exe2Aut\!SourceCode\SRC\FrmAHK_KeyFinder.frm
| *Keyfinder* | C:\Users\Sacha\Dropbox\Mes documents\Exe2Aut\!SourceCode\SRC\FrmAHK_KeyFinder.frm
| *Keyfinder* | C:\Users\Sacha\Dropbox\Mes documents\Exe2Aut\!SourceCode\SRC\FrmAHK_KeyFinder.frm
| *Keyfinder* | C:\Users\Sacha\Dropbox\Mes documents\Exe2Aut\!SourceCode\SRC\FrmAHK_KeyFinder.frm
| *Keyfinder* | C:\Users\Sacha\Dropbox\Mes documents\Exe2Aut\!SourceCode\SRC\FrmAHK_KeyFinder.frm
| *Keyfinder* | C:\Users\Sacha\Dropbox\Mes documents\Exe2Aut\!SourceCode\SRC\FrmAHK_KeyFinder.frm
| *Keyfinder* | C:\Users\Sacha\Dropbox\Mes documents\Exe2Aut\!SourceCode\SRC\FrmAHK_KeyFinder.frm
| *Keyfinder* | C:\Users\Sacha\Dropbox\Mes documents\Exe2Aut\!SourceCode\SRC\FrmAHK_KeyFinder.frm
| *Keyfinder* | C:\Users\Sacha\Dropbox\Mes documents\Exe2Aut\!SourceCode\SRC\FrmAHK_KeyFinder.frm
| *Keyfinder* | C:\Users\Sacha\Dropbox\Mes documents\Exe2Aut\!SourceCode\SRC\FrmAHK_KeyFinder.frm
| *Keyfinder* | C:\Users\Sacha\Dropbox\Mes documents\Exe2Aut\!SourceCode\SRC\FrmAHK_KeyFinder.frm
| *Keyfinder* | C:\Users\Sacha\Dropbox\Mes documents\Exe2Aut\!SourceCode\SRC\FrmAHK_KeyFinder.frm
| *Keyfinder* | C:\Users\Sacha\Dropbox\Mes documents\Exe2Aut\!SourceCode\SRC\FrmAHK_KeyFinder.frm
| *Keyfinder* | C:\Users\Sacha\Dropbox\Mes documents\Exe2Aut\!SourceCode\SRC\FrmAHK_KeyFinder.frm
| *Keyfinder* | C:\Users\Sacha\Dropbox\Mes documents\Exe2Aut\!SourceCode\SRC\FrmAHK_KeyFinder.frm
| *Keyfinder* | C:\Users\Sacha\Dropbox\Mes documents\Exe2Aut\!SourceCode\SRC\FrmAHK_KeyFinder.frm
| *Keyfinder* | C:\Users\Sacha\Dropbox\Mes documents\Exe2Aut\!SourceCode\SRC\FrmAHK_KeyFinder.frm
| *Keyfinder* | C:\Users\Sacha\Dropbox\Mes documents\Exe2Aut\!SourceCode\SRC\FrmAHK_KeyFinder.frm
| *Keyfinder* | C:\Windows.old\Documents and Settings\Saachaa Corporation\Mes documents\Exe2Aut\!SourceCode\SRC\FrmAHK_KeyFinder.frm
| *Keyfinder* | C:\Windows.old\Documents and Settings\Saachaa Corporation\Mes documents\Exe2Aut\!SourceCode\SRC\FrmAHK_KeyFinder.frm
| *Keyfinder* | C:\Windows.old\Documents and Settings\Saachaa Corporation\Mes documents\Exe2Aut\!SourceCode\SRC\FrmAHK_KeyFinder.frm
| *Keyfinder* | C:\Windows.old\Documents and Settings\Saachaa Corporation\Mes documents\Exe2Aut\!SourceCode\SRC\FrmAHK_KeyFinder.frm
| *Keyfinder* | C:\Windows.old\Documents and Settings\Saachaa Corporation\Mes documents\Exe2Aut\!SourceCode\SRC\FrmAHK_KeyFinder.frm
| *Keyfinder* | C:\Windows.old\Documents and Settings\Saachaa Corporation\Mes documents\Exe2Aut\!SourceCode\SRC\FrmAHK_KeyFinder.frm
| *Keyfinder* | C:\Windows.old\Documents and Settings\Saachaa Corporation\Mes documents\Exe2Aut\!SourceCode\SRC\FrmAHK_KeyFinder.frm
| *Keyfinder* | C:\Windows.old\Documents and Settings\Saachaa Corporation\Mes documents\Exe2Aut\!SourceCode\SRC\FrmAHK_KeyFinder.frm
| *Keyfinder* | C:\Windows.old\Documents and Settings\Saachaa Corporation\Mes documents\Exe2Aut\!SourceCode\SRC\FrmAHK_KeyFinder.frm
| *Keyfinder* | C:\Windows.old\Documents and Settings\Saachaa Corporation\Mes documents\Exe2Aut\!SourceCode\SRC\FrmAHK_KeyFinder.frm
| *Keyfinder* | C:\Windows.old\Documents and Settings\Saachaa Corporation\Mes documents\Exe2Aut\!SourceCode\SRC\FrmAHK_KeyFinder.frm
| *Keyfinder* | C:\Windows.old\Documents and Settings\Saachaa Corporation\Mes documents\Exe2Aut\!SourceCode\SRC\FrmAHK_KeyFinder.frm
| *Keyfinder* | C:\Windows.old\Documents and Settings\Saachaa Corporation\Mes documents\Exe2Aut\!SourceCode\SRC\FrmAHK_KeyFinder.frm
| *Keyfinder* | C:\Windows.old\Documents and Settings\Saachaa Corporation\Mes documents\Exe2Aut\!SourceCode\SRC\FrmAHK_KeyFinder.frm
| *Keyfinder* | C:\Windows.old\Documents and Settings\Saachaa Corporation\Mes documents\Exe2Aut\!SourceCode\SRC\FrmAHK_KeyFinder.frm
| *Keyfinder* | C:\Windows.old\Documents and Settings\Saachaa Corporation\Mes documents\Exe2Aut\!SourceCode\SRC\FrmAHK_KeyFinder.frm
| *Keyfinder* | C:\Windows.old\Documents and Settings\Saachaa Corporation\Mes documents\Exe2Aut\!SourceCode\SRC\FrmAHK_KeyFinder.frm
| *Keyfinder* | C:\Windows.old\Documents and Settings\Saachaa Corporation\Mes documents\Exe2Aut\!SourceCode\SRC\FrmAHK_KeyFinder.frm
| *Keyfinder* | C:\Windows.old\Documents and Settings\Saachaa Corporation\Mes documents\Exe2Aut\!SourceCode\SRC\FrmAHK_KeyFinder.frm
| *Keyfinder* | C:\Windows.old\Documents and Settings\Saachaa Corporation\Mes documents\Exe2Aut\!SourceCode\SRC\FrmAHK_KeyFinder.frm
| *Keyfinder* | C:\Windows.old\Documents and Settings\Saachaa Corporation\Mes documents\Exe2Aut\!SourceCode\SRC\FrmAHK_KeyFinder.frm
| *Keyfinder* | C:\Windows.old\Documents and Settings\Saachaa Corporation\Mes documents\Exe2Aut\!SourceCode\SRC\FrmAHK_KeyFinder.frm
| *Keyfinder* | C:\Windows.old\Documents and Settings\Saachaa Corporation\Mes documents\Exe2Aut\!SourceCode\SRC\FrmAHK_KeyFinder.frm
| *Keyfinder* | C:\Windows.old\Documents and Settings\Saachaa Corporation\Mes documents\Exe2Aut\!SourceCode\SRC\FrmAHK_KeyFinder.frm
Re: [R] Créer une WhiteList
Posté : dim. 17 juin 2012 18:41
par blacksoul305
Salut,
rajoute des spoilers !
!!!
rajoute des spoilers !
!!!Re: [R] Créer une WhiteList
Posté : dim. 17 juin 2012 21:50
par mikell
Ouch 
Sorry...
Sorry...
► Afficher le texte
Code : Tout sélectionner
For $a = 1 To $disque[0]
For $I = 0 To UBound($recherche) - 1
Global $drive = StringUpper($disque[$a])
Global $ar_Array = _FileListToArrayEx($drive, $recherche[$I], 1, "", True)
For $J = 1 To UBound($ar_Array) - 1
For $k = 0 To UBound($whilelist) - 1
; MsgBox(0, "$ar_Array", $ar_Array[$J])
; MsgBox(0, "$whilelist", $whilelist[$k])
If StringCompare($ar_Array[$J], $whilelist[$k]) = 0 Then ContinueLoop 2
Next
$true = 1
FileWriteLine($TXT, "[" & $recherche[$I] & "]" & " -> " & $ar_Array[$J])
Next
Next
NextRe: [R] Créer une WhiteList
Posté : lun. 18 juin 2012 07:15
par Saachaa
Oups... sorry !
@Mikell... toujours pas
@Mikell... toujours pas
Re: [R] Créer une WhiteList
Posté : lun. 18 juin 2012 07:55
par Tlem
Il serait peut être judicieux de prendre une fonction "moins performante" mais qui permet de faire des exclusions : http://www.autoitscript.fr/forum/viewto ... 893#p34893
Re: [R] Créer une WhiteList
Posté : lun. 18 juin 2012 10:44
par mikell
NdD
J'avais pas testé... parmi la foultitude des fonctions FileListToArray tu as choisi celle qui retourne les chemins complets
Donc pas de StringCompare, mais StringInStr ou StringRegExp ^^
J'avais pas testé... parmi la foultitude des fonctions FileListToArray tu as choisi celle qui retourne les chemins complets
Donc pas de StringCompare, mais StringInStr ou StringRegExp ^^
► Afficher le texte
Code : Tout sélectionner
For $J = 1 To UBound($ar_Array) - 1
For $k = 0 To UBound($whilelist) - 1
; MsgBox(0, "$ar_Array", $ar_Array[$J])
; MsgBox(0, "$whilelist", $whilelist[$k])
If StringInStr($ar_Array[$J], $whilelist[$k]) Then ContinueLoop 2
Next
$true = 1
FileWriteLine($TXT, "[" & $recherche[$I] & "]" & " -> " & $ar_Array[$J])
NextRe: [R] Créer une WhiteList
Posté : lun. 18 juin 2012 20:33
par Saachaa
Salut tout le monde !
@Mikell, je teste de suite. NDD ça veut dire quoi ?
@Tlem, Oui j'ai d'ailleurs choisis ma fonction de recherche la dedans, mais je voulais absolument faire un array (pour mes connaissances personnelles
).
@Mikell, je teste de suite. NDD ça veut dire quoi
?@Tlem, Oui j'ai d'ailleurs choisis ma fonction de recherche la dedans, mais je voulais absolument faire un array (pour mes connaissances personnelles
).Re: [R] Créer une WhiteList
Posté : lun. 18 juin 2012 20:36
par blacksoul305
NdD = Nom de Dieu. Enfin, moi j'ai compris ça.
Re: [R] Créer une WhiteList
Posté : lun. 18 juin 2012 21:50
par Saachaa
Ha oui pas bête !
Bah il ne trouve rien même avec ça...
J'ai mis la partie des fois que...
Fichier : hacking.exe sur le bureau, il ne trouve pas...
Bah il ne trouve rien même avec ça...
J'ai mis la partie des fois que...
Fichier : hacking.exe sur le bureau, il ne trouve pas...
► Afficher le texte
Dim $recherche[24] = _
["*crack*", _
"*serial*key*", _
"*keymaker*", _
"*keygen*", _
"*pirater*", _
"*piratage*", _
"*removeWAT*", _
"*XP*Activat*", _
"*Vista*Activat*", _
"*Seven*Activat*", _
"*chew*wga*", _
"*antiwat*", _
"*winkeygpack*", _
"*AntiGA*", _
"*wga*fix*", _
"*wga*remover*", _
"*MGA_crack*", _
"*Keyfinder*", _
"*AntiWPA*", _
"xpkey.exe", _
"nec-XPact.exe", _
"hale.exe", _
"watermark.exe", _
"*hack*"]
Dim $whilelist[24] = _
["VLC", _
".png", _
".ico", _
".wav", _
".frm", _
".md3", _
".dss", _
".wav", _
".wkz", _
".mp3", _
".pat", _
".class", _
"iehacks", _
"ResHack", _
"hackman", _
"ophcrack", _
"eggcrack", _
"WildGames", _
"imageshack", _
"firecrackle", _
"ImagesHackUs", _
"IE5Mac_backslash_hack.csn", _
"\Dreamweaver\configuration\Content\Reference\PHP"]
FileWriteLine($TXT, "¤¤¤¤¤¤¤¤| Résultat de la recherche" & @CRLF)
FileWriteLine($TXT, "")
FileWriteLine($TXT, "")
For $a = 1 To $disque[0]
For $I = 0 To UBound($recherche) - 1
Global $drive = StringUpper($disque[$a])
Global $ar_Array = _FileListToArrayEx($drive, $recherche[$I], 1, "", True)
For $J = 1 To UBound($ar_Array) - 1
For $k = 0 To UBound($whilelist) - 1
If StringInStr($ar_Array[$J], $whilelist[$k]) = 0 Then ContinueLoop 2
$true = 2
FileWriteLine($TXT, "| " & $recherche[$I] & " | " & $ar_Array[$J])
Next
Next
Next
Next
["*crack*", _
"*serial*key*", _
"*keymaker*", _
"*keygen*", _
"*pirater*", _
"*piratage*", _
"*removeWAT*", _
"*XP*Activat*", _
"*Vista*Activat*", _
"*Seven*Activat*", _
"*chew*wga*", _
"*antiwat*", _
"*winkeygpack*", _
"*AntiGA*", _
"*wga*fix*", _
"*wga*remover*", _
"*MGA_crack*", _
"*Keyfinder*", _
"*AntiWPA*", _
"xpkey.exe", _
"nec-XPact.exe", _
"hale.exe", _
"watermark.exe", _
"*hack*"]
Dim $whilelist[24] = _
["VLC", _
".png", _
".ico", _
".wav", _
".frm", _
".md3", _
".dss", _
".wav", _
".wkz", _
".mp3", _
".pat", _
".class", _
"iehacks", _
"ResHack", _
"hackman", _
"ophcrack", _
"eggcrack", _
"WildGames", _
"imageshack", _
"firecrackle", _
"ImagesHackUs", _
"IE5Mac_backslash_hack.csn", _
"\Dreamweaver\configuration\Content\Reference\PHP"]
FileWriteLine($TXT, "¤¤¤¤¤¤¤¤| Résultat de la recherche" & @CRLF)
FileWriteLine($TXT, "")
FileWriteLine($TXT, "")
For $a = 1 To $disque[0]
For $I = 0 To UBound($recherche) - 1
Global $drive = StringUpper($disque[$a])
Global $ar_Array = _FileListToArrayEx($drive, $recherche[$I], 1, "", True)
For $J = 1 To UBound($ar_Array) - 1
For $k = 0 To UBound($whilelist) - 1
If StringInStr($ar_Array[$J], $whilelist[$k]) = 0 Then ContinueLoop 2
$true = 2
FileWriteLine($TXT, "| " & $recherche[$I] & " | " & $ar_Array[$J])
Next
Next
Next
Next
Re: [R] Créer une WhiteList
Posté : lun. 18 juin 2012 22:22
par blacksoul305
Ne pas oublier la balise code dans le spoiler
Re: [R] Créer une WhiteList
Posté : lun. 18 juin 2012 23:40
par mikell
Tu m'aurais mis d'emblée du code utilisable, on aurait gagné du temps
Là j'ai fait un script de test (donc à adapter) mais qui marche ^^
Là j'ai fait un script de test (donc à adapter) mais qui marche ^^
► Afficher le texte
Code : Tout sélectionner
;#Include <Array.au3>
Dim $recherche[24] = _
["*chants*", _
"*serial*key*", _
"*keymaker*", _
"*keygen*", _
"*pirater*", _
"*piratage*", _
"*removeWAT*", _
"*XP*Activat*", _
"*Vista*Activat*", _
"*Seven*Activat*", _
"*chew*wga*", _
"*antiwat*", _
"*winkeygpack*", _
"*AntiGA*", _
"*wga*fix*", _
"*wga*remover*", _
"*MGA_crack*", _
"*Keyfinder*", _
"*AntiWPA*", _
"xpkey.exe", _
"nec-XPact.exe", _
"hale.exe", _
"watermark.exe", _
"*hack*"]
Dim $whilelist[24] = _
["VLC", _
".png", _
".ico", _
".wav", _
".frm", _
".md3", _
".dss", _
".wav", _
".wkz", _
".mp3", _
".pat", _
".class", _
"iehacks", _
"ResHack", _
"hackman", _
"ophcrack", _
"eggcrack", _
"WildGames", _
"imageshack", _
"firecrackle", _
"ImagesHackUs", _
"IE5Mac_backslash_hack.csn", _
"\Dreamweaver\configuration\Content\Reference\PHP"]
$TXT = "1.txt"
FileWriteLine($TXT, "¤¤¤¤¤¤¤¤| Résultat de la recherche" & @CRLF)
FileWriteLine($TXT, "")
FileWriteLine($TXT, "")
For $I = 0 To UBound($recherche) - 1
$ar_Array = _FileListToArrayEx(@desktopdir, $recherche[$I], 1, "", True)
;_ArrayDisplay($ar_Array)
For $J = 1 To UBound($ar_Array) - 1
For $k = 0 To UBound($whilelist) - 1
$f = 0
If StringInStr($ar_Array[$J], $whilelist[$k]) Then
$f = 1
Exitloop
EndIf
Next
If $f = 0 Then
$true = 2
FileWriteLine($TXT, "| " & $recherche[$I] & " | " & $ar_Array[$J])
EndIf
Next
Next
;=======================================================================
Func _FileListToArrayEx($sPath, $sFilter = '*.*', $iFlag = 0, $sExclude = '', $iRecurse = False)
If Not FileExists($sPath) Then Return SetError(1, 1, '')
If $sFilter = -1 Or $sFilter = Default Then $sFilter = '*.*'
If $iFlag = -1 Or $iFlag = Default Then $iFlag = 0
If $sExclude = -1 Or $sExclude = Default Then $sExclude = ''
Local $aBadChar[6] = ['\', '/', ':', '>', '<', '|']
$sFilter = StringRegExpReplace($sFilter, '\s*;\s*', ';')
If StringRight($sPath, 1) <> '\' Then $sPath &= '\'
For $iCC = 0 To 5
If StringInStr($sFilter, $aBadChar[$iCC]) Or _
StringInStr($sExclude, $aBadChar[$iCC]) Then Return SetError(2, 2, '')
Next
If StringStripWS($sFilter, 8) = '' Then Return SetError(2, 2, '')
If Not ($iFlag = 0 Or $iFlag = 1 Or $iFlag = 2) Then Return SetError(3, 3, '')
Local $oFSO = ObjCreate("Scripting.FileSystemObject"), $sTFolder
$sTFolder = $oFSO.GetSpecialFolder(2)
Local $hOutFile = @TempDir & $oFSO.GetTempName
If Not StringInStr($sFilter, ';') Then $sFilter &= ';'
Local $aSplit = StringSplit(StringStripWS($sFilter, 8), ';'), $sRead, $sHoldSplit
For $iCC = 1 To $aSplit[0]
If StringStripWS($aSplit[$iCC],8) = '' Then ContinueLoop
If StringLeft($aSplit[$iCC], 1) = '.' And _
UBound(StringSplit($aSplit[$iCC], '.')) - 2 = 1 Then $aSplit[$iCC] = '*' & $aSplit[$iCC]
$sHoldSplit &= '"' & $sPath & $aSplit[$iCC] & '" '
Next
$sHoldSplit = StringTrimRight($sHoldSplit, 1)
If $iRecurse Then
RunWait(@Comspec & ' /c dir /b /s /a ' & $sHoldSplit & ' > "' & $hOutFile & '"', '', @SW_HIDE)
Else
RunWait(@ComSpec & ' /c dir /b /a ' & $sHoldSplit & ' /o-e /od > "' & $hOutFile & '"', '', @SW_HIDE)
EndIf
$sRead &= FileRead($hOutFile)
If Not FileExists($hOutFile) Then Return SetError(4, 4, '')
FileDelete($hOutFile)
If StringStripWS($sRead, 8) = '' Then SetError(4, 4, '')
Local $aFSplit = StringSplit(StringTrimRight(StringStripCR($sRead), 1), @LF)
Local $sHold, $a_AnsiFName
For $iCC = 1 To $aFSplit[0]
; translate DOS filenames from OEM to ANSI
$a_AnsiFName = DllCall('user32.dll','Int','OemToChar','str',$aFSplit[$iCC],'str','')
If @error=0 Then $aFSplit[$iCC] = $a_AnsiFName[2]
If $sExclude And StringLeft($aFSplit[$iCC], _
StringLen(StringReplace($sExclude, '*', ''))) = StringReplace($sExclude, '*', '') Then ContinueLoop
Switch $iFlag
Case 0
If StringRegExp($aFSplit[$iCC], '\w:\\') = 0 Then
$sHold &= $sPath & $aFSplit[$iCC] & Chr(1)
Else
$sHold &= $aFSplit[$iCC] & Chr(1)
EndIf
Case 1
If StringInStr(FileGetAttrib($sPath & '\' & $aFSplit[$iCC]), 'd') = 0 And _
StringInStr(FileGetAttrib($aFSplit[$iCC]), 'd') = 0 Then
If StringRegExp($aFSplit[$iCC], '\w:\\') = 0 Then
$sHold &= $sPath & $aFSplit[$iCC] & Chr(1)
Else
$sHold &= $aFSplit[$iCC] & Chr(1)
EndIf
EndIf
Case 2
If StringInStr(FileGetAttrib($sPath & '\' & $aFSplit[$iCC]), 'd') Or _
StringInStr(FileGetAttrib($aFSplit[$iCC]), 'd') Then
If StringRegExp($aFSplit[$iCC], '\w:\\') = 0 Then
$sHold &= $sPath & $aFSplit[$iCC] & Chr(1)
Else
$sHold &= $aFSplit[$iCC] & Chr(1)
EndIf
EndIf
EndSwitch
Next
If StringTrimRight($sHold, 1) Then Return StringSplit(StringTrimRight($sHold, 1), Chr(1))
Return SetError(4, 4, '')
EndFuncRe: [R] Créer une WhiteList
Posté : mar. 19 juin 2012 11:52
par Saachaa
Désolé je pensais avoir mis cela...
j'ai modifié ça marche Mikell, merci !
Je remets un R de plus dans le sujet ?
j'ai modifié ça marche Mikell
, merci !Je remets un R de plus dans le sujet
?Heures au format UTC+02:00
Page 2 sur 2
Page 2 sur 2
Développé par phpBB® Forum Software © phpBB Limited
Traduit par phpBB-fr.com