AM电脑吧登陆器AU3源码

1. 
   
2. #include <ButtonConstants.au3>
   
3. #include <EditConstants.au3>
   
4. #include <GUIConstantsEx.au3>
   
5. #include <StaticConstants.au3>
   
6. #include <WindowsConstants.au3>
   
7. #include <IE.au3>
   
8. Opt("TrayMenuMode",1)
   
9. #Region ### START Koda GUI section ###
   
10. $Form1_1 = GUICreate("AM电脑吧登陆器", 242, 132, 192, 124)
    
11. $Label1 = GUICtrlCreateLabel("用户名：", 24, 36, 52, 17)
    
12. $Label2 = GUICtrlCreateLabel("密  码：", 24, 63, 54, 17)
    
13. $Input1 = GUICtrlCreateInput("", 70, 31, 145, 21)
    
14. $Input2 = GUICtrlCreateInput("", 70, 58, 145, 21)
    
15. $Group1 = GUICtrlCreateGroup("登陆：", 8, 8, 225, 113)
    
16. GUICtrlSetColor(-1, 0x0000FF)
    
17. GUICtrlCreateGroup("", -99, -99, 1, 1)
    
18. $Button1 = GUICtrlCreateButton("登  陆", 24, 88, 75, 25)
    
19. $Button2 = GUICtrlCreateButton("退  出", 136, 88, 75, 25)
    
20. GUISetState(@SW_SHOW)
    
21. #EndRegion ### END Koda GUI section ###
    
22. While 1
    
23. $nMsg = GUIGetMsg()
    
24. Switch $nMsg
    
25.   Case $GUI_EVENT_CLOSE
    
26.    Exit
    
27.         Case $Button1
    
28. _IECreate("https://www.ampc8.com/logging.php?action=login")   
    
29. Send( GUICtrlRead($Input1))
    
30. Send("{TAB}")
    
31. Send( GUICtrlRead($Input2))
    
32. Send("{ENTER}")
    
33. Exit
    
34.   Case $Button2
    
35.   Exit
    
36. EndSwitch
    
37. WEnd
    

复制代码

牛逼牛逼

真需要啊   好的

进来学习一下

学习一下 楼主辛苦了

主楼辛苦，感谢分享。

收下了，谢谢分享

收藏了，楼主辛苦了

回帖一下，支持！！

楼主辛苦，谢谢分享。