BB4e Posted June 20, 2009 Posted June 20, 2009 hi guys ive got following problem. i have made a window with 2 lines to write in. i want 1 of them not to show what is written in it, but it doesnt work. my script looks like this: #include <GuiConstantsEx.au3> #include <EditConstants.au3> #include <StaticConstants.au3> #include <GuiEdit.au3> dim $1 dim $2 dim $3 dim $4 dim $5 dim $id dim $pw dim $ID dim $PW dim $msg dim $pixel Opt('MustDeclareVars', 1) Local $hEdit GUICreate("loginbot", 150, 100) $1=guictrlcreatebutton("CH1", 0, 0, 30) $2=guictrlcreatebutton("CH2", 30, 0, 30) $3=guictrlcreatebutton("CH3", 60, 0, 30) $4=guictrlcreatebutton("CH4", 90, 0, 30) $5=guictrlcreatebutton("CH5", 120, 0, 30) GUICtrlCreateLabel("ID:", 10, 34) GUICtrlCreateLabel("PW:", 10, 64) $id=GuiCtrlCreateInput("", 40, 30, 100) $pw=GuiCtrlCreateInput("", 40, 60, 100, $ES_PASSWORD) GUISetState() GUISetState(@SW_SHOW) While 1 $msg = GUIGetMsg(1) Select Case $msg[0] = $GUI_EVENT_CLOSE ExitLoop EndSelect WEnd need help
Zedna Posted June 20, 2009 Posted June 20, 2009 $pw=GuiCtrlCreateInput("", 40, 60, 100, 25, $ES_PASSWORD) Resources UDF ResourcesEx UDF AutoIt Forum Search
BB4e Posted June 20, 2009 Author Posted June 20, 2009 (edited) i have one more problem. i want my window to make sth when i klick on the button. it should be a login bot. i wrote it this way but it just work 1 time: While 1 $msg = GUIGetMsg(1) Select Case $msg[0] = $1 $ID=GUICtrlRead($id, 1) $PW=GUICtrlRead($pw, 1) Dim $pixel = PixelGetColor(266,292) MouseMove(700,590) MouseClick("left") MouseClick("left") Sleep(500) MouseMove(930,570) MouseClick("left") MouseMove(960,880) MouseClick("left") Send($ID) Send("{TAB}") Send($PW) Send("{enter}") Do sleep(500) $pixel = PixelGetColor(266,292) Until hex($pixel) = 00400504 MouseMove(230,640) MouseClick("left") Case $msg[0] = $2 $ID=GUICtrlRead($id, 1) $PW=GUICtrlRead($pw, 1) Dim $pixel = PixelGetColor(266,292) MouseMove(700,590) MouseClick("left") MouseClick("left") Sleep(500) MouseMove(930,588) MouseClick("left") MouseMove(960,880) MouseClick("left") Send($ID) Send("{TAB}") Send($PW) Send("{enter}") Do sleep(500) $pixel = PixelGetColor(266,292) Until hex($pixel) = 00400504 MouseMove(230,640) MouseClick("left") Case $msg[0] = $3 $ID=GUICtrlRead($id, 1) $PW=GUICtrlRead($pw, 1) Dim $pixel = PixelGetColor(266,292) MouseMove(700,590) MouseClick("left") MouseClick("left") Sleep(500) MouseMove(930,605) MouseClick("left") MouseMove(960,880) MouseClick("left") Send($ID) Send("{TAB}") Send($PW) Send("{enter}") Do sleep(500) $pixel = PixelGetColor(266,292) Until hex($pixel) = 00400504 MouseMove(230,640) MouseClick("left") Case $msg[0] = $4 $ID=GUICtrlRead($id, 1) $PW=GUICtrlRead($pw, 1) Dim $pixel = PixelGetColor(266,292) MouseMove(700,590) MouseClick("left") MouseClick("left") Sleep(500) MouseMove(930,621) MouseClick("left") MouseMove(960,880) MouseClick("left") Send($ID) Send("{TAB}") Send($PW) Send("{enter}") Do sleep(500) $pixel = PixelGetColor(266,292) Until hex($pixel) = 00400504 MouseMove(230,640) MouseClick("left") Case $msg[0] = $5 $ID=GUICtrlRead($id, 1) $PW=GUICtrlRead($pw, 1) Dim $pixel = PixelGetColor(266,292) MouseMove(700,590) MouseClick("left") MouseClick("left") Sleep(500) MouseMove(930,638) MouseClick("left") MouseMove(960,880) MouseClick("left") Send($ID) Send("{TAB}") Send($PW) Send("{enter}") Do sleep(500) $pixel = PixelGetColor(266,292) Until hex($pixel) = 00400504 MouseMove(230,640) MouseClick("left") Case $msg[0] = $GUI_EVENT_CLOSE ExitLoop EndSelect WEnd Edited June 20, 2009 by BB4e
Recommended Posts
Create an account or sign in to comment
You need to be a member in order to leave a comment
Create an account
Sign up for a new account in our community. It's easy!
Register a new accountSign in
Already have an account? Sign in here.
Sign In Now