*Kuja* |
|
| Ecco qua un semplice cerca per le MD5 -semplice ma buono -non serve aprire internet -si basa su http://md5.rednoize.com/sorcio CODICE #include <ButtonConstants.au3> #include <EditConstants.au3> #include <GUIConstantsEx.au3> #include <StaticConstants.au3> #include <WindowsConstants.au3> #Include<Inet.au3> #NoTrayIcon ;creato da Kuja ver 2.0 $Form1 = GUICreate("MD5-risali alla parola", 301, 310, 193, 115) $Pic1 = GUICtrlCreatePic("imagemd5lookupwidget_20070725131833.jpg", 0, 0, 297, 289, BitOR($SS_NOTIFY,$WS_GROUP,$WS_CLIPSIBLINGS)) GuiCtrlSetState(-1,$GUI_DISABLE) $Input1 = GUICtrlCreateInput("", 72, 96, 153, 21) $Input2 = GUICtrlCreateInput("", 72, 184, 153, 21) $Risali = GUICtrlCreateButton("Risali", 112, 240, 75, 25, 0) GUISetState(@SW_SHOW) $MenuItem6 = GUICtrlCreateMenu("Info") $MenuItem2 = GUICtrlCreateMenuItem("Info", $MenuItem6)
While 1 $nMsg = GUIGetMsg() Switch $nMsg case $Risali if GUIctrlread($Input1) = "" Then MsgBox(64,"attenzione","Attenzione inserire l'hash in MD5 oppure Insert MD5 Valid") ;se non c'θ scritto nulla in input viene dichiarato un errore Else ;altrimenti $trova=GUIctrlread($Input1) ;La variabile si chiama trova e controlla quello che viene scritto in input1 GuiCtrlSetData($Input2,"Password: "&_inetgetsource("http://md5.rednoize.com/?p&submit&s=md5&q="&$trova)) ;Trova la password sostituendo l'ultima parte del link per la parola che aveva controllato prima la variabile endif
Case $MenuItem2 MsgBox(64,"Info","Il programma θ stato creato by Kuja") ;Informazioni tramite semplice msgbox Case $GUI_EVENT_CLOSE ;per chiudere la GUI Exit
EndSwitch
WEnd per scaricare
|
| |