[TUTO] Faire un Anti-Spam
Bien le bonjour peuple de cheat-gam3 aujourd'hui je vais vous apprendre a faire votre propre Anti-Spam avec AutoIt.
Commençons:
Tout d'abord faite un nouveau document Script AutoIt
Appellez le comme vous voulez puis allez sur Koda(Form Designer)
Votre Form dois contenir ceci:
Code PHP:
un premier label (texte qui dira d'écrire ce qu'il y aura dans le label2)
un deuxième label (qui dira ce que l'on dois écrire dans l'input
un input (case ou l'on peut écrire a l'intérieur)
un button, pour lancer l'action.
Ensuite copier le code que cet form vous donne et coller la sur scite.Vous devriez avoir quelque chose comme ça:
Code PHP:
#include <ButtonConstants.au3>
#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>
#Region ### START Koda GUI section ### Form=
Global $Form1 = GUICreate("Anti-Spam", 186, 161, 404, 188)
Global $Label1 = GUICtrlCreateLabel("Ecrivez ce qui va suivre ci-dessous", 8, 16, 170, 17)
Global $Label2 = GUICtrlCreateLabel("Label2", 72, 48, 36, 17)
Global $Input1 = GUICtrlCreateInput("", 8, 72, 169, 21)
Global $Button1 = GUICtrlCreateButton("Go", 16, 104, 153, 41, $WS_GROUP)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###
While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit
EndSwitch
WEnd
Code PHP:
#Region ### START Koda GUI section ### Form=
Code PHP:
$Anti_Spam = Random(0,999999,1);$Anti_Spam est une variable qui ici est un nombre entier aléatoir compris entre 0 et 999999
Voici l'état des choses:
Code PHP:
#include <ButtonConstants.au3>
#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>
#Region ### START Koda GUI section ### Form=
$Anti_Spam = Random(0,999999,1);$Anti_Spam est une variable qui ici est un nombre entier aléatoir compris entre 0 et 999999
Global $Form1 = GUICreate("Anti-Spam", 186, 161, 404, 188)
Global $Label1 = GUICtrlCreateLabel("Ecrivez ce qui va suivre ci-dessous", 8, 16, 170, 17)
Global $Label2 = GUICtrlCreateLabel($Anti_Spam, 72, 48, 36, 17)
Global $Input1 = GUICtrlCreateInput("", 8, 72, 169, 21)
Global $Button1 = GUICtrlCreateButton("Go", 16, 104, 153, 41, $WS_GROUP)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###
While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit
EndSwitch
WEnd
Code PHP:
Case $button1
Ecrivez
Code PHP:
$lecture = GUIctrlread($input1)
cela permet au programme de lire ce qu'il y a d'écrit dans $input1 quand on lui demandera.
A la suite mettez
Code PHP:
If $lecture <> $Anti_Spam then
Msgbox(4096,"","Erreur !")
Voila ou on en est:
Code PHP:
#include <ButtonConstants.au3>
#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>
#Region ### START Koda GUI section ### Form=
$Anti_Spam = Random(0,999999,1);$Anti_Spam est une variable qui ici est un nombre entier aléatoir compris entre 0 et 999999
Global $Form1 = GUICreate("Anti-Spam", 186, 161, 404, 188)
Global $Label1 = GUICtrlCreateLabel("Ecrivez ce qui va suivre ci-dessous", 8, 16, 170, 17)
Global $Label2 = GUICtrlCreateLabel($Anti_Spam, 72, 48, 36, 17)
Global $Input1 = GUICtrlCreateInput("", 8, 72, 169, 21)
Global $Button1 = GUICtrlCreateButton("Go", 16, 104, 153, 41, $WS_GROUP)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###
While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit
Case $Button1
$lecture = GUIctrlread($input1)
If $lecture <> $Anti_Spam then
Msgbox(4096,"","Erreur !")
EndSwitch
WEnd
pour ça mettez:
Code PHP:
Else
MsgBox(4096,"","Merci")
;ici vous mettez le code de votre programme
EndIf
Code PHP:
#include <ButtonConstants.au3>
#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>
#Region ### START Koda GUI section ### Form=
$Anti_Spam = Random(0,999999,1);$Anti_Spam est une variable qui ici est un nombre entier aléatoir compris entre 0 et 999999
Global $Form1 = GUICreate("Anti-Spam", 186, 161, 404, 188)
Global $Label1 = GUICtrlCreateLabel("Ecrivez ce qui va suivre ci-dessous", 8, 16, 170, 17)
Global $Label2 = GUICtrlCreateLabel($Anti_Spam, 72, 48, 36, 17)
Global $Input1 = GUICtrlCreateInput("", 8, 72, 169, 21)
Global $Button1 = GUICtrlCreateButton("Go", 16, 104, 153, 41, $WS_GROUP)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###
While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit
Case $Button1
$lecture = GUIctrlread($input1)
If $lecture <> $Anti_Spam then
Msgbox(4096,"","Erreur !")
Else
MsgBox(4096,"","Merci")
EndIf
EndSwitch
WEnd
Voila j'espere que vous avez apprécié ce tuto qui ma pri du temps a écrire et puis voila ...
AUREVOIR peuple de cheat-gam3