karboon Opublikowano 8 Sierpnia 2011 Udostępnij Opublikowano 8 Sierpnia 2011 (edytowane) Zrobiłem już autologowanie działa super:) #include <IE.au3> #include <EditConstants.au3> #include <GUIConstantsEx.au3> #include <StaticConstants.au3> #include <WindowsConstants.au3> #include <AVIConstants.au3> #include <TreeViewConstants.au3> #include <ButtonConstants.au3> #include <TabConstants.au3> $Karta = GUICreate("AutoLogin", 160, 110) $tab = GUICtrlCreateTab(5, 5, 150, 100) $tab0 = GUICtrlCreateTabItem("Logowanie") GUICtrlSetFont(-1, 8, 400, 0, "MS Sans Serif") GUICtrlSetResizing(-1, $GUI_DOCKWIDTH+$GUI_DOCKHEIGHT) $login_input = GUICtrlCreateInput("", 10, 30, 100, 20) $haslo_input = GUICtrlCreateInput("", 10, 55, 100,20, $ES_PASSWORD) GUICtrlCreateLabel("Login", 115, 32) GUICtrlCreateLabel("Hasło", 115, 50) $loguj = GUICtrlCreateButton("Loguj", 30, 80, 60, 20) GUISetState() Func login() IniWrite("ustawienia.ini", "Logowanie", "Login", GUICtrlRead($login_input)) IniWrite("ustawienia.ini", "Logowanie", "Haslo", GUICtrlRead($haslo_input)) IniWrite("ustawienia.ini", "Logowanie", "zmienna", "1") $login = GUICtrlRead($login_input) $haslo = GUICtrlRead($haslo_input) $oIE = _IECreate("http://www.pl.rumblerace.org/index.php?anmelden=1") _IELOADWAIT($oIE) $oLinks = _IELinkGetCollection ($oIE) Sleep(3000) $login1 = _IEGetObjByName($oIE, "USR") $haslo1 = _IEGetObjByName($oIE, "pass") _IEFormElementSetValue($login1,$login) _IEFormElementSetValue($haslo1, $haslo) $oForm = _IEFormGetCollection ($oIE, 0) _IEFormSubmit($oForm) _IELoadWait($oIE) EndFunc If IniRead("ustawienia.ini", "Logowanie", "zmienna", "") = 1 Then GuiCtrlSetData($login_input, IniRead("ustawienia.ini", "Logowanie", "Login", "")) GuiCtrlSetData($haslo_input, IniRead("ustawienia.ini", "Logowanie", "Haslo", "")) EndIf While 1 $msg = GUIGetMsg() Switch $msg Case $GUI_EVENT_CLOSE Exit Case $loguj login() EndSwitch WEnd Mam taki problem jak się zaloguje to nie mogę kliknąć w obrazek-odnośnik gdyż nie mogę odczytać linku aktualnej strony po zalogowaniu. Poniższy skrypt klika mi w ten odnośnik ale czy da sie odczytać URL strony po zalogowaniu i wprowadzić go jako zmienną tak aby znalazł się w msc $oIE ??? #include <IE.au3> $oIE = _IECreate("http://pl.rumblerace.org/main.php4?page=home&USR=goscc&pf6be2=3e351819cc0369f8ab03c7f1b9deed8b") $oImg = _IEImgGetCollection ($oIE, 7) _IEAction($oImg, "click") strona www.pl.rumblerace.org login goscc haslo goscc Edytowane 8 Sierpnia 2011 przez karboon Odnośnik do komentarza Udostępnij na innych stronach Więcej opcji udostępniania...
4ggr35510n Opublikowano 8 Sierpnia 2011 Udostępnij Opublikowano 8 Sierpnia 2011 Nie do końca rozumiem, ale: $oIE.document.location.href Zwraca adres strony na której aktualnie się znajdujesz. @ EDIT Aha, jeszcze jedno: $oIE.document.images(7).parentNode Zwraca link, o który ci chodzi (chyba). Ta sygnatura jest pusta. Odnośnik do komentarza Udostępnij na innych stronach Więcej opcji udostępniania...
karboon Opublikowano 8 Sierpnia 2011 Autor Udostępnij Opublikowano 8 Sierpnia 2011 (edytowane) Chcę zrobić coś podobnego co w skrypcie poniżej po zalogowaniu pojawia sie adres url (tylko trzeba odświeżyć karte logowanie w GUI) #include <EditConstants.au3> #include <GUIConstantsEx.au3> #include <StaticConstants.au3> #include <WindowsConstants.au3> #include <FF.au3> #include <FFEx.au3> #include <AVIConstants.au3> #include <TreeViewConstants.au3> #include <ButtonConstants.au3> #include <TabConstants.au3> $Karta = GUICreate("AutoLogin", 700, 670) $tab = GUICtrlCreateTab(5, 5, 690, 660) $tab0 = GUICtrlCreateTabItem("Logowanie") GUICtrlSetFont(-1, 8, 400, 0, "MS Sans Serif") GUICtrlSetResizing(-1, $GUI_DOCKWIDTH+$GUI_DOCKHEIGHT) $login_input = GUICtrlCreateInput("", 10, 30, 100, 20) $haslo_input = GUICtrlCreateInput("", 10, 55, 100,20, $ES_PASSWORD) GUICtrlCreateLabel("Login", 115, 32) GUICtrlCreateLabel("Hasło", 115, 50) GUICtrlCreateLabel("Tu pojawi się adres strony", 10 , 160) $loguj = GUICtrlCreateButton("Loguj", 30, 80, 60, 20) GUISetState() Func login() IniWrite("ustawienia.ini", "Logowanie", "Login", GUICtrlRead($login_input)) IniWrite("ustawienia.ini", "Logowanie", "Haslo", GUICtrlRead($haslo_input)) IniWrite("ustawienia.ini", "Logowanie", "zmienna", "1") $login = GUICtrlRead($login_input) $haslo = GUICtrlRead($haslo_input) _FFStart("http://www.pl.rumblerace.org/index.php?anmelden=1") $obiekt_login = _FFObjGet("USR", "name") $obiekt_haslo = _FFObjGet("pass", "name") _FFObj($obiekt_login, "value", $login) _FFObj($obiekt_haslo, "value", $haslo) _FFFormSubmit() karta() EndFunc If IniRead("ustawienia.ini", "Logowanie", "zmienna", "") = 1 Then GuiCtrlSetData($login_input, IniRead("ustawienia.ini", "Logowanie", "Login", "")) GuiCtrlSetData($haslo_input, IniRead("ustawienia.ini", "Logowanie", "Haslo", "")) EndIf $tab1 = GUICtrlCreateTabItem("Ustawienia") GUICtrlCreateLabel("Do prawidłowego działania programu będziesz potrzebował Mozilla Firefox z zainstalowanym dodadkiem MozRepl", 10, 30) GUICtrlCreateLabel("Odczytaj 'value' samochodu, kierowcy i mechanika.", 10, 60) GUICtrlCreateLabel("Aby to zrobić musisz posiadać zainstalowany dodatek Firebug zaznaczyć odpowiedni input i kliknąć PPM 'Zbadaj Element'", 10, 80) ;samochody GUICtrlCreateLabel("Samochód 1", 10, 110) $Samochod_1 = GUICtrlCreateInput("", 90, 108, 100, 20) GUICtrlCreateLabel("Samochód 2", 10, 140) $Samochod_2 = GUICtrlCreateInput("", 90, 138, 100, 20) GUICtrlCreateLabel("Samochód 3", 10, 170) $Samochod_3 = GUICtrlCreateInput("", 90, 168, 100, 20) GUICtrlCreateLabel("Samochód 4", 10, 200) $Samochod_4 = GUICtrlCreateInput("", 90, 198, 100, 20) GUICtrlCreateLabel("Samochód 5", 10, 230) $Samochod_5 = GUICtrlCreateInput("", 90, 228, 100, 20) GUICtrlCreateLabel("Samochód 6", 10, 260) $Samochod_6 = GUICtrlCreateInput("", 90, 258, 100, 20) GUICtrlCreateLabel("Samochód 7", 10, 290) $Samochod_7 = GUICtrlCreateInput("", 90, 288, 100, 20) GUICtrlCreateLabel("Samochód 8", 10, 320) $Samochod_8 = GUICtrlCreateInput("", 90, 318, 100, 20) GUICtrlCreateLabel("Samochód 9", 10, 350) $Samochod_9 = GUICtrlCreateInput("", 90, 348, 100, 20) GUICtrlCreateLabel("Samochód 10", 10, 380) $Samochod_10 = GUICtrlCreateInput("", 90, 378, 100, 20) GUICtrlCreateLabel("Samochód 11", 10, 410) $Samochod_11 = GUICtrlCreateInput("", 90, 408, 100, 20) GUICtrlCreateLabel("Samochód 12", 10, 440) $Samochod_12 = GUICtrlCreateInput("", 90, 438, 100, 20) GUICtrlCreateLabel("Samochód 13", 10, 470) $Samochod_13 = GUICtrlCreateInput("", 90, 468, 100, 20) GUICtrlCreateLabel("Samochód 14", 10, 500) $Samochod_14 = GUICtrlCreateInput("", 90, 498, 100, 20) GUICtrlCreateLabel("Samochód 15", 10, 530) $Samochod_15 = GUICtrlCreateInput("", 90, 528, 100, 20) GUICtrlCreateLabel("Samochód 16", 10, 560) $Samochod_16 = GUICtrlCreateInput("", 90, 558, 100, 20) GUICtrlCreateLabel("Samochód 17", 10, 590) $Samochod_17 = GUICtrlCreateInput("", 90, 588, 100, 20) GUICtrlCreateLabel("Samochód 18", 10, 620) $Samochod_18 = GUICtrlCreateInput("", 90, 618, 100, 20) ;mechanik GUICtrlCreateLabel("Mechanik 1", 240, 110) $Mechanik_1 = GUICtrlCreateInput("", 320, 108, 100, 20) GUICtrlCreateLabel("Mechanik 2", 240, 140) $Mechanik_2 = GUICtrlCreateInput("", 320, 138, 100, 20) GUICtrlCreateLabel("Mechanik 3", 240, 170) $Mechanik_3 = GUICtrlCreateInput("", 320, 168, 100, 20) GUICtrlCreateLabel("Mechanik 4", 240, 200) $Mechanik_4= GUICtrlCreateInput("", 320, 198, 100, 20) GUICtrlCreateLabel("Mechanik 5", 240, 230) $Mechanik_5 = GUICtrlCreateInput("", 320, 228, 100, 20) GUICtrlCreateLabel("Mechanik 6", 240, 260) $Mechanik_6 = GUICtrlCreateInput("", 320, 258, 100, 20) GUICtrlCreateLabel("Mechanik 7", 240, 290) $Mechanik_7 = GUICtrlCreateInput("", 320, 288, 100, 20) GUICtrlCreateLabel("Mechanik 8", 240, 320) $Mechanik_8 = GUICtrlCreateInput("", 320, 318, 100, 20) GUICtrlCreateLabel("Mechanik 9", 240, 350) $Mechanik_9 = GUICtrlCreateInput("", 320, 348, 100, 20) GUICtrlCreateLabel("Mechanik 10", 240, 380) $Mechanik_10= GUICtrlCreateInput("", 320, 378, 100, 20) GUICtrlCreateLabel("Mechanik 11", 240, 410) $Mechanik_11 = GUICtrlCreateInput("", 320, 408, 100, 20) GUICtrlCreateLabel("Mechanik 12", 240, 440) $Mechanik_12 = GUICtrlCreateInput("", 320, 438, 100, 20) GUICtrlCreateLabel("Mechanik 13", 240, 470) $Mechanik_13 = GUICtrlCreateInput("", 320, 468, 100, 20) GUICtrlCreateLabel("Mechanik 14", 240, 500) $Mechanik_14 = GUICtrlCreateInput("", 320, 498, 100, 20) GUICtrlCreateLabel("Mechanik 15", 240, 530) $Mechanik_15 = GUICtrlCreateInput("", 320, 528, 100, 20) GUICtrlCreateLabel("Mechanik 16", 240, 560) $Mechanik_16 = GUICtrlCreateInput("", 320, 558, 100, 20) GUICtrlCreateLabel("Mechanik 17", 240, 590) $Mechanik_17 = GUICtrlCreateInput("", 320, 588, 100, 20) GUICtrlCreateLabel("Mechanik 18", 240, 620) $Mechanik_18 = GUICtrlCreateInput("", 320, 618, 100, 20) ;kierowca GUICtrlCreateLabel("Kierowca 1", 470, 110) $Kierowca_1 = GUICtrlCreateInput("", 560, 108, 100, 20) GUICtrlCreateLabel("Kierowca 2", 470, 140) $Kierowca_2 = GUICtrlCreateInput("", 560, 138, 100, 20) GUICtrlCreateLabel("Kierowca 3", 470, 170) $Kierowca_3 = GUICtrlCreateInput("", 560, 168, 100, 20) GUICtrlCreateLabel("Kierowca 4", 470, 200) $Kierowca_4 = GUICtrlCreateInput("", 560, 198, 100, 20) GUICtrlCreateLabel("Kierowca 5", 470, 230) $Kierowca_5 = GUICtrlCreateInput("", 560, 228, 100, 20) GUICtrlCreateLabel("Kierowca6", 470, 260) $Kierowca_6 = GUICtrlCreateInput("", 560, 258, 100, 20) GUICtrlCreateLabel("Kierowca7", 470, 290) $Kierowca_7 = GUICtrlCreateInput("", 560, 288, 100, 20) GUICtrlCreateLabel("Kierowca 8", 470, 320) $Kierowca_8 = GUICtrlCreateInput("", 560, 318, 100, 20) GUICtrlCreateLabel("Kierowca 9", 470, 350) $Kierowca_9 = GUICtrlCreateInput("", 560, 348, 100, 20) GUICtrlCreateLabel("Kierowca 10", 470, 380) $Kierowca_10 = GUICtrlCreateInput("", 560, 378, 100, 20) GUICtrlCreateLabel("Kierowca 11", 470, 410) $Kierowca_11 = GUICtrlCreateInput("", 560, 408, 100, 20) GUICtrlCreateLabel("Kierowca 12", 470, 440) $Kierowca_12 = GUICtrlCreateInput("", 560, 438, 100, 20) GUICtrlCreateLabel("Kierowca 13", 470, 470) $Kierowca_13 = GUICtrlCreateInput("", 560, 468, 100, 20) GUICtrlCreateLabel("Kierowca 14", 470, 500) $Kierowca_14 = GUICtrlCreateInput("", 560, 498, 100, 20) GUICtrlCreateLabel("Kierowca 15", 470, 530) $Kierowca_15 = GUICtrlCreateInput("", 560, 528, 100, 20) GUICtrlCreateLabel("Kierowca 16", 470, 560) $Kierowca_16 = GUICtrlCreateInput("", 560, 558, 100, 20) GUICtrlCreateLabel("Kierowca 17", 470, 590) $Kierowca_17 = GUICtrlCreateInput("", 560, 588, 100, 20) GUICtrlCreateLabel("Kierowca 18", 470, 620) $Kierowca_18 = GUICtrlCreateInput("", 560, 618, 100, 20) $OK2 = GUICtrlCreateButton("Wyslij", 10, 640, 100, 20) GUISetState() Func moja() IniWrite("ustawienia.ini", "Samochód", "Samochód 1", GUICtrlRead($Samochod_1)) IniWrite("ustawienia.ini", "Samochód", "Samochód 2", GUICtrlRead($Samochod_2)) IniWrite("ustawienia.ini", "Samochód", "Samochód 3", GUICtrlRead($Samochod_3)) IniWrite("ustawienia.ini", "Samochód", "Samochód 4", GUICtrlRead($Samochod_4)) IniWrite("ustawienia.ini", "Samochód", "Samochód 5", GUICtrlRead($Samochod_5)) IniWrite("ustawienia.ini", "Samochód", "Samochód 6", GUICtrlRead($Samochod_6)) IniWrite("ustawienia.ini", "Samochód", "Samochód 7", GUICtrlRead($Samochod_7)) IniWrite("ustawienia.ini", "Samochód", "Samochód 8", GUICtrlRead($Samochod_8)) IniWrite("ustawienia.ini", "Samochód", "Samochód 9", GUICtrlRead($Samochod_9)) IniWrite("ustawienia.ini", "Samochód", "Samochód 10", GUICtrlRead($Samochod_10)) IniWrite("ustawienia.ini", "Samochód", "Samochód 11", GUICtrlRead($Samochod_11)) IniWrite("ustawienia.ini", "Samochód", "Samochód 12", GUICtrlRead($Samochod_12)) IniWrite("ustawienia.ini", "Samochód", "Samochód 13", GUICtrlRead($Samochod_13)) IniWrite("ustawienia.ini", "Samochód", "Samochód 14", GUICtrlRead($Samochod_14)) IniWrite("ustawienia.ini", "Samochód", "Samochód 15", GUICtrlRead($Samochod_15)) IniWrite("ustawienia.ini", "Samochód", "Samochód 16", GUICtrlRead($Samochod_16)) IniWrite("ustawienia.ini", "Samochód", "Samochód 17", GUICtrlRead($Samochod_17)) IniWrite("ustawienia.ini", "Samochód", "Samochód 18", GUICtrlRead($Samochod_18)) IniWrite("ustawienia.ini", "Mechanik", "Mechanik 1", GUICtrlRead($Mechanik_1)) IniWrite("ustawienia.ini", "Mechanik", "Mechanik 2", GUICtrlRead($Mechanik_2)) IniWrite("ustawienia.ini", "Mechanik", "Mechanik 3", GUICtrlRead($Mechanik_3)) IniWrite("ustawienia.ini", "Mechanik", "Mechanik 4", GUICtrlRead($Mechanik_4)) IniWrite("ustawienia.ini", "Mechanik", "Mechanik 5", GUICtrlRead($Mechanik_5)) IniWrite("ustawienia.ini", "Mechanik", "Mechanik 6", GUICtrlRead($Mechanik_6)) IniWrite("ustawienia.ini", "Mechanik", "Mechanik 7", GUICtrlRead($Mechanik_7)) IniWrite("ustawienia.ini", "Mechanik", "Mechanik 8", GUICtrlRead($Mechanik_8)) IniWrite("ustawienia.ini", "Mechanik", "Mechanik 9", GUICtrlRead($Mechanik_9)) IniWrite("ustawienia.ini", "Mechanik", "Mechanik 10", GUICtrlRead($Mechanik_10)) IniWrite("ustawienia.ini", "Mechanik", "Mechanik 11", GUICtrlRead($Mechanik_11)) IniWrite("ustawienia.ini", "Mechanik", "Mechanik 12", GUICtrlRead($Mechanik_12)) IniWrite("ustawienia.ini", "Mechanik", "Mechanik 13", GUICtrlRead($Mechanik_13)) IniWrite("ustawienia.ini", "Mechanik", "Mechanik 14", GUICtrlRead($Mechanik_14)) IniWrite("ustawienia.ini", "Mechanik", "Mechanik 15", GUICtrlRead($Mechanik_15)) IniWrite("ustawienia.ini", "Mechanik", "Mechanik 16", GUICtrlRead($Mechanik_16)) IniWrite("ustawienia.ini", "Mechanik", "Mechanik 17", GUICtrlRead($Mechanik_17)) IniWrite("ustawienia.ini", "Mechanik", "Mechanik 18", GUICtrlRead($Mechanik_18)) IniWrite("ustawienia.ini", "Kierowca", "Kierowca 1", GUICtrlRead($Kierowca_1)) IniWrite("ustawienia.ini", "Kierowca", "Kierowca 2", GUICtrlRead($Kierowca_2)) IniWrite("ustawienia.ini", "Kierowca", "Kierowca 3", GUICtrlRead($Kierowca_3)) IniWrite("ustawienia.ini", "Kierowca", "Kierowca 4", GUICtrlRead($Kierowca_4)) IniWrite("ustawienia.ini", "Kierowca", "Kierowca 5", GUICtrlRead($Kierowca_5)) IniWrite("ustawienia.ini", "Kierowca", "Kierowca 6", GUICtrlRead($Kierowca_6)) IniWrite("ustawienia.ini", "Kierowca", "Kierowca 7", GUICtrlRead($Kierowca_7)) IniWrite("ustawienia.ini", "Kierowca", "Kierowca 8", GUICtrlRead($Kierowca_8)) IniWrite("ustawienia.ini", "Kierowca", "Kierowca 9", GUICtrlRead($Kierowca_9)) IniWrite("ustawienia.ini", "Kierowca", "Kierowca 10", GUICtrlRead($Kierowca_10)) IniWrite("ustawienia.ini", "Kierowca", "Kierowca 11", GUICtrlRead($Kierowca_11)) IniWrite("ustawienia.ini", "Kierowca", "Kierowca 12", GUICtrlRead($Kierowca_12)) IniWrite("ustawienia.ini", "Kierowca", "Kierowca 13", GUICtrlRead($Kierowca_13)) IniWrite("ustawienia.ini", "Kierowca", "Kierowca 14", GUICtrlRead($Kierowca_14)) IniWrite("ustawienia.ini", "Kierowca", "Kierowca 15", GUICtrlRead($Kierowca_15)) IniWrite("ustawienia.ini", "Kierowca", "Kierowca 16", GUICtrlRead($Kierowca_16)) IniWrite("ustawienia.ini", "Kierowca", "Kierowca 17", GUICtrlRead($Kierowca_17)) IniWrite("ustawienia.ini", "Kierowca", "Kierowca 18", GUICtrlRead($Kierowca_18)) IniWrite("ustawienia.ini", "Logowanie", "zmienna", "1") EndFunc If IniRead("ustawienia.ini", "Logowanie", "zmienna", "") = 1 Then GuiCtrlSetData($Samochod_1, IniRead("ustawienia.ini", "Samochód", "Samochód 1", "")) GuiCtrlSetData($Samochod_2, IniRead("ustawienia.ini", "Samochód", "Samochód 2", "")) GuiCtrlSetData($Samochod_3, IniRead("ustawienia.ini", "Samochód", "Samochód 3", "")) GuiCtrlSetData($Samochod_4, IniRead("ustawienia.ini", "Samochód", "Samochód 4", "")) GuiCtrlSetData($Samochod_5, IniRead("ustawienia.ini", "Samochód", "Samochód 5", "")) GuiCtrlSetData($Samochod_6, IniRead("ustawienia.ini", "Samochód", "Samochód 6", "")) GuiCtrlSetData($Samochod_7, IniRead("ustawienia.ini", "Samochód", "Samochód 7", "")) GuiCtrlSetData($Samochod_8, IniRead("ustawienia.ini", "Samochód", "Samochód 8", "")) GuiCtrlSetData($Samochod_9, IniRead("ustawienia.ini", "Samochód", "Samochód 9", "")) GuiCtrlSetData($Samochod_10, IniRead("ustawienia.ini", "Samochód", "Samochód 10", "")) GuiCtrlSetData($Samochod_11, IniRead("ustawienia.ini", "Samochód", "Samochód 11", "")) GuiCtrlSetData($Samochod_12, IniRead("ustawienia.ini", "Samochód", "Samochód 12", "")) GuiCtrlSetData($Samochod_13, IniRead("ustawienia.ini", "Samochód", "Samochód 13", "")) GuiCtrlSetData($Samochod_14, IniRead("ustawienia.ini", "Samochód", "Samochód 14", "")) GuiCtrlSetData($Samochod_15, IniRead("ustawienia.ini", "Samochód", "Samochód 15", "")) GuiCtrlSetData($Samochod_16, IniRead("ustawienia.ini", "Samochód", "Samochód 16", "")) GuiCtrlSetData($Samochod_17, IniRead("ustawienia.ini", "Samochód", "Samochód 17", "")) GuiCtrlSetData($Samochod_18, IniRead("ustawienia.ini", "Samochód", "Samochód 18", "")) GuiCtrlSetData($Mechanik_1, IniRead("ustawienia.ini", "Mechanik", "Mechanik 1", "")) GuiCtrlSetData($Mechanik_2, IniRead("ustawienia.ini", "Mechanik", "Mechanik 2", "")) GuiCtrlSetData($Mechanik_3, IniRead("ustawienia.ini", "SMechanik", "Mechanik 3", "")) GuiCtrlSetData($Mechanik_4, IniRead("ustawienia.ini", "Mechanik", "Mechanik 4", "")) GuiCtrlSetData($Mechanik_5, IniRead("ustawienia.ini", "Mechanik", "Mechanik 5", "")) GuiCtrlSetData($Mechanik_6, IniRead("ustawienia.ini", "Mechanik", "Mechanik 6", "")) GuiCtrlSetData($Mechanik_7, IniRead("ustawienia.ini", "Mechanik", "Mechanik 7", "")) GuiCtrlSetData($Mechanik_8, IniRead("ustawienia.ini", "Mechanik", "Mechanik 8", "")) GuiCtrlSetData($Mechanik_9, IniRead("ustawienia.ini", "Mechanik", "Mechanik 9", "")) GuiCtrlSetData($Mechanik_10, IniRead("ustawienia.ini", "Mechanik", "Mechanik 10", "")) GuiCtrlSetData($Mechanik_11, IniRead("ustawienia.ini", "Mechanik", "Mechanik 11", "")) GuiCtrlSetData($Mechanik_12, IniRead("ustawienia.ini", "Mechanik", "Mechanik 12", "")) GuiCtrlSetData($Mechanik_13, IniRead("ustawienia.ini", "Mechanik", "Mechanik 13", "")) GuiCtrlSetData($Mechanik_14, IniRead("ustawienia.ini", "Mechanik", "Mechanik 14", "")) GuiCtrlSetData($Mechanik_15, IniRead("ustawienia.ini", "Mechanik", "Mechanik 15", "")) GuiCtrlSetData($Mechanik_16, IniRead("ustawienia.ini", "Mechanik", "Mechanik 16", "")) GuiCtrlSetData($Mechanik_17, IniRead("ustawienia.ini", "Mechanik", "Mechanik 17", "")) GuiCtrlSetData($Mechanik_18, IniRead("ustawienia.ini", "Mechanik", "Mechanik 18", "")) GuiCtrlSetData($Kierowca_1, IniRead("ustawienia.ini", "Kierowca", "Kierowca 1", "")) GuiCtrlSetData($Kierowca_2, IniRead("ustawienia.ini", "Kierowca", "Kierowca 2", "")) GuiCtrlSetData($Kierowca_3, IniRead("ustawienia.ini", "SKierowca", "Kierowca 3", "")) GuiCtrlSetData($Kierowca_4, IniRead("ustawienia.ini", "Kierowca", "Kierowca 4", "")) GuiCtrlSetData($Kierowca_5, IniRead("ustawienia.ini", "Kierowca", "Kierowca 5", "")) GuiCtrlSetData($Kierowca_6, IniRead("ustawienia.ini", "Kierowca", "Kierowca 6", "")) GuiCtrlSetData($Kierowca_7, IniRead("ustawienia.ini", "Kierowca", "Kierowca 7", "")) GuiCtrlSetData($Kierowca_8, IniRead("ustawienia.ini", "Kierowca", "Kierowca 8", "")) GuiCtrlSetData($Kierowca_9, IniRead("ustawienia.ini", "Kierowca", "Kierowca 9", "")) GuiCtrlSetData($Kierowca_10, IniRead("ustawienia.ini", "Kierowca", "Kierowca 10", "")) GuiCtrlSetData($Kierowca_11, IniRead("ustawienia.ini", "Kierowca", "Kierowca 11", "")) GuiCtrlSetData($Kierowca_12, IniRead("ustawienia.ini", "Kierowca", "Kierowca 12", "")) GuiCtrlSetData($Kierowca_13, IniRead("ustawienia.ini", "Kierowca", "Kierowca 13", "")) GuiCtrlSetData($Kierowca_14, IniRead("ustawienia.ini", "Kierowca", "Kierowca 14", "")) GuiCtrlSetData($Kierowca_15, IniRead("ustawienia.ini", "Kierowca", "Kierowca 15", "")) GuiCtrlSetData($Kierowca_16, IniRead("ustawienia.ini", "Kierowca", "Kierowca 16", "")) GuiCtrlSetData($Kierowca_17, IniRead("ustawienia.ini", "Kierowca", "Kierowca 17", "")) GuiCtrlSetData($Kierowca_18, IniRead("ustawienia.ini", "Kierowca", "Kierowca 18", "")) EndIf While 1 $msg = GUIGetMsg() Switch $msg Case $GUI_EVENT_CLOSE Exit Case $loguj login() Case $OK2 moja() EndSwitch WEnd Func karta() Global $radio[20] Global $button $adress = _FFCmd(".location.href") $tab =GUICtrlCreateInput($adress, 10, 202, 650) $Organizuj = GUICtrlCreateInput("", 10, 252, 650) GUICtrlCreateLabel("Adres Strony", 10 , 180) GUICtrlCreateLabel("Kupjuj Url a potem znajdź 'home' i zamiń na 'renn2'", 10, 230) GUICtrlCreateLabel("Zaznacz tylko 1 miasto", 10, 300) GUICtrlCreateGroup("", 10, 320, 675, 152) $radio[1] = GUICtrlCreateRadio("Warszawa", 15,330,100,20) $radio[2] = GUICtrlCreateRadio("Wrocław", 15,350,100,20) $radio[3] = GUICtrlCreateRadio("Szczecin", 15,370,100,20) $radio[4] = GUICtrlCreateRadio("Toruń", 15,390,100,20) $radio[5] = GUICtrlCreateRadio("Opole",15,410,100,20) $radio[6] = GUICtrlCreateRadio("Tarnów", 15,430,100,20) $radio[7] = GUICtrlCreateRadio("Zamość", 15,450,100,20) GUICtrlSetState($radio[1], $GUI_CHECKED) $radio[8] = GUICtrlCreateRadio("Kraków", 250,330,100,20) $radio[9] = GUICtrlCreateRadio("Poznań", 250,350,100,20) $radio[10] = GUICtrlCreateRadio("Gdynia", 250,370,100,20) $radio[11] = GUICtrlCreateRadio("Kielce", 250,390,100,20) $radio[12] = GUICtrlCreateRadio("Płock", 250,410,100,20) $radio[13] = GUICtrlCreateRadio("Jelenia Góra",250,430,100,20) $radio[14] = GUICtrlCreateRadio("Włoszczowa", 250,450,100,20) $radio[15] = GUICtrlCreateRadio("Łódz", 485,330,100,20) $radio[16] = GUICtrlCreateRadio("Gdańsk",485,350,100,20) $radio[17] = GUICtrlCreateRadio("Lublin", 485,370,100,20) $radio[18] = GUICtrlCreateRadio("Bytom", 485,390,100,20) $radio[19] = GUICtrlCreateRadio("Zielona Góra", 485,410,100,20) $radio[00] = GUICtrlCreateRadio("Gniezno",485,430,100,20) GUICtrlCreateGroup("", -99, -99, 1, 1) $button = GUICtrlCreateButton("OK", 15, 500, 60, 20) GUISetState() While 1 $msg = GUIGetMsg() If $msg = $button Then $sURL = GUICtrlRead($Organizuj, 1) ; Odczytuje podany adres _FFopenURL($sURL) _FFLoadWait() EndIf Switch $msg Case $GUI_EVENT_CLOSE Exit Case $button dzialaj() EndSwitch WEnd EndFunc func x() GUISetState(@SW_HIDE,$Karta) EndFunc Func dzialaj() if (GUICtrlRead($radio[1]) = $GUI_CHECKED) Then Warszawa() elseif (GUICtrlRead($radio[2]) = $GUI_CHECKED) Then MsgBox(64, "aaa", "zaznaczone bylo 3") elseif (GUICtrlRead($radio[3]) = $GUI_CHECKED) Then MsgBox(64, "aaa", "zaznaczone bylo 4") elseif (GUICtrlRead($radio[4]) = $GUI_CHECKED) Then MsgBox(64, "aaa", "zaznaczone bylo 5") elseif (GUICtrlRead($radio[5]) = $GUI_CHECKED) Then MsgBox(64, "aaa", "zaznaczone bylo 6") elseif (GUICtrlRead($radio[6]) = $GUI_CHECKED) Then MsgBox(64, "aaa", "zaznaczone bylo 7") elseif (GUICtrlRead($radio[7]) = $GUI_CHECKED) Then MsgBox(64, "aaa", "zaznaczone bylo 8") elseif (GUICtrlRead($radio[8]) = $GUI_CHECKED) Then MsgBox(64, "aaa", "zaznaczone bylo 9") elseif (GUICtrlRead($radio[9]) = $GUI_CHECKED) Then MsgBox(64, "aaa", "zaznaczone bylo 10") elseif (GUICtrlRead($radio[10]) = $GUI_CHECKED) Then MsgBox(64, "aaa", "zaznaczone bylo 11") elseif (GUICtrlRead($radio[11]) = $GUI_CHECKED) Then MsgBox(64, "aaa", "zaznaczone bylo 12") elseif (GUICtrlRead($radio[12]) = $GUI_CHECKED) Then MsgBox(64, "aaa", "zaznaczone bylo 13") elseif (GUICtrlRead($radio[13]) = $GUI_CHECKED) Then MsgBox(64, "aaa", "zaznaczone bylo 14") elseif (GUICtrlRead($radio[14]) = $GUI_CHECKED) Then MsgBox(64, "aaa", "zaznaczone bylo 15") elseif (GUICtrlRead($radio[15]) = $GUI_CHECKED) Then MsgBox(64, "aaa", "zaznaczone bylo 11") elseif (GUICtrlRead($radio[16]) = $GUI_CHECKED) Then MsgBox(64, "aaa", "zaznaczone bylo 12") elseif (GUICtrlRead($radio[17]) = $GUI_CHECKED) Then MsgBox(64, "aaa", "zaznaczone bylo 13") elseif (GUICtrlRead($radio[18]) = $GUI_CHECKED) Then MsgBox(64, "aaa", "zaznaczone bylo 14") elseif (GUICtrlRead($radio[19]) = $GUI_CHECKED) Then MsgBox(64, "aaa", "zaznaczone bylo 13") elseif (GUICtrlRead($radio[00]) = $GUI_CHECKED) Then MsgBox(64, "aaa", "zaznaczone bylo 14") EndIf EndFunc Func Warszawa() $towarzyski = _FFXpath("/html/body/div[3]/table/tbody/tr/td[2]/table[2]/tbody/tr/td[2]/table/tbody/tr[2]/td/table/tbody/tr/td[2]/input", "", 9) ; wybiera typ wyscigu _FFClick($towarzyski) $Warszawa = _FFXpath("/html/body/div[3]/table/tbody/tr/td[2]/table[2]/tbody/tr/td[2]/table/tbody/tr[2]/td/table[2]/tbody/tr/td[2]/input", "", 9) ; wybiera tor _FFClick($Warszawa) _FFFormSubmit() _FFLoadWait() If _FFconnect() Then $i=1 _FFXPath("//input[@type=radio' and @value='"&$i&"' and @name='take_d]","",9) _FFObj("xpath.checked=true") ;godz 7h $j=7 _FFXPath("//input[@type=radio' and @value='"&$j&"'and @name='take_h]","",9) _FFObj("xpath.checked=true") _FFFormSubmit() _FFLoadWait() EndIf ;samochod 1 If _FFconnect() Then _FFXPath("//input[@type=radio' and @value='"&IniRead("ustawienia.ini", "Samochód", "Samochód 1", "")&"]","",9) _FFObj("xpath.checked=true") _FFXPath("//input[@type=radio' and @value='"&IniRead("ustawienia.ini", "Mechanik", "Mechanik 1", "")&"]","",9) _FFObj("xpath.checked=true") _FFXPath("//input[@type=radio' and @value='"&IniRead("ustawienia.ini", "Kierowca", "Kierowca 1", "")&"]","",9) _FFObj("xpath.checked=true") _FFFormSubmit() _FFLoadWait() opony() EndIf EndFunc Func opony() If _FFconnect() Then $karbon = 3 _FFXPath("//input[@type=radio' and @value='"&$karbon&"]","",9) _FFObj("xpath.checked=true") $karboon =0 _FFXPath("//input[@type=radio' and @value='"&$karboon&"]","",9) _FFObj("xpath.checked=true") $karb = 5 _FFXPath("//input[@type=radio' and @value='"&$karb&"]","",9) _FFObj("xpath.checked=true") $kar =2 _FFXPath("//input[@type=radio' and @value='"&1&"'[email protected]='setup_b]","",9) _FFObj("xpath.checked=true") _FFFormSubmit() _FFLoadWait() EndIf ;klika dodaj do wyscigu klanow If _FFconnect() Then $towarzyski = _FFXpath("/html/body/div[3]/table/tbody/tr/td[2]/table[2]/tbody/tr/td[2]/table/tbody/tr[2]/td/a", "", 9) ; wybiera typ wyscigu _FFClick($towarzyski) EndIf ;klika dodaj If _FFconnect() Then $towarzyski = _FFXpath("/html/body/div[3]/table/tbody/tr/td[2]/table[2]/tbody/tr/td[2]/table/tbody/tr[3]/td/form/input[4]", "", 9) ; wybiera typ wyscigu _FFClick($towarzyski) EndIf ;2 dodaj If _FFconnect() Then $towarzyski = _FFXpath("/html/body/div[3]/table/tbody/tr/td[2]/table[2]/tbody/tr/td[2]/table/tbody/tr[3]/td/table/tbody/tr[2]/td[7]/a", "", 9) ; wybiera typ wyscigu _FFClick($towarzyski) EndIf ;startuj If _FFconnect() Then $towarzyski = _FFXpath("/html/body/div[3]/table/tbody/tr/td[2]/table[2]/tbody/tr/td[2]/table/tbody/tr[2]/td/table/tbody/tr[2]/td[9]/a", "", 9) ; wybiera typ wyscigu _FFClick($towarzyski) EndIf samochod_2() EndFunc ;samochod 2 func samochod_2() If _FFconnect() Then _FFXPath("//input[@type=radio' and @value='"&IniRead("ustawienia.ini", "Samochód", "Samochód 2", "")&"]","",9) _FFObj("xpath.checked=true") _FFXPath("//input[@type=radio' and @value='"&IniRead("ustawienia.ini", "Mechanik", "Mechanik 2", "")&"]","",9) _FFObj("xpath.checked=true") _FFXPath("//input[@type=radio' and @value='"&IniRead("ustawienia.ini", "Kierowca", "Kierowca 2", "")&"]","",9) _FFObj("xpath.checked=true") _FFFormSubmit() _FFLoadWait() opony2() EndIf EndFunc Func opony2() If _FFconnect() Then $karbon = 3 _FFXPath("//input[@type=radio' and @value='"&$karbon&"]","",9) _FFObj("xpath.checked=true") $karboon =0 _FFXPath("//input[@type=radio' and @value='"&$karboon&"]","",9) _FFObj("xpath.checked=true") $karb = 5 _FFXPath("//input[@type=radio' and @value='"&$karb&"]","",9) _FFObj("xpath.checked=true") _FFXPath("//input[@type=radio' and @value='"&1&"'[email protected]='setup_b]","",9) _FFObj("xpath.checked=true") _FFFormSubmit() _FFLoadWait() EndIf If _FFConnect() Then _FFAction("back") _FFLoadWait() _FFAction("back") _FFLoadWait() EndIf samochod_3() EndFunc ;samochod 3 func samochod_3() If _FFconnect() Then _FFXPath("//input[@type=radio' and @value='"&IniRead("ustawienia.ini", "Samochód", "Samochód 3", "")&"]","",9) _FFObj("xpath.checked=true") _FFXPath("//input[@type=radio' and @value='"&IniRead("ustawienia.ini", "Mechanik", "Mechanik 3", "")&"]","",9) _FFObj("xpath.checked=true") _FFXPath("//input[@type=radio' and @value='"&IniRead("ustawienia.ini", "Kierowca", "Kierowca 3", "")&"]","",9) _FFObj("xpath.checked=true") _FFFormSubmit() _FFLoadWait() opony3() EndIf EndFunc Func opony3() If _FFconnect() Then $karbon = 3 _FFXPath("//input[@type=radio' and @value='"&$karbon&"]","",9) _FFObj("xpath.checked=true") $karboon =0 _FFXPath("//input[@type=radio' and @value='"&$karboon&"]","",9) _FFObj("xpath.checked=true") $karb = 5 _FFXPath("//input[@type=radio' and @value='"&$karb&"]","",9) _FFObj("xpath.checked=true") _FFXPath("//input[@type=radio' and @value='"&1&"'[email protected]='setup_b]","",9) _FFObj("xpath.checked=true") _FFFormSubmit() _FFLoadWait() EndIf If _FFConnect() Then _FFAction("back") _FFLoadWait() _FFAction("back") _FFLoadWait() EndIf samochod_4() EndFunc ;samochod 4 func samochod_4() If _FFconnect() Then _FFXPath("//input[@type=radio' and @value='"&IniRead("ustawienia.ini", "Samochód", "Samochód 4", "")&"]","",9) _FFObj("xpath.checked=true") _FFXPath("//input[@type=radio' and @value='"&IniRead("ustawienia.ini", "Mechanik", "Mechanik 4", "")&"]","",9) _FFObj("xpath.checked=true") _FFXPath("//input[@type=radio' and @value='"&IniRead("ustawienia.ini", "Kierowca", "Kierowca 4", "")&"]","",9) _FFObj("xpath.checked=true") _FFFormSubmit() _FFLoadWait() opony4() EndIf EndFunc Func opony4() If _FFconnect() Then $karbon = 3 _FFXPath("//input[@type=radio' and @value='"&$karbon&"]","",9) _FFObj("xpath.checked=true") $karboon =0 _FFXPath("//input[@type=radio' and @value='"&$karboon&"]","",9) _FFObj("xpath.checked=true") $karb = 5 _FFXPath("//input[@type=radio' and @value='"&$karb&"]","",9) _FFObj("xpath.checked=true") $kar =2 _FFXPath("//input[@type=radio' and @value='"&1&"'[email protected]='setup_b]","",9) _FFObj("xpath.checked=true") _FFFormSubmit() _FFLoadWait() EndIf If _FFConnect() Then _FFAction("back") _FFLoadWait() _FFAction("back") _FFLoadWait() EndIf samochod_5() EndFunc ;samochod 5 func samochod_5() If _FFconnect() Then _FFXPath("//input[@type=radio' and @value='"&IniRead("ustawienia.ini", "Samochód", "Samochód 5", "")&"]","",9) _FFObj("xpath.checked=true") _FFXPath("//input[@type=radio' and @value='"&IniRead("ustawienia.ini", "Mechanik", "Mechanik 5", "")&"]","",9) _FFObj("xpath.checked=true") _FFXPath("//input[@type=radio' and @value='"&IniRead("ustawienia.ini", "Kierowca", "Kierowca 5", "")&"]","",9) _FFObj("xpath.checked=true") _FFFormSubmit() _FFLoadWait() opony5() EndIf EndFunc Func opony5() If _FFconnect() Then $karbon = 3 _FFXPath("//input[@type=radio' and @value='"&$karbon&"]","",9) _FFObj("xpath.checked=true") $karboon =0 _FFXPath("//input[@type=radio' and @value='"&$karboon&"]","",9) _FFObj("xpath.checked=true") $karb = 5 _FFXPath("//input[@type=radio' and @value='"&$karb&"]","",9) _FFObj("xpath.checked=true") _FFXPath("//input[@type=radio' and @value='"&1&"'[email protected]='setup_b]","",9) _FFObj("xpath.checked=true") _FFFormSubmit() _FFLoadWait() EndIf If _FFConnect() Then _FFAction("back") _FFLoadWait() _FFAction("back") _FFLoadWait() EndIf samochod_6() EndFunc ;samochod 6 func samochod_6() If _FFconnect() Then _FFXPath("//input[@type=radio' and @value='"&IniRead("ustawienia.ini", "Samochód", "Samochód 6", "")&"]","",9) _FFObj("xpath.checked=true") _FFXPath("//input[@type=radio' and @value='"&IniRead("ustawienia.ini", "Mechanik", "Mechanik 6", "")&"]","",9) _FFObj("xpath.checked=true") _FFXPath("//input[@type=radio' and @value='"&IniRead("ustawienia.ini", "Kierowca", "Kierowca 6", "")&"]","",9) _FFObj("xpath.checked=true") _FFFormSubmit() _FFLoadWait() opony6() EndIf EndFunc Func opony6() If _FFconnect() Then $karbon = 3 _FFXPath("//input[@type=radio' and @value='"&$karbon&"]","",9) _FFObj("xpath.checked=true") $karboon =0 _FFXPath("//input[@type=radio' and @value='"&$karboon&"]","",9) _FFObj("xpath.checked=true") $karb = 5 _FFXPath("//input[@type=radio' and @value='"&$karb&"]","",9) _FFObj("xpath.checked=true") _FFXPath("//input[@type=radio' and @value='"&1&"'[email protected]='setup_b]","",9) _FFObj("xpath.checked=true") _FFFormSubmit() _FFLoadWait() EndIf If _FFConnect() Then _FFAction("back") _FFLoadWait() _FFAction("back") _FFLoadWait() EndIf samochod_7() EndFunc ;samochod 7 Func samochod_7() If _FFconnect() Then _FFXPath("//input[@type=radio' and @value='"&IniRead("ustawienia.ini", "Samochód", "Samochód 7", "")&"]","",9) _FFObj("xpath.checked=true") _FFXPath("//input[@type=radio' and @value='"&IniRead("ustawienia.ini", "Mechanik", "Mechanik 7", "")&"]","",9) _FFObj("xpath.checked=true") _FFXPath("//input[@type=radio' and @value='"&IniRead("ustawienia.ini", "Kierowca", "Kierowca 7", "")&"]","",9) _FFObj("xpath.checked=true") _FFFormSubmit() _FFLoadWait() opony7() EndIf EndFunc Func opony7() If _FFconnect() Then $karbon = 3 _FFXPath("//input[@type=radio' and @value='"&$karbon&"]","",9) _FFObj("xpath.checked=true") $karboon =0 _FFXPath("//input[@type=radio' and @value='"&$karboon&"]","",9) _FFObj("xpath.checked=true") $karb = 5 _FFXPath("//input[@type=radio' and @value='"&$karb&"]","",9) _FFObj("xpath.checked=true") $kar =2 _FFXPath("//input[@type=radio' and @value='"&1&"'[email protected]='setup_b]","",9) _FFObj("xpath.checked=true") _FFFormSubmit() _FFLoadWait() EndIf If _FFConnect() Then _FFAction("back") _FFLoadWait() _FFAction("back") _FFLoadWait() EndIf samochod_8() EndFunc ;samochod 8 func samochod_8() If _FFconnect() Then _FFXPath("//input[@type=radio' and @value='"&IniRead("ustawienia.ini", "Samochód", "Samochód 8", "")&"]","",9) _FFObj("xpath.checked=true") _FFXPath("//input[@type=radio' and @value='"&IniRead("ustawienia.ini", "Mechanik", "Mechanik 8", "")&"]","",9) _FFObj("xpath.checked=true") _FFXPath("//input[@type=radio' and @value='"&IniRead("ustawienia.ini", "Kierowca", "Kierowca 8", "")&"]","",9) _FFObj("xpath.checked=true") _FFFormSubmit() _FFLoadWait() opony8() EndIf EndFunc Func opony8() If _FFconnect() Then $karbon = 3 _FFXPath("//input[@type=radio' and @value='"&$karbon&"]","",9) _FFObj("xpath.checked=true") $karboon =0 _FFXPath("//input[@type=radio' and @value='"&$karboon&"]","",9) _FFObj("xpath.checked=true") $karb = 5 _FFXPath("//input[@type=radio' and @value='"&$karb&"]","",9) _FFObj("xpath.checked=true") _FFXPath("//input[@type=radio' and @value='"&1&"'[email protected]='setup_b]","",9) _FFObj("xpath.checked=true") _FFFormSubmit() _FFLoadWait() EndIf If _FFConnect() Then _FFAction("back") _FFLoadWait() _FFAction("back") _FFLoadWait() EndIf samochod_9() EndFunc ;samochod 9 func samochod_9() If _FFconnect() Then _FFXPath("//input[@type=radio' and @value='"&IniRead("ustawienia.ini", "Samochód", "Samochód 9", "")&"]","",9) _FFObj("xpath.checked=true") _FFXPath("//input[@type=radio' and @value='"&IniRead("ustawienia.ini", "Mechanik", "Mechanik 9", "")&"]","",9) _FFObj("xpath.checked=true") _FFXPath("//input[@type=radio' and @value='"&IniRead("ustawienia.ini", "Kierowca", "Kierowca 9", "")&"]","",9) _FFObj("xpath.checked=true") _FFFormSubmit() _FFLoadWait() opony9() EndIf EndFunc Func opony9() If _FFconnect() Then $karbon = 3 _FFXPath("//input[@type=radio' and @value='"&$karbon&"]","",9) _FFObj("xpath.checked=true") $karboon =0 _FFXPath("//input[@type=radio' and @value='"&$karboon&"]","",9) _FFObj("xpath.checked=true") $karb = 5 _FFXPath("//input[@type=radio' and @value='"&$karb&"]","",9) _FFObj("xpath.checked=true") _FFXPath("//input[@type=radio' and @value='"&1&"'[email protected]='setup_b]","",9) _FFObj("xpath.checked=true") _FFFormSubmit() _FFLoadWait() EndIf If _FFConnect() Then _FFAction("back") _FFLoadWait() _FFAction("back") _FFLoadWait() EndIf samochod_10() EndFunc ;samochod 10 Func samochod_10() If _FFconnect() Then _FFXPath("//input[@type=radio' and @value='"&IniRead("ustawienia.ini", "Samochód", "Samochód 10", "")&"]","",9) _FFObj("xpath.checked=true") _FFXPath("//input[@type=radio' and @value='"&IniRead("ustawienia.ini", "Mechanik", "Mechanik 10", "")&"]","",9) _FFObj("xpath.checked=true") _FFXPath("//input[@type=radio' and @value='"&IniRead("ustawienia.ini", "Kierowca", "Kierowca 10", "")&"]","",9) _FFObj("xpath.checked=true") _FFFormSubmit() _FFLoadWait() opony10() EndIf EndFunc Func opony10() If _FFconnect() Then $karbon = 3 _FFXPath("//input[@type=radio' and @value='"&$karbon&"]","",9) _FFObj("xpath.checked=true") $karboon =0 _FFXPath("//input[@type=radio' and @value='"&$karboon&"]","",9) _FFObj("xpath.checked=true") $karb = 5 _FFXPath("//input[@type=radio' and @value='"&$karb&"]","",9) _FFObj("xpath.checked=true") $kar =2 _FFXPath("//input[@type=radio' and @value='"&1&"'[email protected]='setup_b]","",9) _FFObj("xpath.checked=true") _FFFormSubmit() _FFLoadWait() EndIf If _FFConnect() Then _FFAction("back") _FFLoadWait() _FFAction("back") _FFLoadWait() EndIf samochod_11() EndFunc ;samochod 11 func samochod_11() If _FFconnect() Then _FFXPath("//input[@type=radio' and @value='"&IniRead("ustawienia.ini", "Samochód", "Samochód 11", "")&"]","",9) _FFObj("xpath.checked=true") _FFXPath("//input[@type=radio' and @value='"&IniRead("ustawienia.ini", "Mechanik", "Mechanik 1", "")&"]","",9) _FFObj("xpath.checked=true") _FFXPath("//input[@type=radio' and @value='"&IniRead("ustawienia.ini", "Kierowca", "Kierowca 11", "")&"]","",9) _FFObj("xpath.checked=true") _FFFormSubmit() _FFLoadWait() opony11() EndIf EndFunc Func opony11() If _FFconnect() Then $karbon = 3 _FFXPath("//input[@type=radio' and @value='"&$karbon&"]","",9) _FFObj("xpath.checked=true") $karboon =0 _FFXPath("//input[@type=radio' and @value='"&$karboon&"]","",9) _FFObj("xpath.checked=true") $karb = 5 _FFXPath("//input[@type=radio' and @value='"&$karb&"]","",9) _FFObj("xpath.checked=true") _FFXPath("//input[@type=radio' and @value='"&1&"'[email protected]='setup_b]","",9) _FFObj("xpath.checked=true") _FFFormSubmit() _FFLoadWait() EndIf If _FFConnect() Then _FFAction("back") _FFLoadWait() _FFAction("back") _FFLoadWait() EndIf samochod_12() EndFunc ;samochod 12 func samochod_12() If _FFconnect() Then _FFXPath("//input[@type=radio' and @value='"&IniRead("ustawienia.ini", "Samochód", "Samochód 12", "")&"]","",9) _FFObj("xpath.checked=true") _FFXPath("//input[@type=radio' and @value='"&IniRead("ustawienia.ini", "Mechanik", "Mechanik 12", "")&"]","",9) _FFObj("xpath.checked=true") _FFXPath("//input[@type=radio' and @value='"&IniRead("ustawienia.ini", "Kierowca", "Kierowca 12", "")&"]","",9) _FFObj("xpath.checked=true") _FFFormSubmit() _FFLoadWait() opony12() EndIf EndFunc Func opony12() If _FFconnect() Then $karbon = 3 _FFXPath("//input[@type=radio' and @value='"&$karbon&"]","",9) _FFObj("xpath.checked=true") $karboon =0 _FFXPath("//input[@type=radio' and @value='"&$karboon&"]","",9) _FFObj("xpath.checked=true") $karb = 5 _FFXPath("//input[@type=radio' and @value='"&$karb&"]","",9) _FFObj("xpath.checked=true") _FFXPath("//input[@type=radio' and @value='"&1&"'[email protected]='setup_b]","",9) _FFObj("xpath.checked=true") _FFFormSubmit() _FFLoadWait() EndIf If _FFConnect() Then _FFAction("back") _FFLoadWait() _FFAction("back") _FFLoadWait() EndIf samochod_13() EndFunc ;samochod 13 func samochod_13() If _FFconnect() Then _FFXPath("//input[@type=radio' and @value='"&IniRead("ustawienia.ini", "Samochód", "Samochód 13", "")&"]","",9) _FFObj("xpath.checked=true") _FFXPath("//input[@type=radio' and @value='"&IniRead("ustawienia.ini", "Mechanik", "Mechanik 13", "")&"]","",9) _FFObj("xpath.checked=true") _FFXPath("//input[@type=radio' and @value='"&IniRead("ustawienia.ini", "Kierowca", "Kierowca 13", "")&"]","",9) _FFObj("xpath.checked=true") _FFFormSubmit() _FFLoadWait() opony13() EndIf EndFunc Func opony13() If _FFconnect() Then $karbon = 3 _FFXPath("//input[@type=radio' and @value='"&$karbon&"]","",9) _FFObj("xpath.checked=true") $karboon =0 _FFXPath("//input[@type=radio' and @value='"&$karboon&"]","",9) _FFObj("xpath.checked=true") $karb = 5 _FFXPath("//input[@type=radio' and @value='"&$karb&"]","",9) _FFObj("xpath.checked=true") $kar =2 _FFXPath("//input[@type=radio' and @value='"&1&"'[email protected]='setup_b]","",9) _FFObj("xpath.checked=true") _FFFormSubmit() _FFLoadWait() EndIf If _FFConnect() Then _FFAction("back") _FFLoadWait() _FFAction("back") _FFLoadWait() EndIf samochod_14() EndFunc ;samochod 14 func samochod_14() If _FFconnect() Then _FFXPath("//input[@type=radio' and @value='"&IniRead("ustawienia.ini", "Samochód", "Samochód 14", "")&"]","",9) _FFObj("xpath.checked=true") _FFXPath("//input[@type=radio' and @value='"&IniRead("ustawienia.ini", "Mechanik", "Mechanik 14", "")&"]","",9) _FFObj("xpath.checked=true") _FFXPath("//input[@type=radio' and @value='"&IniRead("ustawienia.ini", "Kierowca", "Kierowca 14", "")&"]","",9) _FFObj("xpath.checked=true") _FFFormSubmit() _FFLoadWait() opony14() EndIf EndFunc Func opony14() If _FFconnect() Then $karbon = 3 _FFXPath("//input[@type=radio' and @value='"&$karbon&"]","",9) _FFObj("xpath.checked=true") $karboon =0 _FFXPath("//input[@type=radio' and @value='"&$karboon&"]","",9) _FFObj("xpath.checked=true") $karb = 5 _FFXPath("//input[@type=radio' and @value='"&$karb&"]","",9) _FFObj("xpath.checked=true") _FFXPath("//input[@type=radio' and @value='"&1&"'[email protected]='setup_b]","",9) _FFObj("xpath.checked=true") _FFFormSubmit() _FFLoadWait() EndIf If _FFConnect() Then _FFAction("back") _FFLoadWait() _FFAction("back") _FFLoadWait() EndIf samochod_15() EndFunc ;samochod 15 func samochod_15() If _FFconnect() Then _FFXPath("//input[@type=radio' and @value='"&IniRead("ustawienia.ini", "Samochód", "Samochód 15", "")&"]","",9) _FFObj("xpath.checked=true") _FFXPath("//input[@type=radio' and @value='"&IniRead("ustawienia.ini", "Mechanik", "Mechanik 15", "")&"]","",9) _FFObj("xpath.checked=true") _FFXPath("//input[@type=radio' and @value='"&IniRead("ustawienia.ini", "Kierowca", "Kierowca 15", "")&"]","",9) _FFObj("xpath.checked=true") _FFFormSubmit() _FFLoadWait() opony15() EndIf EndFunc Func opony15() If _FFconnect() Then $karbon = 3 _FFXPath("//input[@type=radio' and @value='"&$karbon&"]","",9) _FFObj("xpath.checked=true") $karboon =0 _FFXPath("//input[@type=radio' and @value='"&$karboon&"]","",9) _FFObj("xpath.checked=true") $karb = 5 _FFXPath("//input[@type=radio' and @value='"&$karb&"]","",9) _FFObj("xpath.checked=true") _FFXPath("//input[@type=radio' and @value='"&1&"'[email protected]='setup_b]","",9) _FFObj("xpath.checked=true") _FFFormSubmit() _FFLoadWait() EndIf If _FFConnect() Then _FFAction("back") _FFLoadWait() _FFAction("back") _FFLoadWait() EndIf samochod_16() EndFunc ;samochod 16 Func samochod_16() If _FFconnect() Then _FFXPath("//input[@type=radio' and @value='"&IniRead("ustawienia.ini", "Samochód", "Samochód 16", "")&"]","",9) _FFObj("xpath.checked=true") _FFXPath("//input[@type=radio' and @value='"&IniRead("ustawienia.ini", "Mechanik", "Mechanik 16", "")&"]","",9) _FFObj("xpath.checked=true") _FFXPath("//input[@type=radio' and @value='"&IniRead("ustawienia.ini", "Kierowca", "Kierowca 16", "")&"]","",9) _FFObj("xpath.checked=true") _FFFormSubmit() _FFLoadWait() opony16() EndIf EndFunc Func opony16() If _FFconnect() Then $karbon = 3 _FFXPath("//input[@type=radio' and @value='"&$karbon&"]","",9) _FFObj("xpath.checked=true") $karboon =0 _FFXPath("//input[@type=radio' and @value='"&$karboon&"]","",9) _FFObj("xpath.checked=true") $karb = 5 _FFXPath("//input[@type=radio' and @value='"&$karb&"]","",9) _FFObj("xpath.checked=true") $kar =2 _FFXPath("//input[@type=radio' and @value='"&1&"'[email protected]='setup_b]","",9) _FFObj("xpath.checked=true") _FFFormSubmit() _FFLoadWait() EndIf If _FFConnect() Then _FFAction("back") _FFLoadWait() _FFAction("back") _FFLoadWait() EndIf samochod_8() EndFunc ;samochod 17 func samochod_17() If _FFconnect() Then _FFXPath("//input[@type=radio' and @value='"&IniRead("ustawienia.ini", "Samochód", "Samochód 17", "")&"]","",9) _FFObj("xpath.checked=true") _FFXPath("//input[@type=radio' and @value='"&IniRead("ustawienia.ini", "Mechanik", "Mechanik 17", "")&"]","",9) _FFObj("xpath.checked=true") _FFXPath("//input[@type=radio' and @value='"&IniRead("ustawienia.ini", "Kierowca", "Kierowca 17", "")&"]","",9) _FFObj("xpath.checked=true") _FFFormSubmit() _FFLoadWait() opony17() EndIf EndFunc Func opony17() If _FFconnect() Then $karbon = 3 _FFXPath("//input[@type=radio' and @value='"&$karbon&"]","",9) _FFObj("xpath.checked=true") $karboon =0 _FFXPath("//input[@type=radio' and @value='"&$karboon&"]","",9) _FFObj("xpath.checked=true") $karb = 5 _FFXPath("//input[@type=radio' and @value='"&$karb&"]","",9) _FFObj("xpath.checked=true") _FFXPath("//input[@type=radio' and @value='"&1&"'[email protected]='setup_b]","",9) _FFObj("xpath.checked=true") _FFFormSubmit() _FFLoadWait() EndIf If _FFConnect() Then _FFAction("back") _FFLoadWait() _FFAction("back") _FFLoadWait() EndIf samochod_18() EndFunc ;samochod 18 func samochod_18() If _FFconnect() Then _FFXPath("//input[@type=radio' and @value='"&IniRead("ustawienia.ini", "Samochód", "Samochód 18", "")&"]","",9) _FFObj("xpath.checked=true") _FFXPath("//input[@type=radio' and @value='"&IniRead("ustawienia.ini", "Mechanik", "Mechanik 18", "")&"]","",9) _FFObj("xpath.checked=true") _FFXPath("//input[@type=radio' and @value='"&IniRead("ustawienia.ini", "Kierowca", "Kierowca 18", "")&"]","",9) _FFObj("xpath.checked=true") _FFFormSubmit() _FFLoadWait() opony18() EndIf EndFunc Func opony18() If _FFconnect() Then $karbon = 3 _FFXPath("//input[@type=radio' and @value='"&$karbon&"]","",9) _FFObj("xpath.checked=true") $karboon =0 _FFXPath("//input[@type=radio' and @value='"&$karboon&"]","",9) _FFObj("xpath.checked=true") $karb = 5 _FFXPath("//input[@type=radio' and @value='"&$karb&"]","",9) _FFObj("xpath.checked=true") _FFXPath("//input[@type=radio' and @value='"&1&"'[email protected]='setup_b]","",9) _FFObj("xpath.checked=true") _FFFormSubmit() _FFLoadWait() EndIf If _FFConnect() Then _FFAction("back") _FFLoadWait() _FFAction("back") _FFLoadWait() EndIf EndFunc Program niby działa ale w pewnym momencie(bardzo szybko) pojawia sie takie coś dlatego próbuje w ie.au3 próbuje otrzymać adress url i go zmienić w ie.au3 wiem już jak klikać w inputy typu radio(zarówno w ff.au3 jak i ie.au3) ale nie wiem jak dalej klikać kiedy załaduje sie str. w ie.au3 jakiej mam użyć funkcji żeby zadziałało?? mógłbyś mi wytłumaczyć jak i w którym msc wstawić $oIE.document.location.href mi jedynie udaje się wyciągnąć url ze strony którą ie uruchamia:( czyli http://www.pl.rumblerace.org/index.php?anmelden=1" a chce odczytać http://pl.rumblerace.org/main.php4?page=home&USR=goscc&pf6be2=3e351819cc0369f8ab03c7f1b9deed8b gdyż końcówka url czyli '&pf6be2=3e351819cc0369f8ab03c7f1b9deed8b' ciągle sie zmienia:( Edytowane 11 Sierpnia 2011 przez karboon Odnośnik do komentarza Udostępnij na innych stronach Więcej opcji udostępniania...
4ggr35510n Opublikowano 10 Sierpnia 2011 Udostępnij Opublikowano 10 Sierpnia 2011 Nie do czego w ogóle potrzebujesz wyłuskiwać ten adres...? PS Chyba upadłeś, jeśli myślałeś, że przeglądałbym skrypty które wkleiłeś. Ta sygnatura jest pusta. Odnośnik do komentarza Udostępnij na innych stronach Więcej opcji udostępniania...
Rekomendowane odpowiedzi