PETIT ANALYSEUR ANTI-VIRUS DE FICHIERS BATCH (.BAT)
cs_Patrice99
Messages postés
1221
Date d'inscription
jeudi 23 août 2001
Statut
Membre
Dernière intervention
9 septembre 2018
-
20 mars 2005 à 13:14
zippedfire Messages postés 98 Date d'inscription mercredi 6 octobre 2010 Statut Membre Dernière intervention 21 novembre 2023 - 30 juil. 2011 à 19:40
zippedfire Messages postés 98 Date d'inscription mercredi 6 octobre 2010 Statut Membre Dernière intervention 21 novembre 2023 - 30 juil. 2011 à 19:40
Cette discussion concerne un article du site. Pour la consulter dans son contexte d'origine, cliquez sur le lien ci-dessous.
https://codes-sources.commentcamarche.net/source/30205-petit-analyseur-anti-virus-de-fichiers-batch-bat
https://codes-sources.commentcamarche.net/source/30205-petit-analyseur-anti-virus-de-fichiers-batch-bat
30 juil. 2011 à 19:40
25 nov. 2007 à 12:49
system("pause") la commande pause, ben c'est du dos !
on peut remplacer pause par toutes sort de commande (à vérifier) on peut faire un exe, au format C, mais basé sur du batch ! c'est un truc qui gache un peu les tuto de C/C++
mais se language est inremplacable (le C)
note : il est important de dire se que fait le prog !
mais sa sert un peu à rien, les batch ne son plus utiliser, et en plus cique droit su le fichier => modifier on n'a le code source !
25 nov. 2007 à 07:51
5 juil. 2007 à 22:21
parce que je vais le complier : bat>exe
hi hi hi hi ^^
5 juil. 2007 à 22:12
super ! (marche pas su mon ordi)
moi qui est justemment en rain de faire du VRAI virus batch...
si tu veut je te l'envoie tu le scan....
ps : vmon petit virus, se reproduit..grace à Autoexec.bat...
et il éteint l'ordi à chaque démmérage....
(technique qui marche que sur Win98)
24 mars 2005 à 14:36
erase *.*
bref ... Moi j'ai déposer une source MicroWriter ai je t'aiderai pour ce qui est traitement de mot !
21 mars 2005 à 18:04
Je vais refaire la source (si j'ai le temps ...)
21 mars 2005 à 17:14
If InStr(UCase(TextBox1.Text), "LE MOT") <> 0 Then MonText.text = "Apparement OUI"
ça tie en une seule ligne et le code est + lisible ( c mon avi en tt cas )
21 mars 2005 à 10:42
Found = InStr(sChaine, "LE_MOT")
20 mars 2005 à 17:51
Pour rechercher, j'utilise :
Found = InStr(TextBox1.Text, "le_mot")
If Found <> 0 Then
MonText.Text = "Apparament OUI !"
End if
Peut-tu me dire où il faut mettre "ToUpper", merci.
20 mars 2005 à 13:14
Tu peux aussi mettre les mots clés dans un fichier de signatures.