Skocz do zawartości
  • 👋 Witaj na MPCForum!

    Przeglądasz forum jako gość, co oznacza, że wiele świetnych funkcji jest jeszcze przed Tobą! 😎

    • Pełny dostęp do działów i ukrytych treści
    • Możliwość pisania i odpowiadania w tematach
    • System prywatnych wiadomości
    • Zbieranie reputacji i rozwijanie swojego profilu
    • Członkostwo w jednej z największych społeczności graczy

    👉 Dołączenie zajmie Ci mniej niż minutę – a zyskasz znacznie więcej!

    Zarejestruj się teraz

Błąd w kodzie.


Rekomendowane odpowiedzi

Opublikowano

Witam. Chce zrobić żeby klikało mi na input o ID: "l-login" i wpisywało "123"
Ale coś mi nie trybi i nie wiem co..;/
To jest kawałek kodu.

 

 

#include <IE.au3>
#include <ButtonConstants.au3>
#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>
#Region ### START Koda GUI section ### Form=

$Button3 = GUICtrlCreateButton("Stop !", 964, 800, 145, 33)

$oIE = _IECreateEmbedded ()
$przegladarka = GUICtrlCreateObj($oIE, 25, 5, 1100, 700)
$login = GUICtrlRead($login_input)
$haslo_input = GUICtrlRead($haslo_input)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###
_IENavigate ($oIE, "lets-fish.com", 1)



While 1
    $nMsg = GUIGetMsg()
    Switch $nMsg
        Case $GUI_EVENT_CLOSE
            Exit
        ;Case $Button1
            start()
        ;Case $Button2
            End()
        Case $Button3
            Login()


    EndSwitch
WEnd

Func Login()
    $login = _IEGetObjById($oIE, "l-login")
    _IEAction($login, "click")
    Send("123")
EndFunc
 

 

Chce żeby te kliknięcie i wpisanie było pod funkcją login.
Z góry dzięki. :)

Kocham mpcforum.pl!!!

18706.png

Opublikowano
$login = GUICtrlRead($login_input)

$haslo_input = GUICtrlRead($haslo_input)


Jak możesz uzyć zmiennej której wcześniej nie zadeklarowałeś :_: ?


Albo dajesz ją do

Global $login_input albo zmieniasz kod.

OndteAw.png
Opublikowano

Przerob sobie z tego:

$oIE = _IECreate("http://www.jakasstrona.com/login.php")
$forma = _IEFormGetObjByName($oIE, "form-register_2")
$login = _IEGetObjByName($oIE, "email")
$haslo = _IEGetObjByName($oIE, "password")
_IEFormElementSetValue($login, "moj_login")
_IEFormElementSetValue($haslo, "moje_haslo")
_IEFormSubmit($forma)


Opublikowano

@Up. Wciąż nie chce działać.;/

 

Global $mp ,$gar, $dp, $var ,$ap, $Paused, $login_input, $haslo_input, $login, $haslo
#include <IE.au3>
#include <ButtonConstants.au3>
#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>
#Region ### START Koda GUI section ### Form=
$Form1 = GUICreate("Let's Fish Bot", 1151, 851, 59, 40)
$login_input = GUICtrlCreateInput("Login:", 16, 760, 153, 21)
$haslo_input = GUICtrlCreateInput("Hasło:", 16, 808, 153, 21)
$Button3 = GUICtrlCreateButton("Stop !", 964, 800, 145, 33)

$oIE = _IECreateEmbedded ()
$przegladarka = GUICtrlCreateObj($oIE, 25, 5, 1100, 700)
_IENavigate ($oIE, "lets-fish.com", 1)
$login = _IEGetObjByName($oIE, "l-login")
$haslo = _IEGetObjByName($oIE, "l-password")
_IENavigate ($oIE, "lets-fish.com", 1)


#EndRegion ### END Koda GUI section ###
GUISetState(@SW_SHOW)


While 1
	$nMsg = GUIGetMsg()
	Switch $nMsg
		Case $GUI_EVENT_CLOSE
			Exit
	
		Case $Button3
			Login()


	EndSwitch
WEnd

Func Login()
	_IEFormElementSetValue($login, "moj_login")
	_IEFormElementSetValue($haslo, "moje_hasło")
	EndFunc

 

Co jest nie tak. ? <_<

Kocham mpcforum.pl!!!

18706.png

Opublikowano

_IENavigate ($oIE, "lets-fish.com", 1)
$login = _IEGetObjByName($oIE, "l-login")
$haslo = _IEGetObjByName($oIE, "l-password")
=>_IENavigate ($oIE, "lets-fish.com", 1)
Dwa razy _IENavigate?

 

Możesz jeszcze ustawić $login i $haslo na Global var, choć ja bym te oba wierze dał w funkcję Login().

WSZYSTKIE PLIKI W CHMURZE DLA MPCFORUM ZOSTAŁY USUNIĘTE. NIE KORZYSTAĆ Z MOICH PROGRAMÓW.

Proszę nie ingerować w moje posty/tematy, w razie potrzeby usunąć całą zawartość. Nie pomagam.

Zarchiwizowany

Ten temat przebywa obecnie w archiwum. Dodawanie nowych odpowiedzi zostało zablokowane.

×
×
  • Dodaj nową pozycję...