OneSometnyGud Posted December 21, 2011 Share Posted December 21, 2011 my script is kind of registration, i want do it at Youtube or Ebay. But i got this code... I don't know how, and when i maked it but my captcha showing is only one time and never reload. Can we start litle lesson? expandcollapse popup#include <Ie.au3> #include <ButtonConstants.au3> #include <GUIListBox.au3> #include <GUIConstantsEx.au3> #include <WindowsConstants.au3> #include <GuiListView.au3> #include <EditConstants.au3> #region FAQ Opcja do zaznaczania obieku ;------------------------------------------------------ ; $obj - uchwyt obiektu IE ; "id" - szukamy checkboxa po ID ; "generate_password_confirm" - ID checkboxa ; 1 - zaznaczamy checkboxa (podając 0 - odznaczamy) ; _IEFormElementCheckBoxSelect($kwadracik1, "PersistentCookie", "PersistentCookie", 1) ;------------------------------------------------------ #endregion #Region GUI _IEErrorHandlerRegister() $oIE = _IECreateEmbedded() $Form1 = GUICreate("Okienko", 700, 545, 192, 124) $label = guictrlcreatelabel("kipeer",763,430) $GUIActiveX = GUICtrlCreateObj($oIE, 40, 10, 570, 400) $but = GUICtrlCreateButton("Klik", 630,200,40,25) GUISetState(@SW_SHOW) While 1 $nMsg = GUIGetMsg() Switch $nMsg Case $GUI_EVENT_CLOSE Exit Case $but lol() EndSwitch WEnd Func lol() _IENavigate($oIE, "https://accounts.google.com/NewAccount?gl=PL&client=mv-google&followup=http%3A%2F%2Fm.youtube.com%2Femail_confirm%3Fwarned%3D1&uilel=0&service=youtube&shdf=ChYLEgxub1F1YXJhbnRpbmUaBFRydWUMEgd5b3V0dWJlGgRTSEExIhTDga0qbMaN6_h91_Ghd4kzi_Tu9ygBMhRRf8t_FnPI0wk3pyCMaH42pk-u2g%3D%3D&skipll=true&passive=true&skipvpage=true&continue=http%3A%2F%2Fm.youtube.com%2Fsignin%3Faction_handle_signin%3Dtrue%26nomobiletemp%3D1%26warned%3D1%26next%3D%252F%26hl%3Dpl_PL%26new%3Dtrue&hl=pl_PL&nui=17<mpl=mobile") _IELoadWait($oIE) sleep(2000) $email =InputBox("Podaj email", "wpisz swoj email") $asdf = _IEBodyReadHTML($oIE) #endregion ;$oie = _IECreate("https://accounts.google.com/NewAccount?gl=PL&client=mv-google&followup=http%3A%2F%2Fm.youtube.com%2Femail_confirm%3Fwarned%3D1&uilel=0&service=youtube&shdf=ChYLEgxub1F1YXJhbnRpbmUaBFRydWUMEgd5b3V0dWJlGgRTSEExIhTDga0qbMaN6_h91_Ghd4kzi_Tu9ygBMhRRf8t_FnPI0wk3pyCMaH42pk-u2g%3D%3D&skipll=true&passive=true&skipvpage=true&continue=http%3A%2F%2Fm.youtube.com%2Fsignin%3Faction_handle_signin%3Dtrue%26nomobiletemp%3D1%26warned%3D1%26next%3D%252F%26hl%3Dpl_PL%26new%3Dtrue&hl=pl_PL&nui=17<mpl=mobile") ;$oie = _IECreate("auto:blank") ;wejscie na gmail'a _IELoadWait($oie) $formalogowania = _IEFormGetCollection($oie, 0) ;poniewaz to jedyna forma (liczymy od 0) to index to 0 $pole1 = _IEFormElementGetObjByName($formalogowania, "Email") ;patrzymy w źródle strony na Name input'a do loginu tutaj to "Email" $pole2 = _IEFormElementGetObjByName($formalogowania, "Passwd") $pole3 = _IEFormElementGetObjByName($formalogowania, "PasswdAgain") $pole4 = _IEFormElementGetObjByName($formalogowania, "loc") $pole5 = _IEFormElementGetObjByName($formalogowania, "Birthday") $pole6 = _IEFormElementGetObjByName($formalogowania, "city") $pole7 = _IEFormElementGetObjByName($formalogowania, "state") $kwadracik1 = _IEFormElementGetObjByName($formalogowania, "rmShown") $kapcze = _IEFormElementGetObjByName($formalogowania, "newaccountcaptcha") $check = _IEGetObjById($oIE,"PersistentCookie") ; pobieramy ID elementu _IEAction($check,"click") ; klikamy w ten element. $obraz = _IEImgGetCollection($oIE,3) ; wyszukuje 3 obrazek $sInfo = $obraz.src & @CR ; pobiera jego link InetGet($sInfo,"captcha.jpg") ; pobieramy obraz na dysk GUICtrlCreatePic("captcha.jpg",200,400,200,150) ; dodajemy obraz do naszego GUI $forma = InputBox("próba", "wpisz kod z obrazka") _IEFormElementSetValue($pole1, $email) ;wpisujemy do pola loginu nasz wpisany loginu sleep(150) _IEFormElementSetValue($pole2, "haslo123123szZ") sleep(150) _IEFormElementSetValue($pole3, "haslo123123szZ") sleep(150) _IEFormElementOptionSelect($pole4, "22") sleep(150) _IEFormElementSetValue($pole5, "02.02.1989") sleep(150) _IEFormElementSetValue($pole6, "Kuropatwy") sleep(150) _IEFormElementOptionSelect($pole7, "2") _GUICtrlListView_SetItemChecked($formalogowania, "rmShown", 0) _IEFormElementSetValue($kapcze, $forma) ;wpisujemy do pola loginu nasz wpisany loginu If $forma then _IEFormSubmit($formalogowania) ;potwierdzamy logowanie cos stylu wcisniecia ENTER'a EndIf EndFunc Looks preety for me, but: - It should pickup my lil captcha at button... how - Its possible to do read automatic Captcha images from youtube, and automatic write into input frame? - Its possible to do my function "lol()" many times? ( i want do this in many tabs like 5 in one moment ) - How write files with information what Account was accepted, what Account was not accepted My english bad, im 14 y'old im come from Madre and come from bolivia, now living in Poland... im don';t know bolivians language but i born there, he he, hi guys i want do some scripts and sell, i saw the website the things like it i can sell for 0,50Euro i want learn somethign like daat Link to comment Share on other sites More sharing options...
somdcomputerguy Posted December 21, 2011 Share Posted December 21, 2011 Forum Rules - AutoIt Forums - Bruce /*somdcomputerguy */ If you change the way you look at things, the things you look at change. Link to comment Share on other sites More sharing options...
Skitty Posted December 21, 2011 Share Posted December 21, 2011 (edited) my script is kind of registration, i want do it at Youtube or Ebay. But i got this code... I don't know how, and when i maked it but my captcha showing is only one time and never reload. Can we start litle lesson? blah blah Looks preety for me, but: - It should pickup my lil captcha at button... how - Its possible to do read automatic Captcha images from youtube, and automatic write into input frame? - Its possible to do my function "lol()" many times? ( i want do this in many tabs like 5 in one moment ) - How write files with information what Account was accepted, what Account was not accepted My english bad, im 14 y'old im come from Madre and come from bolivia, now living in Poland... im don';t know bolivians language but i born there, he he, hi guys i want do some scripts and sell, i saw the website the things like it i can sell for 0,50Euro i want learn somethign like daat Isn't this against the tos? Not reported btw since I'm an anarchist kinda guy, don't know If valik is gonna wana ban me because of that comment. Edited December 21, 2011 by THAT1ANONYMOUSEDUDE Link to comment Share on other sites More sharing options...
Developers Jos Posted December 21, 2011 Developers Share Posted December 21, 2011 Isn't this against the tos?Not reported btw since I'm an anarchist kinda guy, don't know If valik is gonna wana ban me because of that comment.Why do you even bother and just leave when you feel this stupid urge to be vocal about not agreeing with our rules here? SciTE4AutoIt3 Full installer Download page - Beta files Read before posting How to post scriptsource Forum etiquette Forum Rules Live for the present, Dream of the future, Learn from the past. Link to comment Share on other sites More sharing options...
Developers Jos Posted December 21, 2011 Developers Share Posted December 21, 2011 OP, read the forum rules and only post questions that are not against our rules. SciTE4AutoIt3 Full installer Download page - Beta files Read before posting How to post scriptsource Forum etiquette Forum Rules Live for the present, Dream of the future, Learn from the past. Link to comment Share on other sites More sharing options...
Recommended Posts