Thời Gian

Đang tải...
  • ProgressOn("Ðang Khởi Ðộng Tool Vui Lòng Chờ", "Ðang Khởi Ðộng", "0%"); Just to let more beautiful
    For $i = 1 To 100 Step 1
        Sleep(100)
        ProgressSet($i, $i & "%")
    Next
    ProgressSet(100, "Full Load", "Complete")
    Sleep(500)
    ProgressOff()
    MsgBox(0,'thông báo',"chạy tool thành công")
    MsgBox(0,'thông báo',"Vui Lòng Đăng Nhập Để Sử Dụng Tool")

    #include <ButtonConstants.au3>
    #include <EditConstants.au3>
    #include <GUIConstantsEx.au3>
    #include <StaticConstants.au3>
    #include <WindowsConstants.au3>
    #Region ### START Koda GUI section ### Form=
    $Form1 = GUICreate("Form1", 190, 149, 192, 164)
    $Label1 = GUICtrlCreateLabel("Login", 64, 0, 88, 41)
    GUICtrlSetFont(-1, 24, 800, 0, "MS Sans Serif")
    GUICtrlSetColor(-1, 0x00FFFF)
    $Label2 = GUICtrlCreateLabel("Tài Khoản", 8, 56, 74, 20)
    GUICtrlSetFont(-1, 10, 800, 0, "MS Sans Serif")
    GUICtrlSetColor(-1, 0x00FF00)
    $Label3 = GUICtrlCreateLabel("Mật Khẩu", 8, 88, 67, 20)
    GUICtrlSetFont(-1, 10, 800, 0, "MS Sans Serif")
    GUICtrlSetColor(-1, 0x00FF00)
    $Input1 = GUICtrlCreateInput("", 80, 56, 105, 21)
    $Input2 = GUICtrlCreateInput("", 80, 88, 105, 21, BitOR($GUI_SS_DEFAULT_INPUT,$ES_PASSWORD))
    $Button1 = GUICtrlCreateButton("Đăng Nhập", 80, 112, 99, 25)
    GUISetState(@SW_SHOW)
    #EndRegion ### END Koda GUI section ###

    While 1
    $nMsg = GUIGetMsg()
    Switch $nMsg
    Case $GUI_EVENT_CLOSE
    Exit
    Case $Button1
    If GUICtrlRead($Input1)='admin' And GUICtrlRead($Input2)='loveanime123' Then
    MsgBox(0,"Thông Báo","Đăng Nhập Thành Công")
        GUIDelete($Form1)
    #include <ButtonConstants.au3>
    #include <GUIConstantsEx.au3>
    #include <WindowsConstants.au3>
    #Region ### START Koda GUI section ### Form=
    $Form2 = GUICreate("Form2", 615, 438, 191, 165)
    GUISetFont(8, 800, 0, "MS Sans Serif")
    $Button1 = GUICtrlCreateButton("Button1", 24, 88, 75, 25)
    $Button2 = GUICtrlCreateButton("Button2", 24, 32, 73, 49)
    $Button3 = GUICtrlCreateButton("Button3", 24, 120, 75, 25)
    $Button4 = GUICtrlCreateButton("Button4", 120, 40, 75, 25)
    $Button5 = GUICtrlCreateButton("Button5", 120, 80, 75, 25)
    $Button6 = GUICtrlCreateButton("Button6", 128, 112, 75, 25)
    GUISetState(@SW_SHOW)
    #EndRegion ### END Koda GUI section ###

    While 1
    $nMsg = GUIGetMsg()
    Switch $nMsg
    Case $GUI_EVENT_CLOSE
    Exit

    EndSwitch
    WEnd

    Else
    MsgBox(0,'Thông Báo',"Sai Tên Đăng Nhập Hoặc Mật Khẩu")
    EndIf
    EndSwitch
    WEnd


  • Copyright © - ෴χїη ¢ɦàσ ¢á¢ bạη෴

    ෴χїη ¢ɦàσ ¢á¢ bạη෴ - Powered by Blogger - Designed by Johanes Djogan