Jump to content
Advert

Regency

Active Members
  • Posts

    194
  • Joined

  • Last visited

About Regency

  • Birthday 05/17/1991

Profile Information

  • Location
    Pennsylvania USA

Recent Profile Visitors

The recent visitors block is disabled and is not being shown to other users.

Regency's Achievements

Prodigy

Prodigy (4/7)

0

Reputation

  1. The script is basic, But its not pulling the picture (only one on page) and saving it. Anyone got any help? Global $sWebPage = "http://tmn2010.net/tmncontrols/ver_img.aspx?m=m&b=3"; webpage with images Global $sWebPage2 = "http://tmn2010.net/tmncontrols/ver_img.aspx?m=m&b=12"; webpage with images $sImgDir = "c:\Captcha\"; Please make certain this folder already exists (silent failure if not) $oIE = _IECreate( $sWebPage) _IELoadWait($oIE) _IENavigate($oIE,$sWebPage2,1) _IELoadWait($oIE) $oIMGs = _IEImgGetCollection ($oIE) ; Loop through all IMG tags and save file to local directory using INetGet For $oIMG in $oIMGs $sImgUrl = $oIMG.src $sImgFileName = $oIMG.nameProp INetGet($sImgUrl, $sImgDir & $sImgFileName) Next Anyone can use the page's above, if someone can point me in the right direction as to why it isnt working, i would appreciate it
  2. I edited it so there was "and" in the script, now it cycles through, but now i am having trouble with how to write the relooping and entering functions. The script is supposed to add the numbers which it enters into the ini. but it just re writes what it in the input box alrady, then reloads the ie window, what do i need to do to make the script enter all of the ini file's data, and not reload if it knows the answers. Like, how would i write a statement that if non = a number then it restarts the script. I am at a loss. this is what i re wrote it to look like after the above post helped.. #AutoIt3Wrapper_Run_Debug_Mode=Y #include<IE.au3> Global $a[45] Global $First = '' Global $Second = '' Global $Third = '' Global $Fourth = '' $TMN = _IECreate("", 0, 1, 1, 1) WinSetState($TMN, "", @SW_MAXIMIZE) _IELoadWait($TMN) Sleep(1000) Pixel() Func First() $RE = _IEAction($TMN, "Refresh") _IELoadWait($TMN) Sleep(1000) Pixel() EndFunc ;==>First Func Pixel() ;First Number $a[0] = PixelGetColor(527, 146);top $a[1] = PixelGetColor(527, 148); $a[2] = PixelGetColor(526, 150);middle $a[3] = PixelGetColor(526, 151);middle $a[4] = PixelGetColor(526, 152); $a[5] = PixelGetColor(527, 154); $a[6] = PixelGetColor(527, 156);bottom $a[7] = PixelGetColor(523, 151);left $a[8] = PixelGetColor(529, 151);right ;second number $a[9] = PixelGetColor(536, 146) $a[10] = PixelGetColor(536, 148) $a[11] = PixelGetColor(535, 150) $a[12] = PixelGetColor(535, 151) $a[13] = PixelGetColor(535, 152) $a[14] = PixelGetColor(536, 154) $a[15] = PixelGetColor(536, 156) $a[16] = PixelGetColor(532, 151) $a[17] = PixelGetColor(538, 151) ;third number $a[18] = PixelGetColor(545, 146) $a[19] = PixelGetColor(545, 148) $a[20] = PixelGetColor(544, 150) $a[21] = PixelGetColor(544, 151) $a[22] = PixelGetColor(544, 152) $a[23] = PixelGetColor(545, 154) $a[24] = PixelGetColor(545, 156) $a[25] = PixelGetColor(541, 151) $a[26] = PixelGetColor(547, 151) ;fourth number $a[27] = PixelGetColor(554, 146) $a[28] = PixelGetColor(554, 148) $a[29] = PixelGetColor(553, 150) $a[30] = PixelGetColor(553, 151) $a[31] = PixelGetColor(553, 152) $a[32] = PixelGetColor(554, 154) $a[33] = PixelGetColor(554, 156) $a[34] = PixelGetColor(550, 151) $a[35] = PixelGetColor(556, 151) ;fifth number $a[36] = PixelGetColor(563, 146) $a[37] = PixelGetColor(563, 148) $a[38] = PixelGetColor(562, 150) $a[39] = PixelGetColor(562, 151) $a[40] = PixelGetColor(562, 152) $a[41] = PixelGetColor(563, 154) $a[42] = PixelGetColor(563, 156) $a[43] = PixelGetColor(559, 151) $a[44] = PixelGetColor(565, 151) Start() EndFunc ;==>Pixel Func Start() ;If 0 = 0 Then; 0 --- ; $First = IniWrite("Captcha.ini","First","First","0") ; Second() If $a[7] = 12763842 Then; 1 --Done $a[1] = 16777215 and $First = IniWrite("Captcha.ini", "First", "First", "1") $First1 = IniRead("Captcha.ini", "First", "First", "Not Found") Sleep(900) $Verify = _IEGetObjById($TMN, "myScriptTest_txtVerify") _IEFormElementSetValue($Verify, $First1) Second() ElseIf $a[7] = 12171705 Then; 2---Done $First = IniWrite("Captcha.ini", "First", "First", "2") $First1 = IniRead("Captcha.ini", "First", "First", "Not Found") Sleep(900) $Verify = _IEGetObjById($TMN, "myScriptTest_txtVerify") _IEFormElementSetValue($Verify, $First1) Second() ElseIf $a[7] = 13355979 Then; 3--- Done $First = IniWrite("Captcha.ini", "First", "First", "3") $First1 = IniRead("Captcha.ini", "First", "First", "Not Found") Sleep(900) $Verify = _IEGetObjById($TMN, "myScriptTest_txtVerify") _IEFormElementSetValue($Verify, $First1) Second() ElseIf $a[5] = 15987699 And $a[7] = 12434877 Then; 4 --Done $First = IniWrite("Captcha.ini", "First", "First", "4") $First1 = IniRead("Captcha.ini", "First", "First", "Not Found") Sleep(900) $Verify = _IEGetObjById($TMN, "myScriptTest_txtVerify") _IEFormElementSetValue($Verify, $First1) Second() ElseIf $a[7] = 15527148 Then; 5--- Done $First = IniWrite("Captcha.ini", "First", "First", "5") $First1 = IniRead("Captcha.ini", "First", "First", "Not Found") Sleep(900) $Verify = _IEGetObjById($TMN, "myScriptTest_txtVerify") _IEFormElementSetValue($Verify, $First1) Second() ElseIf $a[1] = 12829635 And $a[7] = 15856113 Then; 6---Done $First = IniWrite("Captcha.ini", "First", "First", "6") $First1 = IniRead("Captcha.ini", "First", "First", "Not Found") Sleep(900) $Verify = _IEGetObjById($TMN, "myScriptTest_txtVerify") _IEFormElementSetValue($Verify, $First1) Second() ElseIf $a[7] = 12961221 Then; 7---Done $First = IniWrite("Captcha.ini", "First", "First", "7") $First1 = IniRead("Captcha.ini", "First", "First", "Not Found") Sleep(900) $Verify = _IEGetObjById($TMN, "myScriptTest_txtVerify") _IEFormElementSetValue($Verify, $First1) Second() ElseIf $a[7] = 13421772 Then; 8---Done $First = IniWrite("Captcha.ini", "First", "First", "8") $First1 = IniRead("Captcha.ini", "First", "First", "Not Found") Sleep(900) $Verify = _IEGetObjById($TMN, "myScriptTest_txtVerify") _IEFormElementSetValue($Verify, $First1) Second() ElseIf $a[7] = 15461355 And $a[4] = 16250871 Then; 9-- Done $First = IniWrite("Captcha.ini", "First", "First", "9") $First1 = IniRead("Captcha.ini", "First", "First", "Not Found") Sleep(900) $Verify = _IEGetObjById($TMN, "myScriptTest_txtVerify") _IEFormElementSetValue($Verify, $First1) Second() Else First() EndIf EndFunc ;==>Start Func Second() If $a[12] = 12303291 And $a[13] = 9474192 And $a[14] = 11184810 And $a[15] = 15329769 And $a[16] = 15724527 Then; 0 ---Done $Second = IniWrite("Captcha.ini", "Second", "Second", "0") $First1 = IniRead("Captcha.ini", "First", "First", "Not Found") $Second1 = IniRead("Captcha.ini", "Second", "Second", "Not Found") Sleep(900) $Verify = _IEGetObjById($TMN, "myScriptTest_txtVerify") _IEFormElementSetValue($Verify, $First1 And $Second1) Third() ElseIf $a[9] = 15592941 And $a[12] = 11645361 And $a[13] = 10066329 And $a[14] = 16777215 And $a[17] = 13421772 Then; 1 ---Done $Second = IniWrite("Captcha.ini", "Second", "Second", "1") $First1 = IniRead("Captcha.ini", "First", "First", "Not Found") $Second1 = IniRead("Captcha.ini", "Second", "Second", "Not Found") $Verify = _IEGetObjById($TMN, "myScriptTest_txtVerify") _IEFormElementSetValue($Verify, $First1 And $Second1) Sleep(900) Third() ElseIf $a[9] = 16382457 And $a[10] = 12566463 And $a[11] = 13027014 And $a[12] = 11711154 And $a[13] = 11974326 Then; 2---Done $Second = IniWrite("Captcha.ini", "Second", "Second", "2") $First1 = IniRead("Captcha.ini", "First", "First", "Not Found") $Second1 = IniRead("Captcha.ini", "Second", "Second", "Not Found") Sleep(900) $Verify = _IEGetObjById($TMN, "myScriptTest_txtVerify") _IEFormElementSetValue($Verify, $First1 And $Second1) Third() ElseIf $a[9] = 15987699 And $a[10] = 11842740 And $a[11] = 15395562 And $a[12] = 16053492 And $a[13] = 9803157 Then; 3---Done $Second = IniWrite("Captcha.ini", "Second", "Second", "3") $First1 = IniRead("Captcha.ini", "First", "First", "Not Found") $Second1 = IniRead("Captcha.ini", "Second", "Second", "Not Found") Sleep(900) $Verify = _IEGetObjById($TMN, "myScriptTest_txtVerify") _IEFormElementSetValue($Verify, $First1 And $Second1) Third() ElseIf $a[9] = 13027014 And $a[11] = 16711422 And $a[16] = 12040119 Then; 4 --Done $Second = IniWrite("Captcha.ini", "Second", "Second", "4") $First1 = IniRead("Captcha.ini", "First", "First", "Not Found") $Second1 = IniRead("Captcha.ini", "Second", "Second", "Not Found") Sleep(900) $Verify = _IEGetObjById($TMN, "myScriptTest_txtVerify") _IEFormElementSetValue($Verify, $First1 And $Second1) Third() ElseIf $a[9] = 16448250 And $a[12] = 15921906 And $a[13] = 10263708 And $a[14] = 12303291 And $a[17] = 16579836 Then; 5---Done $Second = IniWrite("Captcha.ini", "Second", "Second", "5") $First1 = IniRead("Captcha.ini", "First", "First", "Not Found") $Second1 = IniRead("Captcha.ini", "Second", "Second", "Not Found") Sleep(900) $Verify = _IEGetObjById($TMN, "myScriptTest_txtVerify") _IEFormElementSetValue($Verify, $First1 And $Second1) Third() ElseIf $a[9] = 16316664 Then; 6--- $Second = IniWrite("Captcha.ini", "Second", "Second", "6") $First1 = IniRead("Captcha.ini", "First", "First", "Not Found") $Second1 = IniRead("Captcha.ini", "Second", "Second", "Not Found") Sleep(900) $Verify = _IEGetObjById($TMN, "myScriptTest_txtVerify") _IEFormElementSetValue($Verify, $First1 And $Second1) Third() ElseIf $a[9] = 15724527 And $a[12] = 15198183 And $a[17] = 15198183 Or $a[12] = 14737632 And $a[13] = 15132390 Then; 7---Done $Second = IniWrite("Captcha.ini", "Second", "Second", "7") $First1 = IniRead("Captcha.ini", "First", "First", "Not Found") $Second1 = IniRead("Captcha.ini", "Second", "Second", "Not Found") Sleep(900) $Verify = _IEGetObjById($TMN, "myScriptTest_txtVerify") _IEFormElementSetValue($Verify, $First1 And $Second1) Third() ElseIf $a[9] = 16316664 Then; 8---Done $Second = IniWrite("Captcha.ini", "Second", "Second", "8") $First1 = IniRead("Captcha.ini", "First", "First", "Not Found") $Second1 = IniRead("Captcha.ini", "Second", "Second", "Not Found") Sleep(900) $Verify = _IEGetObjById($TMN, "myScriptTest_txtVerify") _IEFormElementSetValue($Verify, $First1 And $Second1) Third() ElseIf $a[17] = 16777215 Then; 9 --- $Second = IniWrite("Captcha.ini", "Second", "Second", "9") $First1 = IniRead("Captcha.ini", "First", "First", "Not Found") $Second1 = IniRead("Captcha.ini", "Second", "Second", "Not Found") Sleep(900) $Verify = _IEGetObjById($TMN, "myScriptTest_txtVerify") _IEFormElementSetValue($Verify, $First1 And $Second1) Third() Else First() EndIf EndFunc ;==>Second Func Third() If $a[18] = 15592941 And $a[19] = 12369084 And $a[26] = 16382457 And $a[25] = 16579836 Then; 0 ---Done $Third = IniWrite("Captcha.ini", "Third", "Third", "0") $First1 = IniRead("Captcha.ini", "First", "First", "Not Found") $Second1 = IniRead("Captcha.ini", "Second", "Second", "Not Found") $Third1 = IniRead("Captcha.ini", "Third", "Third", "Not Found") Sleep(900) $Verify = _IEGetObjById($TMN, "myScriptTest_txtVerify") _IEFormElementSetValue($Verify, $First1 And $Second1 And $Third1) Fourth() ElseIf $a[18] = 15461355 And $a[19] = 16777215 And $a[26] = 10987431 And $a[25] = 12632256 Then; 1 ---Done $Third = IniWrite("Captcha.ini", "Third", "Third", "1") $First1 = IniRead("Captcha.ini", "First", "First", "Not Found") $Second1 = IniRead("Captcha.ini", "Second", "Second", "Not Found") $Third1 = IniRead("Captcha.ini", "Third", "Third", "Not Found") Sleep(900) $Verify = _IEGetObjById($TMN, "myScriptTest_txtVerify") _IEFormElementSetValue($Verify, $First1 And $Second1 And $Third1) Fourth() ElseIf $a[18] = 15724527 And $a[19] = 12040119 And $a[26] = 16777215 And $a[25] = 12895428 Then; 2---Done $Third = IniWrite("Captcha.ini", "Third", "Third", "2") $First1 = IniRead("Captcha.ini", "First", "First", "Not Found") $Second1 = IniRead("Captcha.ini", "Second", "Second", "Not Found") $Third1 = IniRead("Captcha.ini", "Third", "Third", "Not Found") Sleep(900) $Verify = _IEGetObjById($TMN, "myScriptTest_txtVerify") _IEFormElementSetValue($Verify, $First1 And $Second1 And $Third1) Fourth() ElseIf $a[18] = 16579836 And $a[19] = 10592673 And $a[26] = 15856113 And $a[24] = 16382457 Then; 3---Done $Third = IniWrite("Captcha.ini", "Third", "Third", "3") $First1 = IniRead("Captcha.ini", "First", "First", "Not Found") $Second1 = IniRead("Captcha.ini", "Second", "Second", "Not Found") $Third1 = IniRead("Captcha.ini", "Third", "Third", "Not Found") Sleep(900) $Verify = _IEGetObjById($TMN, "myScriptTest_txtVerify") _IEFormElementSetValue($Verify, $First1 And $Second1 And $Third1) Fourth() ;ElseIf $11 = 14145495 Then; 4 -- ; $Third = IniWrite("Captcha.ini","Third","Third","4") ;$First1 = IniRead("Captcha.ini", "First", "First", "Not Found") ;$Second1 = IniRead("Captcha.ini", "Second", "Second", "Not Found") ;$Third1 = IniRead("Captcha.ini", "Third", "Third", "Not Found") ;sleep(900) ;$Verify = _IEGetObjById($TMN, "myScriptTest_txtVerify") ;_IEFormElementSetValue($Verify, $First1 and $Second1 and $Third1) ; Fourth() ElseIf $a[18] = 15527148 And $a[19] = 11711154 And $a[26] = 16316664 And $a[25] = 15461355 Then; 5---Done $Third = IniWrite("Captcha.ini", "Third", "Third", "5") $First1 = IniRead("Captcha.ini", "First", "First", "Not Found") $Second1 = IniRead("Captcha.ini", "Second", "Second", "Not Found") $Third1 = IniRead("Captcha.ini", "Third", "Third", "Not Found") Sleep(900) $Verify = _IEGetObjById($TMN, "myScriptTest_txtVerify") _IEFormElementSetValue($Verify, $First1 And $Second1 And $Third1) Fourth() ElseIf $a[18] = 16382457 And $a[19] = 11974326 And $a[26] = 16448250 And $a[24] = 16185078 Then; 6---Done $Third = IniWrite("Captcha.ini", "Third", "Third", "6") $First1 = IniRead("Captcha.ini", "First", "First", "Not Found") $Second1 = IniRead("Captcha.ini", "Second", "Second", "Not Found") $Third1 = IniRead("Captcha.ini", "Third", "Third", "Not Found") Sleep(900) $Verify = _IEGetObjById($TMN, "myScriptTest_txtVerify") _IEFormElementSetValue($Verify, $First1 And $Second1 And $Third1) Fourth() ElseIf $a[18] = 15856113 And $a[19] = 13092807 And $a[26] = 11908533 And $a[24] = 13224393 Then; 7---Done $Third = IniWrite("Captcha.ini", "Third", "Third", "7") $First1 = IniRead("Captcha.ini", "First", "First", "Not Found") $Second1 = IniRead("Captcha.ini", "Second", "Second", "Not Found") $Third1 = IniRead("Captcha.ini", "Third", "Third", "Not Found") Sleep(900) $Verify = _IEGetObjById($TMN, "myScriptTest_txtVerify") _IEFormElementSetValue($Verify, $First1 And $Second1 And $Third1) Fourth() ElseIf $a[18] = 15987699 And $a[19] = 12040119 And $a[26] = 14869218 And $a[24] = 16185078 Then; 8---Done $Third = IniWrite("Captcha.ini", "Third", "Third", "8") $First1 = IniRead("Captcha.ini", "First", "First", "Not Found") $Second1 = IniRead("Captcha.ini", "Second", "Second", "Not Found") $Third1 = IniRead("Captcha.ini", "Third", "Third", "Not Found") Sleep(900) $Verify = _IEGetObjById($TMN, "myScriptTest_txtVerify") _IEFormElementSetValue($Verify, $First1 And $Second1 And $Third1) Fourth() ElseIf $a[18] = 15658734 And $a[19] = 12698049 And $a[26] = 16448250 And $a[24] = 15395562 Then; 9--Done $Third = IniWrite("Captcha.ini", "Third", "Third", "9") $First1 = IniRead("Captcha.ini", "First", "First", "Not Found") $Second1 = IniRead("Captcha.ini", "Second", "Second", "Not Found") $Third1 = IniRead("Captcha.ini", "Third", "Third", "Not Found") Sleep(900) $Verify = _IEGetObjById($TMN, "myScriptTest_txtVerify") _IEFormElementSetValue($Verify, $First1 And $Second1 And $Third1) Fourth() Else First() EndIf EndFunc ;==>Third Func Fourth() If $a[27] = 15921906 And $a[28] = 12303291 And $a[35] = 16777215 And $a[34] = 16053492 Then; 0 ---Done $Fourth = IniWrite("Captcha.ini", "Fourth", "Fourth", "0") $First1 = IniRead("Captcha.ini", "First", "First", "Not Found") $Second1 = IniRead("Captcha.ini", "Second", "Second", "Not Found") $Third1 = IniRead("Captcha.ini", "Third", "Third", "Not Found") $Fourth1 = IniRead("Captcha.ini", "Fourth", "Fourth", "Not Found") Sleep(900) $Verify = _IEGetObjById($TMN, "myScriptTest_txtVerify") _IEFormElementSetValue($Verify, $First1 And $Second1 And $Third1 And $Fourth1) Fifth() ElseIf $a[27] = 15461355 And $a[28] = 16777215 And $a[35] = 12237498 And $a[34] = 12237498 Then; 1 ---Done $Fourth = IniWrite("Captcha.ini", "Fourth", "Fourth", "1") $First1 = IniRead("Captcha.ini", "First", "First", "Not Found") $Second1 = IniRead("Captcha.ini", "Second", "Second", "Not Found") $Third1 = IniRead("Captcha.ini", "Third", "Third", "Not Found") $Fourth1 = IniRead("Captcha.ini", "Fourth", "Fourth", "Not Found") Sleep(900) $Verify = _IEGetObjById($TMN, "myScriptTest_txtVerify") _IEFormElementSetValue($Verify, $First1 And $Second1 And $Third1 And $Fourth1) Fifth() ElseIf $a[27] = 16250871 And $a[28] = 12040119 And $a[35] = 16250871 And $a[34] = 12434877 Then; 2---Done $Fourth = IniWrite("Captcha.ini", "Fourth", "Fourth", "2") $First1 = IniRead("Captcha.ini", "First", "First", "Not Found") $Second1 = IniRead("Captcha.ini", "Second", "Second", "Not Found") $Third1 = IniRead("Captcha.ini", "Third", "Third", "Not Found") $Fourth1 = IniRead("Captcha.ini", "Fourth", "Fourth", "Not Found") Sleep(900) $Verify = _IEGetObjById($TMN, "myScriptTest_txtVerify") _IEFormElementSetValue($Verify, $First1 And $Second1 And $Third1 And $Fourth1) Fifth() ElseIf $a[27] = 16579836 And $a[28] = 11579568 And $a[35] = 16119285 And $a[34] = 13158600 Then; 3---Done $Fourth = IniWrite("Captcha.ini", "Fourth", "Fourth", "3") $First1 = IniRead("Captcha.ini", "First", "First", "Not Found") $Second1 = IniRead("Captcha.ini", "Second", "Second", "Not Found") $Third1 = IniRead("Captcha.ini", "Third", "Third", "Not Found") $Fourth1 = IniRead("Captcha.ini", "Fourth", "Fourth", "Not Found") Sleep(900) $Verify = _IEGetObjById($TMN, "myScriptTest_txtVerify") _IEFormElementSetValue($Verify, $First1 And $Second1 And $Third1 And $Fourth1) Fifth() ElseIf $a[27] = 13355979 And $a[28] = 16053492 And $a[35] = 16185078 And $a[34] = 11908533 Then; 4 --Done $Fourth = IniWrite("Captcha.ini", "Fourth", "Fourth", "4") $First1 = IniRead("Captcha.ini", "First", "First", "Not Found") $Second1 = IniRead("Captcha.ini", "Second", "Second", "Not Found") $Third1 = IniRead("Captcha.ini", "Third", "Third", "Not Found") $Fourth1 = IniRead("Captcha.ini", "Fourth", "Fourth", "Not Found") Sleep(900) $Verify = _IEGetObjById($TMN, "myScriptTest_txtVerify") _IEFormElementSetValue($Verify, $First1 And $Second1 And $Third1 And $Fourth1) Fifth() ElseIf $a[27] = 16053492 And $a[28] = 12566463 And $a[35] = 15856113 And $a[34] = 15921906 Then; 5---Done $Fourth = IniWrite("Captcha.ini", "Fourth", "Fourth", "5") $First1 = IniRead("Captcha.ini", "First", "First", "Not Found") $Second1 = IniRead("Captcha.ini", "Second", "Second", "Not Found") $Third1 = IniRead("Captcha.ini", "Third", "Third", "Not Found") $Fourth1 = IniRead("Captcha.ini", "Fourth", "Fourth", "Not Found") Sleep(900) $Verify = _IEGetObjById($TMN, "myScriptTest_txtVerify") _IEFormElementSetValue($Verify, $First1 And $Second1 And $Third1 And $Fourth1) Fifth() ElseIf $a[27] = 16119285 And $a[28] = 12500670 And $a[35] = 16448250 And $a[34] = 15724527 Then; 6---Done $Fourth = IniWrite("Captcha.ini", "Fourth", "Fourth", "6") $First1 = IniRead("Captcha.ini", "First", "First", "Not Found") $Second1 = IniRead("Captcha.ini", "Second", "Second", "Not Found") $Third1 = IniRead("Captcha.ini", "Third", "Third", "Not Found") $Fourth1 = IniRead("Captcha.ini", "Fourth", "Fourth", "Not Found") Sleep(900) $Verify = _IEGetObjById($TMN, "myScriptTest_txtVerify") _IEFormElementSetValue($Verify, $First1 And $Second1 And $Third1 And $Fourth1) Fifth() ElseIf $a[27] = 15724527 And $a[28] = 13619151 And $a[35] = 12369084 And $a[34] = 12237498 Then; 7---Done $Fourth = IniWrite("Captcha.ini", "Fourth", "Fourth", "7") $First1 = IniRead("Captcha.ini", "First", "First", "Not Found") $Second1 = IniRead("Captcha.ini", "Second", "Second", "Not Found") $Third1 = IniRead("Captcha.ini", "Third", "Third", "Not Found") $Fourth1 = IniRead("Captcha.ini", "Fourth", "Fourth", "Not Found") Sleep(900) $Verify = _IEGetObjById($TMN, "myScriptTest_txtVerify") _IEFormElementSetValue($Verify, $First1 And $Second1 And $Third1 And $Fourth1) Fifth() ElseIf $a[27] = 16053492 And $a[28] = 12566463 And $a[35] = 15395562 And $a[34] = 12434877 Then; 8---Done $Fourth = IniWrite("Captcha.ini", "Fourth", "Fourth", "8") $First1 = IniRead("Captcha.ini", "First", "First", "Not Found") $Second1 = IniRead("Captcha.ini", "Second", "Second", "Not Found") $Third1 = IniRead("Captcha.ini", "Third", "Third", "Not Found") $Fourth1 = IniRead("Captcha.ini", "Fourth", "Fourth", "Not Found") Sleep(900) $Verify = _IEGetObjById($TMN, "myScriptTest_txtVerify") _IEFormElementSetValue($Verify, $First1 And $Second1 And $Third1 And $Fourth1) Fifth() ElseIf $a[27] = 16119285 And $a[28] = 12698049 And $a[35] = 16645629 And $a[34] = 15329769 Then; 9--Done $Fourth = IniWrite("Captcha.ini", "Fourth", "Fourth", "9") $First1 = IniRead("Captcha.ini", "First", "First", "Not Found") $Second1 = IniRead("Captcha.ini", "Second", "Second", "Not Found") $Third1 = IniRead("Captcha.ini", "Third", "Third", "Not Found") $Fourth1 = IniRead("Captcha.ini", "Fourth", "Fourth", "Not Found") Sleep(900) $Verify = _IEGetObjById($TMN, "myScriptTest_txtVerify") _IEFormElementSetValue($Verify, $First1 And $Second1 And $Third1 And $Fourth1) Fifth() Else First() EndIf EndFunc ;==>Fourth Func Fifth() If $a[36] = 16382457 And $a[37] = 11842740 And $a[44] = 15856113 And $a[43] = 15658734 Then; 0 ---Done $Fifth = IniWrite("Captcha.ini", "Fifth", "Fifth", "0") $First1 = IniRead("Captcha.ini", "First", "First", "Not Found") $Second1 = IniRead("Captcha.ini", "Second", "Second", "Not Found") $Third1 = IniRead("Captcha.ini", "Third", "Third", "Not Found") $Fourth1 = IniRead("Captcha.ini", "Fourth", "Fourth", "Not Found") $Fifth1 = IniRead("Captcha.ini", "Fifth", "Fifth", "Not Found") Sleep(900) $Verify = _IEGetObjById($TMN, "myScriptTest_txtVerify") _IEFormElementSetValue($Verify, $First1 And $Second1 And $Third1 And $Fourth1 And $Fifth1) ElseIf $a[36] = 15790320 And $a[37] = 16777215 And $a[44] = 12237498 And $a[43] = 12961221 Then; 1 ---Done $Fifth = IniWrite("Captcha.ini", "Fifth", "Fifth", "1") $First1 = IniRead("Captcha.ini", "First", "First", "Not Found") $Second1 = IniRead("Captcha.ini", "Second", "Second", "Not Found") $Third1 = IniRead("Captcha.ini", "Third", "Third", "Not Found") $Fourth1 = IniRead("Captcha.ini", "Fourth", "Fourth", "Not Found") $Fifth1 = IniRead("Captcha.ini", "Fifth", "Fifth", "Not Found") Sleep(900) $Verify = _IEGetObjById($TMN, "myScriptTest_txtVerify") _IEFormElementSetValue($Verify, $First1 And $Second1 And $Third1 And $Fourth1 And $Fifth1) ElseIf $a[36] = 16316664 And $a[37] = 11776947 And $a[44] = 16777215 And $a[43] = 12369084 Then; 2---Done $Fifth = IniWrite("Captcha.ini", "Fifth", "Fifth", "2") $First1 = IniRead("Captcha.ini", "First", "First", "Not Found") $Second1 = IniRead("Captcha.ini", "Second", "Second", "Not Found") $Third1 = IniRead("Captcha.ini", "Third", "Third", "Not Found") $Fourth1 = IniRead("Captcha.ini", "Fourth", "Fourth", "Not Found") $Fifth1 = IniRead("Captcha.ini", "Fifth", "Fifth", "Not Found") Sleep(900) $Verify = _IEGetObjById($TMN, "myScriptTest_txtVerify") _IEFormElementSetValue($Verify, $First1 And $Second1 And $Third1 And $Fourth1 And $Fifth1) ElseIf $a[36] = 16316664 And $a[37] = 10921638 And $a[44] = 16645629 And $a[43] = 13158600 Then; 3---Done $Fifth = IniWrite("Captcha.ini", "Fifth", "Fifth", "3") $First1 = IniRead("Captcha.ini", "First", "First", "Not Found") $Second1 = IniRead("Captcha.ini", "Second", "Second", "Not Found") $Third1 = IniRead("Captcha.ini", "Third", "Third", "Not Found") $Fourth1 = IniRead("Captcha.ini", "Fourth", "Fourth", "Not Found") $Fifth1 = IniRead("Captcha.ini", "Fifth", "Fifth", "Not Found") Sleep(900) $Verify = _IEGetObjById($TMN, "myScriptTest_txtVerify") _IEFormElementSetValue($Verify, $First1 And $Second1 And $Third1 And $Fourth1 And $Fifth1) ElseIf $a[36] = 13027014 And $a[37] = 16645629 And $a[44] = 16448250 And $a[43] = 12698049 Then; 4 --Done $Fifth = IniWrite("Captcha.ini", "Fifth", "Fifth", "4") $First1 = IniRead("Captcha.ini", "First", "First", "Not Found") $Second1 = IniRead("Captcha.ini", "Second", "Second", "Not Found") $Third1 = IniRead("Captcha.ini", "Third", "Third", "Not Found") $Fourth1 = IniRead("Captcha.ini", "Fourth", "Fourth", "Not Found") $Fifth1 = IniRead("Captcha.ini", "Fifth", "Fifth", "Not Found") Sleep(900) $Verify = _IEGetObjById($TMN, "myScriptTest_txtVerify") _IEFormElementSetValue($Verify, $First1 And $Second1 And $Third1 And $Fourth1 And $Fifth1) ElseIf $a[36] = 16382457 And $a[37] = 11711154 And $a[44] = 15724527 And $a[43] = 15856113 Then; 5---Done $Fifth = IniWrite("Captcha.ini", "Fifth", "Fifth", "5") $First1 = IniRead("Captcha.ini", "First", "First", "Not Found") $Second1 = IniRead("Captcha.ini", "Second", "Second", "Not Found") $Third1 = IniRead("Captcha.ini", "Third", "Third", "Not Found") $Fourth1 = IniRead("Captcha.ini", "Fourth", "Fourth", "Not Found") $Fifth1 = IniRead("Captcha.ini", "Fifth", "Fifth", "Not Found") Sleep(900) $Verify = _IEGetObjById($TMN, "myScriptTest_txtVerify") _IEFormElementSetValue($Verify, $First1 And $Second1 And $Third1 And $Fourth1 And $Fifth1) ElseIf $a[36] = 15921906 And $a[37] = 11579568 And $a[44] = 16316664 And $a[43] = 15856113 Then; 6---Done $Fifth = IniWrite("Captcha.ini", "Fifth", "Fifth", "6") $First1 = IniRead("Captcha.ini", "First", "First", "Not Found") $Second1 = IniRead("Captcha.ini", "Second", "Second", "Not Found") $Third1 = IniRead("Captcha.ini", "Third", "Third", "Not Found") $Fourth1 = IniRead("Captcha.ini", "Fourth", "Fourth", "Not Found") $Fifth1 = IniRead("Captcha.ini", "Fifth", "Fifth", "Not Found") Sleep(900) $Verify = _IEGetObjById($TMN, "myScriptTest_txtVerify") _IEFormElementSetValue($Verify, $First1 And $Second1 And $Third1 And $Fourth1 And $Fifth1) ElseIf $a[36] = 16448250 And $a[37] = 12303291 And $a[44] = 12566463 And $a[43] = 12698049 Then; 7---Done $Fifth = IniWrite("Captcha.ini", "Fifth", "Fifth", "7") $First1 = IniRead("Captcha.ini", "First", "First", "Not Found") $Second1 = IniRead("Captcha.ini", "Second", "Second", "Not Found") $Third1 = IniRead("Captcha.ini", "Third", "Third", "Not Found") $Fourth1 = IniRead("Captcha.ini", "Fourth", "Fourth", "Not Found") $Fifth1 = IniRead("Captcha.ini", "Fifth", "Fifth", "Not Found") Sleep(900) $Verify = _IEGetObjById($TMN, "myScriptTest_txtVerify") _IEFormElementSetValue($Verify, $First1 And $Second1 And $Third1 And $Fourth1 And $Fifth1) ElseIf $a[36] = 16185078 And $a[37] = 11316396 And $a[44] = 14869218 And $a[43] = 12566463 Then; 8---Done $Fifth = IniWrite("Captcha.ini", "Fifth", "Fifth", "8") $First1 = IniRead("Captcha.ini", "First", "First", "Not Found") $Second1 = IniRead("Captcha.ini", "Second", "Second", "Not Found") $Third1 = IniRead("Captcha.ini", "Third", "Third", "Not Found") $Fourth1 = IniRead("Captcha.ini", "Fourth", "Fourth", "Not Found") $Fifth1 = IniRead("Captcha.ini", "Fifth", "Fifth", "Not Found") Sleep(900) $Verify = _IEGetObjById($TMN, "myScriptTest_txtVerify") _IEFormElementSetValue($Verify, $First1 And $Second1 And $Third1 And $Fourth1 And $Fifth1) ElseIf $a[36] = 15921906 And $a[37] = 11776947 And $a[44] = 16777215 And $a[43] = 14671839 Then; 9 $Fifth = IniWrite("Captcha.ini", "Fifth", "Fifth", "9") $First1 = IniRead("Captcha.ini", "First", "First", "Not Found") $Second1 = IniRead("Captcha.ini", "Second", "Second", "Not Found") $Third1 = IniRead("Captcha.ini", "Third", "Third", "Not Found") $Fourth1 = IniRead("Captcha.ini", "Fourth", "Fourth", "Not Found") $Fifth1 = IniRead("Captcha.ini", "Fifth", "Fifth", "Not Found") Sleep(900) $Verify = _IEGetObjById($TMN, "myScriptTest_txtVerify") _IEFormElementSetValue($Verify, $First1 And $Second1 And $Third1 And $Fourth1 And $Fifth1) EndIf EndFunc ;==>Fifth
  3. I dont really think thats a problem, the ini writes correctly, and when it does go through the first function it does as i want, it sometimes just doesnt go through all the if's like it should.
  4. So, I have this working if i were to put messagebox's in, but when ini commands were inserted, it skips if statements and doesnt check them. i have it looping back if it doesnt find what it should, but i know it does, and yet it still loops back. #AutoIt3Wrapper_Run_Debug_Mode=Y #include<IE.au3> Global $a[45] Global $First = '' Global $Second = '' Global $Third = '' Global $Fourth = '' Global $Fifth = '' $TMN = _IECreate("Taken Out So Google Doesnt Tag", 0, 1, 1, 1) WinSetState($TMN, "", @SW_MAXIMIZE) _IELoadWait($TMN) Sleep(1000) Pixel() Func Pixel() ;First Number $a[0] = PixelGetColor(527, 146);top $a[1] = PixelGetColor(527, 148); $a[2] = PixelGetColor(526, 150);middle $a[3] = PixelGetColor(526, 151);middle $a[4] = PixelGetColor(526, 152); $a[5] = PixelGetColor(527, 154); $a[6] = PixelGetColor(527, 156);bottom $a[7] = PixelGetColor(523, 151);left $a[8] = PixelGetColor(529, 151);right ;second number $a[9] = PixelGetColor(536, 146) $a[10] = PixelGetColor(536, 148) $a[11] = PixelGetColor(535, 150) $a[12] = PixelGetColor(535, 151) $a[13] = PixelGetColor(535, 152) $a[14] = PixelGetColor(536, 154) $a[15] = PixelGetColor(536, 156) $a[16] = PixelGetColor(532, 151) $a[17] = PixelGetColor(538, 151) ;third number $a[18] = PixelGetColor(545, 146) $a[19] = PixelGetColor(545, 148) $a[20] = PixelGetColor(544, 150) $a[21] = PixelGetColor(544, 151) $a[22] = PixelGetColor(544, 152) $a[23] = PixelGetColor(545, 154) $a[24] = PixelGetColor(545, 156) $a[25] = PixelGetColor(541, 151) $a[26] = PixelGetColor(547, 151) ;fourth number $a[27] = PixelGetColor(554, 146) $a[28] = PixelGetColor(554, 148) $a[29] = PixelGetColor(553, 150) $a[30] = PixelGetColor(553, 151) $a[31] = PixelGetColor(553, 152) $a[32] = PixelGetColor(554, 154) $a[33] = PixelGetColor(554, 156) $a[34] = PixelGetColor(550, 151) $a[35] = PixelGetColor(556, 151) ;fifth number $a[36] = PixelGetColor(563, 146) $a[37] = PixelGetColor(563, 148) $a[38] = PixelGetColor(562, 150) $a[39] = PixelGetColor(562, 151) $a[40] = PixelGetColor(562, 152) $a[41] = PixelGetColor(563, 154) $a[42] = PixelGetColor(563, 156) $a[43] = PixelGetColor(559, 151) $a[44] = PixelGetColor(565, 151) First() EndFunc ;==>Pixel Func First() ;If 0 = 0 Then; 0 --- ; $First = IniWrite("Captcha.ini","First","First","0") ; Second() If $a[7] = 12763842 Then; 1 --Done $a[1] = 16777215 & $First = IniWrite("Captcha.ini", "First", "First", "1") $First1 = IniRead("Captcha.ini", "First", "First", "Not Found") sleep(900) $Verify = _IEGetObjById($TMN, "myScriptTest_txtVerify") _IEFormElementSetValue($Verify, $First1) Second() ElseIf $a[7] = 12171705 Then; 2---Done $First = IniWrite("Captcha.ini", "First", "First", "2") $First1 = IniRead("Captcha.ini", "First", "First", "Not Found") sleep(900) $Verify = _IEGetObjById($TMN, "myScriptTest_txtVerify") _IEFormElementSetValue($Verify, $First1) Second() ElseIf $a[7] = 13355979 Then; 3--- Done $First = IniWrite("Captcha.ini", "First", "First", "3") $First1 = IniRead("Captcha.ini", "First", "First", "Not Found") sleep(900) $Verify = _IEGetObjById($TMN, "myScriptTest_txtVerify") _IEFormElementSetValue($Verify, $First1) Second() ElseIf $a[5] = 15987699 & $a[7] = 12434877 Then; 4 --Done $First = IniWrite("Captcha.ini", "First", "First", "4") $First1 = IniRead("Captcha.ini", "First", "First", "Not Found") sleep(900) $Verify = _IEGetObjById($TMN, "myScriptTest_txtVerify") _IEFormElementSetValue($Verify, $First1) Second() ElseIf $a[7] = 15527148 Then; 5--- Done $First = IniWrite("Captcha.ini", "First", "First", "5") $First1 = IniRead("Captcha.ini", "First", "First", "Not Found") sleep(900) $Verify = _IEGetObjById($TMN, "myScriptTest_txtVerify") _IEFormElementSetValue($Verify, $First1) Second() ElseIf $a[1] = 12829635 & $a[7] = 15856113 Then; 6---Done $First = IniWrite("Captcha.ini", "First", "First", "6") $First1 = IniRead("Captcha.ini", "First", "First", "Not Found") sleep(900) $Verify = _IEGetObjById($TMN, "myScriptTest_txtVerify") _IEFormElementSetValue($Verify, $First1) Second() ElseIf $a[7] = 12961221 Then; 7---Done $First = IniWrite("Captcha.ini", "First", "First", "7") $First1 = IniRead("Captcha.ini", "First", "First", "Not Found") sleep(900) $Verify = _IEGetObjById($TMN, "myScriptTest_txtVerify") _IEFormElementSetValue($Verify, $First1) Second() ElseIf $a[7] = 13421772 Then; 8---Done $First = IniWrite("Captcha.ini", "First", "First", "8") $First1 = IniRead("Captcha.ini", "First", "First", "Not Found") sleep(900) $Verify = _IEGetObjById($TMN, "myScriptTest_txtVerify") _IEFormElementSetValue($Verify, $First1) Second() ElseIf $a[7] = 15461355 & $a[4] = 16250871 Then; 9-- Done $First = IniWrite("Captcha.ini", "First", "First", "9") $First1 = IniRead("Captcha.ini", "First", "First", "Not Found") sleep(900) $Verify = _IEGetObjById($TMN, "myScriptTest_txtVerify") _IEFormElementSetValue($Verify, $First1) Second() Else First() EndIf EndFunc ;==>First Func Second() If $a[12] = 12303291 & $a[13] = 9474192 & $a[14] = 11184810 & $a[15] = 15329769 & $a[16] = 15724527 Then; 0 ---Done $Second = IniWrite("Captcha.ini", "Second", "Second", "0") $Second1 = IniRead("Captcha.ini", "Second", "Second", "Not Found") sleep(900) $Verify = _IEGetObjById($TMN, "myScriptTest_txtVerify") _IEFormElementSetValue($Verify, $Second1) Third() ElseIf $a[9] = 15592941 & $a[12] = 11645361 & $a[13] = 10066329 & $a[14] = 16777215 & $a[17] = 13421772 Then; 1 ---Done $Second = IniWrite("Captcha.ini", "Second", "Second", "1") $Second1 = IniRead("Captcha.ini", "Second", "Second", "Not Found") $Verify = _IEGetObjById($TMN, "myScriptTest_txtVerify") _IEFormElementSetValue($Verify, $Second1) sleep(900) Third() ElseIf $a[9] = 16382457 & $a[10] = 12566463 & $a[11] = 13027014 & $a[12] = 11711154 & $a[13] = 11974326 Then; 2---Done $Second = IniWrite("Captcha.ini", "Second", "Second", "2") $Second1 = IniRead("Captcha.ini", "Second", "Second", "Not Found") sleep(900) $Verify = _IEGetObjById($TMN, "myScriptTest_txtVerify") _IEFormElementSetValue($Verify, $Second1) Third() ElseIf $a[9] = 15987699 & $a[10] = 11842740 & $a[11] = 15395562 & $a[12] = 16053492 & $a[13] = 9803157 Then; 3---Done $Second = IniWrite("Captcha.ini", "Second", "Second", "3") $Second1 = IniRead("Captcha.ini", "Second", "Second", "Not Found") sleep(900) $Verify = _IEGetObjById($TMN, "myScriptTest_txtVerify") _IEFormElementSetValue($Verify, $Second1) Third() ElseIf $a[9] = 13027014 & $a[11] = 16711422 & $a[16] = 12040119 Then; 4 --Done $Second = IniWrite("Captcha.ini", "Second", "Second", "4") $Second1 = IniRead("Captcha.ini", "Second", "Second", "Not Found") sleep(900) $Verify = _IEGetObjById($TMN, "myScriptTest_txtVerify") _IEFormElementSetValue($Verify, $Second1) Third() ElseIf $a[9] = 16448250 & $a[12] = 15921906 & $a[13] = 10263708 & $a[14] = 12303291 & $a[17] = 16579836 Then; 5---Done $Second = IniWrite("Captcha.ini", "Second", "Second", "5") $Second1 = IniRead("Captcha.ini", "Second", "Second", "Not Found") sleep(900) $Verify = _IEGetObjById($TMN, "myScriptTest_txtVerify") _IEFormElementSetValue($Verify, $Second1) Third() ElseIf $a[9] = 16316664 Then; 6--- $Second = IniWrite("Captcha.ini", "Second", "Second", "6") $Second1 = IniRead("Captcha.ini", "Second", "Second", "Not Found") sleep(900) $Verify = _IEGetObjById($TMN, "myScriptTest_txtVerify") _IEFormElementSetValue($Verify, $Second1) Third() ElseIf $a[9] = 15724527 & $a[12] = 15198183 & $a[17] = 15198183 Or $a[12] = 14737632 & $a[13] = 15132390 Then; 7---Done $Second = IniWrite("Captcha.ini", "Second", "Second", "7") $Second1 = IniRead("Captcha.ini", "Second", "Second", "Not Found") sleep(900) $Verify = _IEGetObjById($TMN, "myScriptTest_txtVerify") _IEFormElementSetValue($Verify, $Second1) Third() ElseIf $a[9] = 16316664 Then; 8---Done $Second = IniWrite("Captcha.ini", "Second", "Second", "8") $Second1 = IniRead("Captcha.ini", "Second", "Second", "Not Found") sleep(900) $Verify = _IEGetObjById($TMN, "myScriptTest_txtVerify") _IEFormElementSetValue($Verify, $Second1) Third() ElseIf $a[17] = 16777215 Then; 9 --- $Second = IniWrite("Captcha.ini", "Second", "Second", "9") $Second1 = IniRead("Captcha.ini", "Second", "Second", "Not Found") sleep(900) $Verify = _IEGetObjById($TMN, "myScriptTest_txtVerify") _IEFormElementSetValue($Verify, $Second1) Third() Else First() EndIf EndFunc ;==>Second Func Third() If $a[18] = 15592941 & $a[19] = 12369084 & $a[26] = 16382457 & $a[25] = 16579836 Then; 0 ---Done $Third = IniWrite("Captcha.ini", "Third", "Third", "0") $Third1 = IniRead("Captcha.ini", "Third", "Third", "Not Found") sleep(900) $Verify = _IEGetObjById($TMN, "myScriptTest_txtVerify") _IEFormElementSetValue($Verify, $Third1) Fourth() ElseIf $a[18] = 15461355 & $a[19] = 16777215 & $a[26] = 10987431 & $a[25] = 12632256 Then; 1 ---Done $Third = IniWrite("Captcha.ini", "Third", "Third", "1") $Third1 = IniRead("Captcha.ini", "Third", "Third", "Not Found") sleep(900) $Verify = _IEGetObjById($TMN, "myScriptTest_txtVerify") _IEFormElementSetValue($Verify, $Third1) Fourth() ElseIf $a[18] = 15724527 & $a[19] = 12040119 & $a[26] = 16777215 & $a[25] = 12895428 Then; 2---Done $Third = IniWrite("Captcha.ini", "Third", "Third", "2") $Third1 = IniRead("Captcha.ini", "Third", "Third", "Not Found") sleep(900) $Verify = _IEGetObjById($TMN, "myScriptTest_txtVerify") _IEFormElementSetValue($Verify, $Third1) Fourth() ElseIf $a[18] = 16579836 & $a[19] = 10592673 & $a[26] = 15856113 & $a[24] = 16382457 Then; 3---Done $Third = IniWrite("Captcha.ini", "Third", "Third", "3") $Third1 = IniRead("Captcha.ini", "Third", "Third", "Not Found") sleep(900) $Verify = _IEGetObjById($TMN, "myScriptTest_txtVerify") _IEFormElementSetValue($Verify, $Third1) Fourth() ;ElseIf $11 = 14145495 Then; 4 -- ; $Third = IniWrite("Captcha.ini","Third","Third","4") ;$Third1 = IniRead("Captcha.ini", "Third", "Third", "Not Found") ;sleep(900) ;$Verify = _IEGetObjById($TMN, "myScriptTest_txtVerify") ;_IEFormElementSetValue($Verify, $Third1) ; Fourth() ElseIf $a[18] = 15527148 & $a[19] = 11711154 & $a[26] = 16316664 & $a[25] = 15461355 Then; 5---Done $Third = IniWrite("Captcha.ini", "Third", "Third", "5") $Third1 = IniRead("Captcha.ini", "Third", "Third", "Not Found") sleep(900) $Verify = _IEGetObjById($TMN, "myScriptTest_txtVerify") _IEFormElementSetValue($Verify, $Third1) Fourth() ElseIf $a[18] = 16382457 & $a[19] = 11974326 & $a[26] = 16448250 & $a[24] = 16185078 Then; 6---Done $Third = IniWrite("Captcha.ini", "Third", "Third", "6") $Third1 = IniRead("Captcha.ini", "Third", "Third", "Not Found") sleep(900) $Verify = _IEGetObjById($TMN, "myScriptTest_txtVerify") _IEFormElementSetValue($Verify, $Third1) Fourth() ElseIf $a[18] = 15856113 & $a[19] = 13092807 & $a[26] = 11908533 & $a[24] = 13224393 Then; 7---Done $Third = IniWrite("Captcha.ini", "Third", "Third", "7") $Third1 = IniRead("Captcha.ini", "Third", "Third", "Not Found") sleep(900) $Verify = _IEGetObjById($TMN, "myScriptTest_txtVerify") _IEFormElementSetValue($Verify, $Third1) Fourth() ElseIf $a[18] = 15987699 & $a[19] = 12040119 & $a[26] = 14869218 & $a[24] = 16185078 Then; 8---Done $Third = IniWrite("Captcha.ini", "Third", "Third", "8") $Third1 = IniRead("Captcha.ini", "Third", "Third", "Not Found") sleep(900) $Verify = _IEGetObjById($TMN, "myScriptTest_txtVerify") _IEFormElementSetValue($Verify, $Third1) Fourth() ElseIf $a[18] = 15658734 & $a[19] = 12698049 & $a[26] = 16448250 & $a[24] = 15395562 Then; 9--Done $Third = IniWrite("Captcha.ini", "Third", "Third", "9") $Third1 = IniRead("Captcha.ini", "Third", "Third", "Not Found") sleep(900) $Verify = _IEGetObjById($TMN, "myScriptTest_txtVerify") _IEFormElementSetValue($Verify, $Third1) Fourth() Else First() EndIf EndFunc ;==>Third Func Fourth() If $a[27] = 15921906 & $a[28] = 12303291 & $a[35] = 16777215 & $a[34] = 16053492 Then; 0 ---Done $Fourth = IniWrite("Captcha.ini", "Fourth", "Fourth", "0") $Fourth1 = IniRead("Captcha.ini", "Fourth", "Fourth", "Not Found") sleep(900) $Verify = _IEGetObjById($TMN, "myScriptTest_txtVerify") _IEFormElementSetValue($Verify, $Fourth1) Fifth() ElseIf $a[27] = 15461355 & $a[28] = 16777215 & $a[35] = 12237498 & $a[34] = 12237498 Then; 1 ---Done $Fourth = IniWrite("Captcha.ini", "Fourth", "Fourth", "1") $Fourth1 = IniRead("Captcha.ini", "Fourth", "Fourth", "Not Found") sleep(900) $Verify = _IEGetObjById($TMN, "myScriptTest_txtVerify") _IEFormElementSetValue($Verify, $Fourth1) Fifth() ElseIf $a[27] = 16250871 & $a[28] = 12040119 & $a[35] = 16250871 & $a[34] = 12434877 Then; 2---Done $Fourth = IniWrite("Captcha.ini", "Fourth", "Fourth", "2") $Fourth1 = IniRead("Captcha.ini", "Fourth", "Fourth", "Not Found") sleep(900) $Verify = _IEGetObjById($TMN, "myScriptTest_txtVerify") _IEFormElementSetValue($Verify, $Fourth1) Fifth() ElseIf $a[27] = 16579836 & $a[28] = 11579568 & $a[35] = 16119285 & $a[34] = 13158600 Then; 3---Done $Fourth = IniWrite("Captcha.ini", "Fourth", "Fourth", "3") $Fourth1 = IniRead("Captcha.ini", "Fourth", "Fourth", "Not Found") sleep(900) $Verify = _IEGetObjById($TMN, "myScriptTest_txtVerify") _IEFormElementSetValue($Verify, $Fourth1) Fifth() ElseIf $a[27] = 13355979 & $a[28] = 16053492 & $a[35] = 16185078 & $a[34] = 11908533 Then; 4 --Done $Fourth = IniWrite("Captcha.ini", "Fourth", "Fourth", "4") $Fourth1 = IniRead("Captcha.ini", "Fourth", "Fourth", "Not Found") sleep(900) $Verify = _IEGetObjById($TMN, "myScriptTest_txtVerify") _IEFormElementSetValue($Verify, $Fourth1) Fifth() ElseIf $a[27] = 16053492 & $a[28] = 12566463 & $a[35] = 15856113 & $a[34] = 15921906 Then; 5---Done $Fourth = IniWrite("Captcha.ini", "Fourth", "Fourth", "5") $Fourth1 = IniRead("Captcha.ini", "Fourth", "Fourth", "Not Found") sleep(900) $Verify = _IEGetObjById($TMN, "myScriptTest_txtVerify") _IEFormElementSetValue($Verify, $Fourth1) Fifth() ElseIf $a[27] = 16119285 & $a[28] = 12500670 & $a[35] = 16448250 & $a[34] = 15724527 Then; 6---Done $Fourth = IniWrite("Captcha.ini", "Fourth", "Fourth", "6") $Fourth1 = IniRead("Captcha.ini", "Fourth", "Fourth", "Not Found") sleep(900) $Verify = _IEGetObjById($TMN, "myScriptTest_txtVerify") _IEFormElementSetValue($Verify, $Fourth1) Fifth() ElseIf $a[27] = 15724527 & $a[28] = 13619151 & $a[35] = 12369084 & $a[34] = 12237498 Then; 7---Done $Fourth = IniWrite("Captcha.ini", "Fourth", "Fourth", "7") $Fourth1 = IniRead("Captcha.ini", "Fourth", "Fourth", "Not Found") sleep(900) $Verify = _IEGetObjById($TMN, "myScriptTest_txtVerify") _IEFormElementSetValue($Verify, $Fourth1) Fifth() ElseIf $a[27] = 16053492 & $a[28] = 12566463 & $a[35] = 15395562 & $a[34] = 12434877 Then; 8---Done $Fourth = IniWrite("Captcha.ini", "Fourth", "Fourth", "8") $Fourth1 = IniRead("Captcha.ini", "Fourth", "Fourth", "Not Found") sleep(900) $Verify = _IEGetObjById($TMN, "myScriptTest_txtVerify") _IEFormElementSetValue($Verify, $Fourth1) Fifth() ElseIf $a[27] = 16119285 & $a[28] = 12698049 & $a[35] = 16645629 & $a[34] = 15329769 Then; 9--Done $Fourth = IniWrite("Captcha.ini", "Fourth", "Fourth", "9") $Fourth1 = IniRead("Captcha.ini", "Fourth", "Fourth", "Not Found") sleep(900) $Verify = _IEGetObjById($TMN, "myScriptTest_txtVerify") _IEFormElementSetValue($Verify, $Fourth1) Fifth() Else First() EndIf EndFunc ;==>Fourth Func Fifth() If $a[36] = 16382457 & $a[37] = 11842740 & $a[44] = 15856113 & $a[43] = 15658734 Then; 0 ---Done $Fifth = IniWrite("Captcha.ini", "Fifth", "Fifth", "0") $Fifth1 = IniRead("Captcha.ini", "Fifth", "Fifth", "Not Found") sleep(900) $Verify = _IEGetObjById($TMN, "myScriptTest_txtVerify") _IEFormElementSetValue($Verify, $Fifth1) ElseIf $a[36] = 15790320 & $a[37] = 16777215 & $a[44] = 12237498 & $a[43] = 12961221 Then; 1 ---Done $Fifth = IniWrite("Captcha.ini", "Fifth", "Fifth", "1") $Fifth1 = IniRead("Captcha.ini", "Fifth", "Fifth", "Not Found") sleep(900) $Verify = _IEGetObjById($TMN, "myScriptTest_txtVerify") _IEFormElementSetValue($Verify, $Fifth1) ElseIf $a[36] = 16316664 & $a[37] = 11776947 & $a[44] = 16777215 & $a[43] = 12369084 Then; 2---Done $Fifth = IniWrite("Captcha.ini", "Fifth", "Fifth", "2") $Fifth1 = IniRead("Captcha.ini", "Fifth", "Fifth", "Not Found") sleep(900) $Verify = _IEGetObjById($TMN, "myScriptTest_txtVerify") _IEFormElementSetValue($Verify, $Fifth1) ElseIf $a[36] = 16316664 & $a[37] = 10921638 & $a[44] = 16645629 & $a[43] = 13158600 Then; 3---Done $Fifth = IniWrite("Captcha.ini", "Fifth", "Fifth", "3") $Fifth1 = IniRead("Captcha.ini", "Fifth", "Fifth", "Not Found") sleep(900) $Verify = _IEGetObjById($TMN, "myScriptTest_txtVerify") _IEFormElementSetValue($Verify, $Fifth1) ElseIf $a[36] = 13027014 & $a[37] = 16645629 & $a[44] = 16448250 & $a[43] = 12698049 Then; 4 --Done $Fifth = IniWrite("Captcha.ini", "Fifth", "Fifth", "4") $Fifth1 = IniRead("Captcha.ini", "Fifth", "Fifth", "Not Found") sleep(900) $Verify = _IEGetObjById($TMN, "myScriptTest_txtVerify") _IEFormElementSetValue($Verify, $Fifth1) ElseIf $a[36] = 16382457 & $a[37] = 11711154 & $a[44] = 15724527 & $a[43] = 15856113 Then; 5---Done $Fifth = IniWrite("Captcha.ini", "Fifth", "Fifth", "5") $Fifth1 = IniRead("Captcha.ini", "Fifth", "Fifth", "Not Found") sleep(900) $Verify = _IEGetObjById($TMN, "myScriptTest_txtVerify") _IEFormElementSetValue($Verify, $Fifth1) ElseIf $a[36] = 15921906 & $a[37] = 11579568 & $a[44] = 16316664 & $a[43] = 15856113 Then; 6---Done $Fifth = IniWrite("Captcha.ini", "Fifth", "Fifth", "6") $Fifth1 = IniRead("Captcha.ini", "Fifth", "Fifth", "Not Found") sleep(900) $Verify = _IEGetObjById($TMN, "myScriptTest_txtVerify") _IEFormElementSetValue($Verify, $Fifth1) ElseIf $a[36] = 16448250 & $a[37] = 12303291 & $a[44] = 12566463 & $a[43] = 12698049 Then; 7---Done $Fifth = IniWrite("Captcha.ini", "Fifth", "Fifth", "7") $Fifth1 = IniRead("Captcha.ini", "Fifth", "Fifth", "Not Found") sleep(900) $Verify = _IEGetObjById($TMN, "myScriptTest_txtVerify") _IEFormElementSetValue($Verify, $Fifth1) ElseIf $a[36] = 16185078 & $a[37] = 11316396 & $a[44] = 14869218 & $a[43] = 12566463 Then; 8---Done $Fifth = IniWrite("Captcha.ini", "Fifth", "Fifth", "8") $Fifth1 = IniRead("Captcha.ini", "Fifth", "Fifth", "Not Found") sleep(900) $Verify = _IEGetObjById($TMN, "myScriptTest_txtVerify") _IEFormElementSetValue($Verify, $Fifth1) ElseIf $a[36] = 15921906 & $a[37] = 11776947 & $a[44] = 16777215 & $a[43] = 14671839 Then; 9 $Fifth = IniWrite("Captcha.ini", "Fifth", "Fifth", "9") $Fifth1 = IniRead("Captcha.ini", "Fifth", "Fifth", "Not Found") sleep(900) $Verify = _IEGetObjById($TMN, "myScriptTest_txtVerify") _IEFormElementSetValue($Verify, $Fifth1) Else First() EndIf;### Tidy Error -> func is never closed in your script. EndFunc ;==>Fifth and the log that comes up whilist being run, 0077: 0-0: If $a[7] = 12763842 Then; 1 --Done $a[1] = 16777215 & 0127: 0-0: $First = IniWrite("Captcha.ini", "First", "First", "8") 0128: 0-0: $First1 = IniRead("Captcha.ini", "First", "First", "Not Found") 0129: 0-0: sleep(900) 0130: 0-0: $Verify = _IEGetObjById($TMN, "myScriptTest_txtVerify") 0131: 0-0: _IEFormElementSetValue($Verify, $First1) 0132: 0-0: Second() 0145: 0-0: If $a[12] = 12303291 & $a[13] = 9474192 & $a[14] = 11184810 & $a[15] = 15329769 & $a[16] = 15724527 Then; 0 ---Done 0216: 0-0: First() 0077: 0-0: If $a[7] = 12763842 Then; 1 --Done $a[1] = 16777215 & 0127: 0-0: $First = IniWrite("Captcha.ini", "First", "First", "8") 0128: 0-0: $First1 = IniRead("Captcha.ini", "First", "First", "Not Found") 0129: 0-0: sleep(900) 0130: 0-0: $Verify = _IEGetObjById($TMN, "myScriptTest_txtVerify") 0131: 0-0: _IEFormElementSetValue($Verify, $First1) 0132: 0-0: Second() 0145: 0-0: If $a[12] = 12303291 & $a[13] = 9474192 & $a[14] = 11184810 & $a[15] = 15329769 & $a[16] = 15724527 Then; 0 ---Done 0216: 0-0: First() 0077: 0-0: If $a[7] = 12763842 Then; 1 --Done $a[1] = 16777215 & 0127: 0-0: $First = IniWrite("Captcha.ini", "First", "First", "8") 0128: 0-0: $First1 = IniRead("Captcha.ini", "First", "First", "Not Found") 0129: 0-0: sleep(900) 0130: 0-0: $Verify = _IEGetObjById($TMN, "myScriptTest_txtVerify") 0131: 0-0: _IEFormElementSetValue($Verify, $First1) 0132: 0-0: Second() and it repeats over and over, what have i done wrong to have this work wrong? any help would be appreciated
  5. The script only now hangs up on the first number, it writes the first number then stops doing anything, i tried clearing the console read after it writes it, but no clue why it is doing this.. anyone? BTW thank you for the array'd version!
  6. It looks for pixels making a simple simple ocr for numbers on this page. Anyone have any ideas on how to work this better? #include <IE.au3> #include <Misc.au3> #include <WindowsConstants.au3> #include <Timers.au3> Global $1 = '' Global $2 = '' Global $3 = '' Global $4 = '' Global $5 = '' Global $6 = '' Global $7 = '' Global $8 = '' Global $9 = '' Global $10 = '' Global $11 = '' Global $12 = '' Global $13 = '' Global $14 = '' Global $15 = '' Global $16 = '' Global $17 = '' Global $18 = '' Global $19 = '' Global $21 = '' Global $22 = '' Global $23 = '' Global $24 = '' Global $25 = '' Global $First = '' Global $Second = '' Global $Third = '' Global $Fourth = '' Global $Fifth = '' $oJailPage = _IECreate("Tmnx.net/authenticated/jail.aspx",0,1,1,1) _IELoadWait($oJailPage) Sleep(3000) Get() Func Get() ;First Number $1 = PixelGetColor(527, 146);top $2 = PixelGetColor(526, 151);middle $3 = PixelGetColor(527, 157);bottom $4 = PixelGetColor(523, 151);left $5 = PixelGetColor(529, 151);right ;second number $6 = PixelGetColor(536, 146) $7 = PixelGetColor(535, 151) $8 = PixelGetColor(536, 157) $9 = PixelGetColor(532, 151) $10 = PixelGetColor(538, 151) ;third number $11 = PixelGetColor(545, 146) $12 = PixelGetColor(546, 151) $13 = PixelGetColor(545, 157) $14 = PixelGetColor(541, 151) $15 = PixelGetColor(547, 151) ;fourth number $16 = PixelGetColor(554, 146) $17 = PixelGetColor(555, 151) $18 = PixelGetColor(554, 157) $19 = PixelGetColor(550, 151) $20 = PixelGetColor(556, 151) ;fifth number $21 = PixelGetColor(563, 146) $22 = PixelGetColor(564, 151) $23 = PixelGetColor(563, 157) $24 = PixelGetColor(559, 151) $25 = PixelGetColor(565, 151) IniWrite("Pixel.ini", "Pixel", "1", $1) IniWrite("Pixel.ini", "Pixel", "2", $2) IniWrite("Pixel.ini", "Pixel", "3", $3) IniWrite("Pixel.ini", "Pixel", "4", $4) IniWrite("Pixel.ini", "Pixel", "5", $5) IniWrite("Pixel.ini", "Pixel 2", "6", $6) IniWrite("Pixel.ini", "Pixel 2", "7", $7) IniWrite("Pixel.ini", "Pixel 2", "8", $8) IniWrite("Pixel.ini", "Pixel 2", "9", $9) IniWrite("Pixel.ini", "Pixel 2", "10", $10) IniWrite("Pixel.ini", "Pixel 3", "11", $11) IniWrite("Pixel.ini", "Pixel 3", "12", $12) IniWrite("Pixel.ini", "Pixel 3", "13", $13) IniWrite("Pixel.ini", "Pixel 3", "14", $14) IniWrite("Pixel.ini", "Pixel 3", "15", $15) IniWrite("Pixel.ini", "Pixel 4", "16", $16) IniWrite("Pixel.ini", "Pixel 4", "17", $17) IniWrite("Pixel.ini", "Pixel 4", "18", $18) IniWrite("Pixel.ini", "Pixel 4", "19", $19) IniWrite("Pixel.ini", "Pixel 4", "20", $20) IniWrite("Pixel.ini", "Pixel 5", "21", $21) IniWrite("Pixel.ini", "Pixel 5", "22", $22) IniWrite("Pixel.ini", "Pixel 5", "23", $23) IniWrite("Pixel.ini", "Pixel 5", "24", $24) IniWrite("Pixel.ini", "Pixel 5", "25", $25) ;If 0 = 0 Then; 0 --- ; MsgBox("", "0", $10) ; Second() If $4 = 12763842 Then; 1 -- $First = ConsoleWrite("1") Second() ElseIf $4 = 12171705 Then; 2--- $First = ConsoleWrite("2") Second() ElseIf $4 = 13355979 Then; 3--- $First = ConsoleWrite("3") Second() ElseIf $4 = 12434877 Then; 4 -- $First = ConsoleWrite("4") Second() ElseIf $4 = 15527148 Then; 5--- $First = ConsoleWrite("5") Second() ElseIf $4 = 15856113 Then; 6--- $First = ConsoleWrite("6") Second() ElseIf $4 = 12961221 Then; 7--- $First = ConsoleWrite("7") Second() ElseIf $4 = 13421772 Then; 8--- $First = ConsoleWrite("8") Second() ElseIf $4 = 15461355 Then; 9 $First = ConsoleWrite("9") Second() EndIf sleep(100) get() EndFunc ;==>Get Func Second() ;If 0 = 0 Then; 0 --- ; MsgBox("", "0", $10) ; Third() If $10 = 13092807 Then; 1 --- $Second = ConsoleWrite("1") Third() ElseIf $10 = 16316664 Then; 2---? $Second = ConsoleWrite("2") Third() ElseIf $10 = 16316664 Then; 3--- $Second = ConsoleWrite("3") Third() ElseIf $10 = 16514043 Or $10 = 15527148 Then; 4 -- $Second = ConsoleWrite("4") Third() ElseIf $8 = 16777215 Then; 5--- $Second = ConsoleWrite("5") Third() ElseIf $7 = 16316664 Then; 6--- $Second = ConsoleWrite("6") Third() ElseIf $9 = 12171705 Then; 7--- $Second = ConsoleWrite("7") Third() ElseIf $8 = 16777215 Then; 8--- $Second = ConsoleWrite("8") Third() ;ElseIf $4 = 15461355 Then; 9 ; MsgBox("", "9", $4) ; Third() EndIf Sleep(100) get() EndFunc ;==>Second Func Third() If $11 = 15592941 Then; 0 --- $Third = ConsoleWrite("0") Fourth() ElseIf $11 = 13092807 Then; 1 --- $Third = ConsoleWrite("1") Fourth() ElseIf $11 = 16316664 Then; 2---? $Third = ConsoleWrite("2") Fourth() ElseIf $11 = 16579836 Then; 3--- $Third = ConsoleWrite("3") Fourth() ElseIf $11 = 14145495 Then; 4 -- $Third = ConsoleWrite("4") Fourth() ElseIf $11 = 15527148 Then; 5--- $Third = ConsoleWrite("5") Fourth() ElseIf $11 = 16382457 Then; 6--- $Third = ConsoleWrite("6") Fourth() ElseIf $11 = 15856113 Then; 7--- $Third = ConsoleWrite("7") Fourth() ElseIf $11 = 15987699 Then; 8--- $Third = ConsoleWrite("8") Fourth() ElseIf $11 = 15658734 Then; 9 $Third = ConsoleWrite("9") Fourth() EndIf sleep(100) Get() EndFunc ;==>Third Func Fourth() If $16 = 15921906 Then; 0 --- $Fourth = ConsoleWrite("0") Fifth() ElseIf $16 = 15461355 Then; 1 --- $Fourth = ConsoleWrite("1") Fifth() ElseIf $16 = 16250871 Then; 2---? $Fourth = ConsoleWrite("2") Fifth() ElseIf $16 = 16579836 Then; 3--- $Fourth = ConsoleWrite("3") Fifth() ElseIf $16 = 13355979 Then; 4 -- $Fourth = ConsoleWrite("4") Fifth() ElseIf $16 = 16053492 Then; 5--- $Fourth = ConsoleWrite("5") Fifth() ElseIf $16 = 16119285 Then; 6--- $Fourth = ConsoleWrite("6") Fifth() ElseIf $16 = 15724527 Then; 7--- $Fourth = ConsoleWrite("7") Fifth() ElseIf $16 = 16053492 Then; 8--- $Fourth = ConsoleWrite("8") Fifth() ElseIf $16 = 16119285 Then; 9 $Fourth = ConsoleWrite("9") Fifth() EndIf sleep(100) Get() EndFunc ;==>Fourth Func Fifth() If $21 = 16382457 Then; 0 --- $Fifth = ConsoleWrite("0") $Verify = _IEGetObjById($oJailPage, "myScriptTest_txtVerify") _IEFormElementSetValue($Verify, $First & $Second & $Third & $Fourth & $Fifth) ElseIf $21 = 15790320 Then; 1 --- $Fifth = ConsoleWrite("1") $Verify = _IEGetObjById($oJailPage, "myScriptTest_txtVerify") _IEFormElementSetValue($Verify, $First & $Second & $Third & $Fourth & $Fifth) ElseIf $21 = 16316664 Then; 2--- $Fifth = ConsoleWrite("2") $Verify = _IEGetObjById($oJailPage, "myScriptTest_txtVerify") _IEFormElementSetValue($Verify, $First & $Second & $Third & $Fourth & $Fifth) ElseIf $21 = 16316664 Then; 3--- $Fifth = ConsoleWrite("3") $Verify = _IEGetObjById($oJailPage, "myScriptTest_txtVerify") _IEFormElementSetValue($Verify, $First & $Second & $Third & $Fourth & $Fifth) ElseIf $21 = 13027014 Then; 4 -- $Fifth = ConsoleWrite("4") $Verify = _IEGetObjById($oJailPage, "myScriptTest_txtVerify") _IEFormElementSetValue($Verify, $First & $Second & $Third & $Fourth & $Fifth) ElseIf $21 = 16382457 Then; 5--- $Fifth = ConsoleWrite("5") $Verify = _IEGetObjById($oJailPage, "myScriptTest_txtVerify") _IEFormElementSetValue($Verify, $First & $Second & $Third & $Fourth & $Fifth) ElseIf $21 = 15921906 Then; 6--- $Fifth = ConsoleWrite("6") $Verify = _IEGetObjById($oJailPage, "myScriptTest_txtVerify") _IEFormElementSetValue($Verify, $First & $Second & $Third & $Fourth & $Fifth) ElseIf $21 = 16448250 Then; 7--- $Fifth = ConsoleWrite("7") $Verify = _IEGetObjById($oJailPage, "myScriptTest_txtVerify") _IEFormElementSetValue($Verify, $First & $Second & $Third & $Fourth & $Fifth) ElseIf $21 = 16185078 Then; 8--- $Fifth = ConsoleWrite("8") $Verify = _IEGetObjById($oJailPage, "myScriptTest_txtVerify") _IEFormElementSetValue($Verify, $First & $Second & $Third & $Fourth & $Fifth) ElseIf $21 = 15921906 Then; 9 $Fifth = ConsoleWrite("9") $Verify = _IEGetObjById($oJailPage, "myScriptTest_txtVerify") _IEFormElementSetValue($Verify, $First & $Second & $Third & $Fourth & $Fifth) EndIf EndFunc ;==>Fifth
  7. I did write this, but i had help from someone who helped me work out how to create a ie window within a gui. so i am working with what i understood from when we create it. So when i took out the $WS_EX_TOPMOST, i got a error and it wouldnt load.. >Running:(3.3.0.0):C:\Program Files\AutoIt3\autoit3.exe "D:\TMN\userbar 1.5.au3" C:\Program Files\AutoIt3\Include\IE.au3 (1150) : ==> The requested action with this object has failed.: SetExtended($oTemp.images.length) SetExtended($oTemp.images^ ERROR ->20:42:06 AutoIT3.exe ended.rc:1 +>20:42:07 AutoIt3Wrapper Finished >Exit code: 1 Time: 1.968 I dunno what to do, i am trying to understand how and why he wrote it this way, and when we worked on it, it was about 3 months ago. I am sorry i dont know alot, but the person who helped knew what he was doing and gave me a head start..
  8. I dont understand fully what you mean, can you explain further?
  9. So I wrote it and it "works" but the pages get whited out after i hit my "reload" button, see code, #include <GUIConstantsEx.au3> #include <WindowsConstants.au3> #include <IE.au3> $oIE = ObjCreate("Shell.Explorer.2") $oIE2 = ObjCreate("Shell.Explorer.2") $T = GUICreate("TMN Status Bar", 870, 250, _ (@DesktopWidth - 640) / 2, (@DesktopHeight - 580) / 2, $WS_OVERLAPPEDWINDOW + $WS_VISIBLE + $WS_CLIPSIBLINGS + $WS_EX_TOPMOST) $GUIActiveX = GUICtrlCreateObj($oIE, 0, 0, 890, 50) $GUIActiveX = GUICtrlCreateObj($oIE2, 40, 50, 800, 200) $Reload = GUICtrlCreateButton("Reload", 0, 50, 40, 30, 0) GUISetState(@SW_SHOWNOACTIVATE, $T) ;Show GUI $oIE.navigate("tmnx.net/authenticated/userinfo.aspx") $oIE2.navigate("tmnx.net/authenticated/rankbar.aspx") While 1 $nMsg = GUIGetMsg() Switch $nMsg Case $GUI_EVENT_CLOSE Exit Case $Reload $oIE.navigate("tmnx.net/authenticated/userinfo.aspx") $oIE2.navigate("tmnx.net/authenticated/rankbar.aspx") EndSwitch WEnd GUIDelete() First image where there is no white bar at top is how it looks normally when first open, then after i hit my "reload" button, the script makes the top and or the bottom white, its still there, i can highlight it, but its white.. anyone got any ides why and or a fix?
  10. So I wrote it and it "works" but the pages get whited out after i hit my "reload" button, see code, #include <GUIConstantsEx.au3> #include <WindowsConstants.au3> #include <IE.au3> $oIE = ObjCreate("Shell.Explorer.2") $oIE2 = ObjCreate("Shell.Explorer.2") $T = GUICreate("TMN Status Bar", 870, 250, _ (@DesktopWidth - 640) / 2, (@DesktopHeight - 580) / 2, $WS_OVERLAPPEDWINDOW + $WS_VISIBLE + $WS_CLIPSIBLINGS + $WS_EX_TOPMOST) $GUIActiveX = GUICtrlCreateObj($oIE, 0, 0, 890, 50) $GUIActiveX = GUICtrlCreateObj($oIE2, 40, 50, 800, 200) $Reload = GUICtrlCreateButton("Reload", 0, 50, 40, 30, 0) GUISetState(@SW_SHOWNOACTIVATE, $T) ;Show GUI $oIE.navigate("tmnx.net/authenticated/userinfo.aspx") $oIE2.navigate("tmnx.net/authenticated/rankbar.aspx") While 1 $nMsg = GUIGetMsg() Switch $nMsg Case $GUI_EVENT_CLOSE Exit Case $Reload $oIE.navigate("tmnx.net/authenticated/userinfo.aspx") $oIE2.navigate("tmnx.net/authenticated/rankbar.aspx") EndSwitch WEnd GUIDelete() First image where there is no white bar at top is how it looks normally when first open, then after i hit my "reload" button, the script makes the top and or the bottom white, its still there, i can highlight it, but its white.. anyone got any ides why and or a fix?
  11. Well, kinda, But how the original script is set up that after i insert the answer for the captcha the gui disapears and inserts it to the page. I am implimenting it into a script that has the same page opened up 6 times. Each page having a different captcha. So, i need the gui to open the first time, showing the captcha to the first page, then after i hit "next" or w/e button i use, it opens the next IE window with another captcha in the gui window, doing this 6 times, then proceding with a script not involving this.
  12. Is there anyway i can make the ie embeded window reload with a different page after i click the $make button?
  13. Ok, so this script works by itself, and does exactly what i want. but id there a way to make it open again, like, after i click start, it uses the info in the input and adds it to the field in the ie window, and reloads the img in the ie embedded for the next page i want. Like.. #include <GUIConstantsEx.au3> #include <IE.au3> #include <WindowsConstants.au3> Y Global $Url = "tmnx.net" Global $A1 = "" Global $P1 = "" Global $tmnx = "" Global $name1 = "" $Tmnx = _iecreate($Url,0,1,1,0) _IELoadWait($Tmnx) _IEErrorHandlerRegister () $oIE = _IECreateEmbedded () GUICreate("Embedded Web control Test", 450, 300, _ (@DesktopWidth - 640) / 2, (@DesktopHeight - 580) / 2, _ $WS_OVERLAPPEDWINDOW + $WS_VISIBLE + $WS_CLIPSIBLINGS) $Desired = GUICtrlCreateGroup("Enter Captcha Answer",8,225,425,49) $username = GUICtrlCreateInput("", 16, 241, 114, 21) $savename = GUICtrlCreateButton("Save", 168, 241, 75, 25, 0) GUICtrlCreateGroup("", -99, -99, 1, 1) $GUIActiveX = GUICtrlCreateObj($oIE, 10, 10, 400, 200) $User = GUICtrlCreateLabel("", 8, 352, 250, 17) ; This is $Make = GUICtrlCreateButton("Start", 300, 241, 75, 25, 0) GUISetState() ;Show GUI $oImg = _IEImgGetCollection($Tmnx,0) $sInfo = $oImg.src _IENavigate ($oIE,$oimg.src) While 1 $msg = GUIGetMsg() Select Case $msg = $GUI_EVENT_CLOSE ExitLoop Case $msg = $savename $name1 = GUICtrlRead($username) GUICtrlSetData($User, $name1) Case $msg Relog() GUIDelete() Exit EndSelect WEnd Func Relog() $oUser = _IEGetObjByName($Tmnx, "txtUsername") _IEFormElementSetValue($oUser, $A1) $oPass = _IEGetObjByName($Tmnx, "txtPassword") _IEFormElementSetValue($oPass, $P1) $oCap = _IEGetObjByName($Tmnx, "recaptcha_response_field") _IEFormElementSetValue($oCap, $name1) $oLogIn = _IEGetObjByName($Tmnx, "btnlogin") ;_IEAction($oLogIn, "click") EndFunc The msg box's are where the GUI should be.. Anyone have any ideas on the best way to go about this?
×
×
  • Create New...