RyGoTypE

@JohnOne There was no need to apply your code, AndyG corrected my issue here! @AndyG PixelSearch -- Searches a rectangle of pixels for the pixel color provided. PixelSearch ( left, top, right, bottom, color [, shade-variation [, step [, hwnd]]] ) You were right champ! Thank you very much. I had my coordinates mixed up. Script works perfectly now with correct coordinates! haha. Thanks guys.

Okay, I updated the code. Does that seem more accurate? It still does nothing with the bottom frame. It just skips the find Box A and find Link A. Sleeps for 30 seconds, then clicks the arrow in the top frame. I don't know why it's not doing anything with the bottom frame...

Does PixelSearch() work in website frames? It doesn't seem to be working for me. ; Search for Box A Color: 0xFFFFD8 $box_a = PixelSearch(135, 503, 253, 354, 0xFFFFD8, 5) If Not @error Then MouseMove($box_a[0], $box_a[1], 10) ToolTip('Found Box A! Now find Link A.',0,0) Sleep(5000) EndIf ; Find Link A and click it Color: 0x0000FF $link_a = PixelSearch(140, 500, 258, 351, 0x0000FF, 5) If Not @error Then MouseMove($link_a[0], $link_a[1], 10) ToolTip('Found Link A! Now click Link A.',0,0) Sleep(2000) MouseClick ("left", $link_a[0], $link_a[1], 1, 10) ToolTip('Clicked Link A! Now wait for the page to count down before clicking the arrow.',0,0) EndIf Sleep(30000) ; 30 second rest ; Search for the top section for the Next Arrow Color: 0xFFFFCC $coord = PixelSearch( 0, 135, 1023, 225, 0xFFFFCC ) If Not @error Then MouseMove($coord[0], $coord[1], 10) ToolTip('Next Arrow Located!',0,0) Sleep(2000) ; 2 second rest MouseClick ("left", $coord[0], $coord[1], 1, 10) ToolTip('Next Arrow clicked! Now wait for the page to load and find Box B.',0,0) Sleep(5000) ; 5 second rest EndIf ToolTip('Script not finished, but this is a decent start.',0,0) Sleep(5000) ; 5 second rest It works perfectly on the top frame, but the bottom frame doesn't seem to work. (Bottom frame is where boxes and links are being searched and the top frame is where the arrow is being searched.)

i tried everythinkg i could think of to connect to my website and login with the specified username/password entered into the gui. still no luck connecting to my site. i also wasnt able to connect through sql either. reason i made the switch over from sql to http is safer for the website. but the only problem with http is its more unsafe for the client. cookies create an issue storing usernames and passwords in the search bar. someone with a hex editor could break down the code and get the information for the username and login of my database on the site. so either way its not looking super fantastic. but id much rather login via http. i wish i could get this working properly!

I don't know what I could be doing wrong, I made some corrections from your suggestions and I still cant seem to get it working properly.

This topic seems a little... Dead? I don't know how much help I could receive... but if anyone still happens to read this then I am square. I made my switch over from MySQL to HTTP, but now I can't seem to get this to work. I'll post what I have and see if it's any help. I'm trying to make a GUI with a User and Password with a login button. Open the GUI , fill out the user and password and click login. After clicking login, I want it to take the text from the user box and stick it in the proper part of the string and same with the password and then send it to the server and login. here's what I have so far... #include <GUIConstants.au3> #include <String.au3> #include <GuiListView.au3> #include <HTTP.au3> ; GUI GuiCreate("Pdub - Login", 260, 130) ; Creates the username box $InputUser = GuiCtrlCreateInput('',80,30,150,20, 0) ; Creates the password box with blured input $InputPass = GuiCtrlCreateInput('',80,55,150,20, 0x20) ; BUTTON $Login = GuiCtrlCreateButton("Login", 100, 85, 100, 30) $host = "www.shizzkabiz.com" $page = "/login.php" $vars = "username=" & $InputUser & "&userpass=" & $InputPass & "&form_id=myform&userlogin" $url = $page&"?"&_HTTPEncodeString($vars) $socket = _HTTPConnect($host) $get = _HTTPGet($host,$url,$socket) $recv = _HTTPRead($socket,1) ConsoleWrite("Data received:"&@CRLF&$recv&@CRLF) GUISetState () While 1 $msg = GUIGetMsg() If $msg = $Login Then _HTTPPost($host, $page, $socket, $vars) If $msg = $GUI_EVENT_CLOSE Then ExitLoop WEnd

k well first of all, I am back from my long memorial day weekend. How was your weekend? I made my switch over from MySQL to HTTP, but now I can't seem to get this to work. I'll post what I have and see if it's any help. I'm trying to make a GUI with a User and Password with a login button. Open the GUI , fill out the user and password and click login. After clicking login, I want it to take the text from the user box and stick it in the proper part of the string and same with the password and then send it to the server and login. here's what I have so far... #include <GUIConstants.au3> #include <String.au3> #include <GuiListView.au3> #include <HTTP.au3> ; GUI GuiCreate("Pdub - Login", 260, 130) ; Creates the username box $InputUser = GuiCtrlCreateInput('',80,30,150,20, 0) ; Creates the password box with blured input $InputPass = GuiCtrlCreateInput('',80,55,150,20, 0x20) ; BUTTON $Login = GuiCtrlCreateButton("Login", 100, 85, 100, 30) $host = "www.shizzkabiz.com" $page = "/login.php" $vars = "username=" & $InputUser & "&userpass=" & $InputPass & "&form_id=myform&userlogin" $url = $page&"?"&_HTTPEncodeString($vars) $socket = _HTTPConnect($host) $get = _HTTPGet($host,$url,$socket) $recv = _HTTPRead($socket,1) ConsoleWrite("Data received:"&@CRLF&$recv&@CRLF) GUISetState () While 1 $msg = GUIGetMsg() If $msg = $Login Then _HTTPPost($host, $page, $socket, $vars) If $msg = $GUI_EVENT_CLOSE Then ExitLoop WEnd

I was just informed that it is a bad idea to connect through MySQL in a program. "database password can be extracted and someone will delete your db hex editing a program looking at it, its compiled in there, it can be found" and I was informed to ... "make a php script on your side, and just have your program talk to the script using GET/POST thru HTTP" is this do-able?

heh okay, now. I want to login to my website with this script. Check the database if the username is valid and check if the password is valid. If it is INVALID pop up saying invalid username/password combination. and exit script. If it is valid, pop up saying Success! and continue script.

Yeah, I did all of that correctly. I found the problem. My host wasn't allowing Remote MySQL and now it is. Thank you for all your help.

I was actually looking at this post a little bit ago. I tried everything he/she had said to do, but I get the following error. >Running AU3Check (1.54.10.0) from:C:\Program Files\AutoIt3 +>17:36:50 AU3Check ended.rc:0 >Running:(3.2.10.0):C:\Program Files\AutoIt3\autoit3.exe "F:\Autoit\mysql connect.au3" F:\Autoit\mysql.au3 (30) : ==> The requested action with this object has failed.: $ObjConn.open ("DRIVER=" & $sDriver & ";SERVER=" & $sServer & ";DATABASE=" & $sDatabase & ";UID=" & $sUsername & ";PWD=" & $sPassword & ";PORT=" & $iPort) $ObjConn.open ("DRIVER=" & $sDriver & ";SERVER=" & $sServer & ";DATABASE=" & $sDatabase & ";UID=" & $sUsername & ";PWD=" & $sPassword & ";PORT=" & $iPort)^ ERROR

How would I go about connecting via autoit script to a mysql database on my webserver? I've searched topics and example scripts... I'm lost.

I was looking through the SQL information, and I was wondering if it is possible to connect to a database on a webserver.

bump

bump

111 posts and you sound like this is your first time here. You want a script to be ran and set it self to start up with the computer?

What OS are you running?

Using the following code, I was able to get this working over the internet... Server: ;SERVER!! Start Me First !!!!!!!!!!!!!!! #include <GUIConstants.au3> Dim $szServerPC = @ComputerName Dim $g_IP = TCPNameToIP($szServerPC) ; Start The TCP Services ;============================================== TCPStartUp() ; Create a Listening "SOCKET" ;============================================== $MainSocket = TCPListen($g_IP, 65432, 100 ) If $MainSocket = -1 Then Exit $RogueSocket = -1 ; Create a GUI for chatting ;============================================== $GOOEY = GUICreate("my server",300,200) $edit = GUICtrlCreateEdit("",10,40,280,150,$WS_DISABLED) $input = GUICtrlCreateInput("",10,10,200,20) $butt = GUICtrlCreateButton("Send",210,10,80,20,$BS_DEFPUSHBUTTON) GUISetState() ; Initialize a variable to represent a connection ;============================================== Dim $ConnectedSocket = -1 ; GUI Message Loop ;============================================== While 1 $msg = GUIGetMsg() ; GUI Closed ;-------------------- If $msg = $GUI_EVENT_CLOSE Then ExitLoop ; User Pressed SEND ;-------------------- If $msg = $butt Then If $ConnectedSocket > -1 Then $ret = TCPSend( $ConnectedSocket, GUICtrlRead($input)) If @ERROR Or $ret < 0 Then ; ERROR OCCURRED, CLOSE SOCKET AND RESET ConnectedSocket to -1 ;---------------------------------------------------------------- TCPCloseSocket( $ConnectedSocket ) WinSetTitle($GOOEY,"","my server - Client Disconnected") $ConnectedSocket = -1 ElseIf $ret > 0 Then ; UPDATE EDIT CONTROL WITH DATA WE SENT ;---------------------------------------------------------------- GUICtrlSetData($edit, GUICtrlRead($edit) & GUICtrlRead($input) & @CRLF ) EndIf EndIf GUICtrlSetData($input,"") EndIf If $RogueSocket > 0 Then $recv = TCPRecv( $RogueSocket, 512 ) If NOT @error Then TCPCloseSocket( $RogueSocket ) $RogueSocket = -1 EndIf EndIf ; If no connection look for one ;-------------------- If $ConnectedSocket = -1 Then $ConnectedSocket = TCPAccept( $MainSocket) If $ConnectedSocket < 0 Then $ConnectedSocket = -1 Else WinSetTitle($GOOEY,"","my server - Client Connected") EndIf ; If connected try to read some data ;-------------------- Else ; EXECUTE AN UNCONDITIONAL ACCEPT IN CASE ANOTHER CLIENT TRIES TO CONNECT ;---------------------------------------------------------------- $RogueSocket = TCPAccept( $MainSocket) If $RogueSocket > 0 Then TCPSend( $RogueSocket, "~~rejected" ) EndIf $recv = TCPRecv( $ConnectedSocket, 512 ) If $recv <> "" And $recv <> "~~bye" Then ; UPDATE EDIT CONTROL WITH DATA WE RECEIVED ;---------------------------------------------------------------- GUICtrlSetData($edit, GUICtrlRead($edit) & ">" & $recv & @CRLF) ElseIf @error Or $recv = "~~bye" Then ; ERROR OCCURRED, CLOSE SOCKET AND RESET ConnectedSocket to -1 ;---------------------------------------------------------------- WinSetTitle($GOOEY,"","my server - Client Disconnected") TCPCloseSocket( $ConnectedSocket ) $ConnectedSocket = -1 EndIf EndIf WEnd GUIDelete($GOOEY) Func OnAutoItExit() ;ON SCRIPT EXIT close opened sockets and shutdown TCP service ;---------------------------------------------------------------------- If $ConnectedSocket > -1 Then TCPSend( $ConnectedSocket, "~~bye" ) Sleep(2000) TCPRecv( $ConnectedSocket, 512 ) TCPCloseSocket( $ConnectedSocket ) EndIf TCPCloseSocket( $MainSocket ) TCPShutDown() EndFuncoÝ÷ Ø)bz{ZºÚ"µÍÐÓQS ÌÌÎÈÝYHYÝ[ÈHÑTTÌÌÎÉÌÌÎÉÌÌÎÉÌÌÎÉÌÌÎÉÌÌÎÉÌÌÎÉÌÌÎÉÌÌÎÉÌÌÎÉÌÌÎÉÌÌÎÉÌÌÎÉÌÌÎÉÌÌÎÂÈÙYHÔXÝ^[BÚ[ÛYH ÑÕRPÛÛÝ[Ë]LÉÝÂÈÝHÔÙXÙÂÏOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOBÔÝ BÈÙ]ÛÛYH]ØXH[ÂËKKKKKKKKKKKKKKKKKKKKKKKKKBÈÙ] ÌÍÜÞTQTÔÈÈÚ]HÑTTËÙHÚ[Ú[ÙHHÈ[YH[È[TYÜÂ[H ÌÍÜÞTQTÔÈH ][ÝÔÔPÒQPÈVTSTÈÑTT][ÝÂ[H ÌÍÛÔH MÌÈ[]X[^HHXXHÈÙ[HÛÛXÝ[ÛÏOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOB[H ÌÍÐÛÛXÝYÛØÚÙ]HLBÐ][ÈÛÛXÝÈÑTT]]ÈT[Ô MÌÏOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOBÌÍÐÛÛXÝYÛØÚÙ]HÔÛÛXÝ ÌÍÜÞTQTÔË ÌÍÛÔ B[H ÌÍÜÞ]BÈYHÈ[ÜÚÝÈ]YÜ[ÙÐÞ LL ][ÝÑÜ][ÝË ][ÝÕÔÛÛXÝZ[YÚ]ÔÐHÜ ][ÝÈ [ÈÜBÈYHÈÈÜÛÜ[[]ÞÜ]BÈÈÙ[ÈHÑTT[ÙBÓÛÜÜ]ÚÚ[ÈÜ]HÈÙ[ÈHÑTTÚ[HBÈ[]ÞÜ]HÈ[ÛZ] ÌÍÜÞ]HH[]Þ ][ÝÑ]HÜÙ][ÝË [È [È ][ÝÑ[]HÈ[ÛZ]ÈHÑTT][ÝÊBÈY^HØ[Ù[H[]ÞÜX]H][ÈÙH^]ÝÜ]ÛÜYÜÜ ÌÍÜÞ]HH ][ÝÉ][ÝÈ[^]ÛÜÈÙHÚÝ[]H]H[ ÌÍÜÞ]K]È][ÈÙ[]ÝYÚÝÛÛXÝYÛØÚÙ]ÔÙ[ ÌÍÐÛÛXÝYÛØÚÙ] ÌÍÜÞ]JBÈYHÙ[Z[YÚ]Ü[HÛØÚÙ]ÈØÛÛXÝYËKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKBYÜ[^]ÛÜÑ[[Y

bumper stickers

Yeah I'm trying to figure that out my self right now. I keep getting that error from the client over the internet.

Okay, try this... Server: ;SERVER!! Start Me First !!!!!!!!!!!!!!! #include <GUIConstants.au3> Dim $szServerPC = @ComputerName Dim $g_IP = TCPNameToIP($szServerPC) TCPStartup() $MainSocket = TCPListen($g_IP, 65432, 100) If $MainSocket = -1 Then Exit $RogueSocket = -1 $GOOEY = GUICreate("my server", 300, 200) $edit = GUICtrlCreateEdit("", 10, 40, 280, 150, $WS_DISABLED) $input = GUICtrlCreateInput("", 10, 10, 200, 20) $butt = GUICtrlCreateButton("Send", 210, 10, 80, 20, $BS_DEFPUSHBUTTON) GUISetState() Dim $ConnectedSocket = -1 While 1 $msg = GUIGetMsg() If $msg = $GUI_EVENT_CLOSE Then ExitLoop If $msg = $butt Then If $ConnectedSocket > -1 Then $ret = TCPSend($ConnectedSocket, GUICtrlRead($input)) If @error Or $ret < 0 Then TCPCloseSocket($ConnectedSocket) WinSetTitle($GOOEY, "", "my server - Client Disconnected") $ConnectedSocket = -1 ElseIf $ret > 0 Then GUICtrlSetData($edit, GUICtrlRead($edit) & GUICtrlRead($input) & @CRLF) EndIf EndIf GUICtrlSetData($input, "") EndIf If $RogueSocket > 0 Then $recv = TCPRecv($RogueSocket, 512) If Not @error Then TCPCloseSocket($RogueSocket) $RogueSocket = -1 EndIf EndIf If $ConnectedSocket = -1 Then $ConnectedSocket = TCPAccept($MainSocket) If $ConnectedSocket < 0 Then $ConnectedSocket = -1 Else WinSetTitle($GOOEY, "", "my server - Client Connected") EndIf Else $RogueSocket = TCPAccept($MainSocket) If $RogueSocket > 0 Then TCPSend($RogueSocket, "~~rejected") EndIf $recv = TCPRecv($ConnectedSocket, 512) If $recv <> "" And $recv <> "~~bye" Then GUICtrlSetData($edit, GUICtrlRead($edit) & ">" & $recv & @CRLF) ElseIf @error Or $recv = "~~bye" Then WinSetTitle($GOOEY, "", "my server - Client Disconnected") TCPCloseSocket($ConnectedSocket) $ConnectedSocket = -1 EndIf EndIf WEnd GUIDelete($GOOEY) Func OnAutoItExit() If $ConnectedSocket > -1 Then TCPSend($ConnectedSocket, "~~bye") Sleep(2000) TCPRecv($ConnectedSocket, 512) TCPCloseSocket($ConnectedSocket) EndIf TCPCloseSocket($MainSocket) TCPShutdown() EndFunc ;==>OnAutoItExitoÝ÷ Ø)bz{ZºÚ"µÍÚ[ÛYH ÑÕRPÛÛÝ[Ë]LÉÝÂÔÝ B[H ÌÍÜÞÙÈHÛÛ][YB[H ÌÍÜÞTQTÔÈHÔ[YUÒT ÌÍÜÞÙÊB[H ÌÍÛÔH MÌ[H ÌÍÐÛÛXÝYÛØÚÙ]HLBÌÍÐÛÛXÝYÛØÚÙ]HÔÛÛXÝ ÌÍÜÞTQTÔË ÌÍÛÔ B[H ÌÍÜÞ]BYÜ[ÙÐÞ LL ][ÝÑÜ][ÝË ][ÝÕÔÛÛXÝZ[YÚ]ÔÐHÜ ][ÝÈ [ÈÜB[ÙBÚ[HB ÌÍÜÞ]HH[]Þ ][ÝÑ]HÜÙ][ÝË [È [È ][ÝÑ[]HÈ[ÛZ]ÈHÑTT][ÝÊBYÜÜ ÌÍÜÞ]HH ][ÝÉ][ÝÈ[^]ÛÜÔÙ[ ÌÍÐÛÛXÝYÛØÚÙ]TYÜÌH [È ][ÝÈ ][ÝÈ [ÉÌÍÜÞ]JBYÜ[^]ÛÜÑ[[Y

Yeah you can try his if you wish but please, try mine. See if this is what you are looking for... I am kind of an Autoit NOOBIE but I would just like to know if my tweaks helped you or not. #include <GUIConstants.au3> #Region ### START Koda GUI section ### Form= $swt = 0 $GUI = GUICreate("GUI", 681, 471, 187, 118) $Input1 = GUICtrlCreateInput("", 16, 16, 150, 21) $Input2 = GUICtrlCreateInput("", 16, 48, 150, 21) $Input3 = GUICtrlCreateInput("", 16, 80, 150, 21) $Input4 = GUICtrlCreateInput("", 16, 112, 150, 21) $Input5 = GUICtrlCreateInput("", 16, 144, 150, 21) $Input6 = GUICtrlCreateInput("", 16, 176, 150, 21) $Input7 = GUICtrlCreateInput("", 16, 208, 150, 21) $Input8 = GUICtrlCreateInput("", 16, 240, 150, 21) $Input9 = GUICtrlCreateInput("", 16, 272, 150, 21) $Input10 = GUICtrlCreateInput("", 16, 304, 150, 21) $Input11 = GUICtrlCreateInput("", 182, 16, 150, 21) $Input12 = GUICtrlCreateInput("", 182, 48, 150, 21) $Input13 = GUICtrlCreateInput("", 182, 80, 150, 21) $Input14 = GUICtrlCreateInput("", 182, 112, 150, 21) $Input15 = GUICtrlCreateInput("", 182, 144, 150, 21) $Input16 = GUICtrlCreateInput("", 182, 176, 150, 21) $Input17 = GUICtrlCreateInput("", 182, 208, 150, 21) $Input18 = GUICtrlCreateInput("", 182, 240, 150, 21) $Input19 = GUICtrlCreateInput("", 182, 272, 150, 21) $Input20 = GUICtrlCreateInput("", 182, 304, 150, 21) $Input21 = GUICtrlCreateInput("", 348, 16, 150, 21) $Input22 = GUICtrlCreateInput("", 348, 48, 150, 21) $Input23 = GUICtrlCreateInput("", 348, 80, 150, 21) $Input24 = GUICtrlCreateInput("", 348, 112, 150, 21) $Input25 = GUICtrlCreateInput("", 348, 144, 150, 21) $Input26 = GUICtrlCreateInput("", 348, 176, 150, 21) $Input27 = GUICtrlCreateInput("", 348, 208, 150, 21) $Input28 = GUICtrlCreateInput("", 348, 240, 150, 21) $Input29 = GUICtrlCreateInput("", 348, 272, 150, 21) $Input30 = GUICtrlCreateInput("", 348, 304, 150, 21) $Input31 = GUICtrlCreateInput("", 514, 16, 150, 21) $Input32 = GUICtrlCreateInput("", 514, 48, 150, 21) $Input33 = GUICtrlCreateInput("", 514, 80, 150, 21) $Input34 = GUICtrlCreateInput("", 514, 112, 150, 21) $Input35 = GUICtrlCreateInput("", 514, 144, 150, 21) $Input36 = GUICtrlCreateInput("", 514, 176, 150, 21) $Input37 = GUICtrlCreateInput("", 514, 208, 150, 21) $Input38 = GUICtrlCreateInput("", 514, 240, 150, 21) $Input39 = GUICtrlCreateInput("", 514, 272, 150, 21) $Input40 = GUICtrlCreateInput("", 514, 304, 150, 21) $Input41 = GUICtrlCreateInput("", 16, 336, 150, 21) $Input43 = GUICtrlCreateInput("", 182, 336, 150, 21) $Input44 = GUICtrlCreateInput("", 348, 336, 150, 21) $Input45 = GUICtrlCreateInput("", 514, 336, 150, 21) $Input42 = GUICtrlCreateInput("", 16, 368, 150, 21) $Input46 = GUICtrlCreateInput("", 182, 368, 150, 21) $Input47 = GUICtrlCreateInput("", 348, 368, 150, 21) $Input48 = GUICtrlCreateInput("", 514, 368, 150, 21) $Button1 = GUICtrlCreateButton("Start", 290, 408, 100, 40, 0) Opt("GUIOnEventMode", 1) GUISetOnEvent($GUI_EVENT_CLOSE, "CLOSEClicked") GUICtrlSetOnEvent($Button1, "CLOSEClicked") Func CLOSEClicked() GUIDelete() EndFunc GUICtrlSetFont(-1, 16, 800, 0, "Arial") GUISetState(@SW_SHOW) #EndRegion ### END Koda GUI section ### While 1 And $swt = 0 $nMsg = GUIGetMsg() Switch $nMsg Case $GUI_EVENT_CLOSE $swt = 2 EndSwitch WEnd ;Here is the rest script

Ehh, I'm not exactly sure what it is you want but from what I understood, you're looking for something like this? Case $ca_gen_Button1 $clk = 0 Do $clk = $clk + 1 GUICtrlSetData("$ca_inkey_in1" & $clk,Random(1, 8)) GUICtrlSetData("$ca_inkey_in2" & $clk,Random(1, 8)) GUICtrlSetData("$ca_inkey_in3" & $clk,Random(1, 8)) GUICtrlSetData("$ca_inkey_in4" & $clk,Random(1, 8)) GUICtrlSetData("$ca_inkey_in5" & $clk,Random(1, 4)) Until $clk = 4

So you just want to minimize the GUI to System Tray and continue running the script after the button is clicked?

Man, where was this script about a year ago? I was trying to figure out how to do something like this. I was going to grab current song playing from my Media Player and put it in my Ventrilo comment but now Ventrilo has their own integration for media players to display that information.