[problem]Bot do logowania.

[G0staf]

Siemka, stworzyłem mini botka do logowania na daną stronę.Wszystko ładnie lecz gdy wpiszę passy do botka(sprawdzałem sam na stronie wpisując i jest ok.) pokazje iż złe hasło lub login : )

oto on :

#Region
#AutoIt3Wrapper_Outfile_type=a3x
#AutoIt3Wrapper_Res_requestedExecutionLevel=asInvoker
#EndRegion
#include <ButtonConstants.au3>
#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>
#include <FF.au3>

GUICreate("FT Bot", 200, 90)
$login_input = GUICtrlCreateInput("", 5, 5, 100)
$haslo_input = GUICtrlCreateInput("", 5, 30, 100)
GUICtrlCreateLabel("Email", 108, 8)
GUICtrlCreateLabel("Hasło", 108, 32)
$loguj = GUICtrlCreateButton("Loguj", 140, 5, 55, 40)
GUISetState()

While 1
	$msg = GUIGetMsg()
	Switch $msg
			Case $GUI_EVENT_CLOSE
					Exit
			Case $loguj
					login()
	EndSwitch
WEnd

Func login()
	$login = GUICtrlRead($login_input)
	$haslo = GUICtrlRead($haslo_input)

	_FFStart("http://s7.footballteam.pl/index.php")
	$obiekt_login = _FFObjGet("login", "name")
	$obiekt_haslo = _FFObjGet("password", "name")

	_FFObj($obiekt_login, "value", $login)
	_FFObj($obiekt_haslo, "value", $haslo)

	_FFFormSubmit()
EndFunc

[M4niak]

A to nie będzie tak przypadkiem?

 

 

GUICreate("FT Bot", 200, 90)
$login_input = GUICtrlCreateInput("", 5, 5, 100)
$haslo_input = GUICtrlCreateInput("", 5, 30, 100)
GUICtrlCreateLabel("Email", 108, 8)
GUICtrlCreateLabel("Hasło", 108, 32)
$loguj = GUICtrlCreateButton("Loguj", 140, 5, 55, 40)
GUISetState()

While 1
		    $msg = GUIGetMsg()
		    Switch $msg
						    Case -3
										    Exit
						    Case $loguj
										    login()
		    EndSwitch
WEnd

Func login()
               _FFStart("http://s7.footballteam.pl/index.php")
		    $obiekt_login = _FFObjGet("email", "name")
		    $obiekt_haslo = _FFObjGet("pass", "name")

		    _FFObj($obiekt_login, "value", GUICtrlRead($login_input))
		    _FFObj($obiekt_haslo, "value", GUICtrlRead($haslo_input))

		    _FFFormSubmit()
EndFunc