Авторизация на сайтах

oesoes · 12 Сен 2014

madmasles сказал(а):
oesoes [?]

_IEFormGetObjByName()

Нажмите, чтобы раскрыть...

Эта функция возвращает дочерние объекты формы по имени, Вы путаете ее с _IEGetObjByName().

Тогда я нифика не пойму, простите зу тупость :stars: Читаю в справке:

"Returns an object reference to a Form by name" - Возвращает объектную ссылку на форму по имени. И следом пример:

Код:

Local $oIE = _IECreate("http://www.google.com")
Local $oForm = _IEFormGetObjByName($oIE, "gbqf")
Local $oQuery = _IEFormElementGetObjByName($oForm, "q")
_IEFormElementSetValue($oQuery, "AutoIt IE.au3")
_IEFormSubmit($oForm)

Сначала чувак получает контекст IE в $oIE, потом ссылку на форму одноименной функцией в переменную с именем $oForm (не даром бы он ее так назвал...). А про то, что Вы говорите идет следом - _IEFormElementGetObjByName (получает элемент управления формы)
Добавлено:
Сообщение автоматически объединено: 12 Сен 2014

В справке к _IEGetObjByName() вычитал в примере, что с формами работает идентично, что и _IEFormGetObjByName() - https://www.autoitscript.com/autoit3/docs/libfunctions/_IEGetObjByName.htm
Добавлено:
Сообщение автоматически объединено: 12 Сен 2014

madmasles [?]

Эта функция возвращает дочерние объекты формы по имени

как раз таки _IEFormElementGetObjByName()

madmasles · 12 Сен 2014

oesoes,
Я был не прав, перепутал _IEFormElementGetObjByName() с _IEFormGetObjByName(), извините. :-[

fortages · 12 Сен 2014

oesoes сказал(а):
нужно получить форму с id = "login" функцией $oForm=_IEFormGetObjByName($oIE,'login')
заполнить ее и отправить функцией _IEFormSubmit($oForm).

Есть такая строчка в коде. Id формы, вроде бы, получила. Поля логин/пароль заполняются.
Но если сразу после строчек

Код:

_IEFormElementSetValue($oLogin, $sLogin)
_IEFormElementSetValue($oPass, $sPass)

дописать _IEFormSubmit($oForm), то происходит следующее:
открывается страница, заполняются поля, но после этого она обновляется и открывается уже с пустыми полями логин/пароль

_IEFormSubmit($oForm) пробовала, описала реакцию выше.
_IELinkClickByText($oIE, "Вход") - аналогично, куда-то нажимает и возвращает форму с незаполненными полями
_IENavigate($oIE, "http://site.org/ucp.php?mode=login") то же самое

Уже думаю, а не нажимает ли оно на верхнюю ссылку "Вход", которая расположена над формой? Тогда понятно, почему после выполнения идет пустая форма...

Если смотреть поиском, то

Код:

<a href="./ucp.php?mode=login">Вход</a>  &bull;  <a href="./ucp.php?mode=register">Регистрация</a></h3>
		<fieldset class="quick-login">
			<label for="username">Имя пользователя:</label> <input type="text" name="username" id="username" size="10" class="inputbox" title="Имя пользователя" />  
			<label for="password">Пароль:</label> <input type="password" name="password" id="password" size="10" class="inputbox" title="Пароль" />
			
				| <label for="autologin">Автоматически входить при каждом посещении <input type="checkbox" name="autologin" id="autologin" /></label>
			
			<input type="submit" name="login" value="Вход" class="button2" />
			<input type="hidden" name="redirect" value="./index.php?" />

Кнопка находится под чекбоксом "Входить автоматически", а значит информация про кнопку - две последние строчки, правильно?

Код:

<input type="submit" name="login" value="Вход" class="button2" />
<input type="hidden" name="redirect" value="./index.php?" />

Ведь надо, чтоб совпали type="submit" + name="login" + value="Вход"?
После добавления вот этого куска кода

Код:

$oInputs = _IETagNameGetCollection ($oForm, 'input')
For $oInput In $oInputs
    If $oInput.type = 'submit' And $oInput.value = 'Вход' Then
        _IEAction($oInput, 'click')
        _IELoadWait($oIE)
        ExitLoop
    EndIf
Next

Вход получился)))
Осталось выйти теперь)

Смотрю исходный код страницы

Код:

               <li class="icon-logout"><a href="./ucp.php?mode=logout&amp;sid=a2d1e2df64b523905351617319c6bc0e" title="Выход [ fortages ]" accesskey="x">Выход [ fortages ]</a></li>

Вот этот sid=a2d1e2df64b523905351617319c6bc0e для каждого пользователя будет меняться ведь.
Зато есть ссылка ./ucp.php?mode=logout, если сделать на нее _IENavigate($oIE, "http://site.org/ucp.php?mode=logout"), то получается ошибка

Информация
Вы не вышли из форума, так как запрос не соответствовал параметрам Вашей сессии. Если проблема повторится, свяжитесь с администратором форума.
Вернуться на главную страницу

Сейчас сижу думаю, как выйти...

Используйте для AutoIt кода тег [autoit]

madmasles.

oesoes · 12 Сен 2014

fortages [?]

Сейчас сижу думаю, как выйти...

Я бы попробовал семулировать клик по этой ссылке, тогда и за sid не надо будет каждый раз следить.

Код:

_IELinkClickByText ($oIE, "Выход [")

так же там присутствует атрибут accesskey="x", это значит, что при нажатии на Alt+x на клавиатуре будет происходить выход. Попробуйте. :scratch:

fortages · 13 Сен 2014

Все решилось добавлением такого куска

Код:

$sMyString = "Выход"
$oLinks = _IELinkGetCollection($oIE)
For $oLink In $oLinks
    $sLinkText = _IEPropertyGet($oLink, "innerText")
    If StringInStr($sLinkText, $sMyString) Then
        _IEAction($oLink, "click")
        ExitLoop
    EndIf
Next

:IL_AutoIt_1:
А вот accesskey не хотят в упор работать, уже со всех браузеров пыталась.

Все работает, все отлично, спасибо :smile:

А если можно, подскажите, можно ли как-то выбирать значение $sLogin и $sPass из файла?
Просто сейчас получается так, что у меня

кусок кода
;
;
;
кусок кода
;
;
;

И прямо в коде указаны разные логины/пароли. Неудобно. Открывает для каждого нового логина окно. :stars:

madmasles · 13 Сен 2014

fortages [?]

выбирать значение $sLogin и $sPass из файла?

Предупреждение За нарушение общих правил (пункт В.4):

Не лепите несколько вопросов разной тематики в один пост. По типу "Ребят, а ещё такой вопрос...". Каждый вопрос в свою тему.

С уважением, ваш Глобальный модератор.

fortages · 14 Сен 2014

Всем огромнейшее спасибо за помощь и ответы! Очень сильно помогли :dance2: :dance1: :IL_AutoIt_1:

Вдруг кому понадобится, конечная версия кода была такая:

Код:

#include <IE.au3>

$sLogin = 'myname'
$sPass = 'mypass'
$sUrl = 'http://mysite.org/ucp.php?mode=login'

$oIE = _IECreate($sUrl)
$oForm   = _IEFormGetObjByName($oIE,"login") 
$oLogin = _IEGetObjById($oIE, 'username')
$oPass = _IEGetObjByName($oIE, 'password')
$oButton = _IEGetObjById($oIE, 'login')

_IEFormElementSetValue($oLogin, $sLogin)
_IEFormElementSetValue($oPass, $sPass)


$oInputs = _IETagNameGetCollection ($oForm, 'input')
For $oInput In $oInputs
    If $oInput.type = 'submit' And $oInput.value = 'Вход' Then
        _IEAction($oInput, 'click')
        _IELoadWait($oIE)
        ExitLoop
    EndIf
Next


$sMyString = "Выход"
$oLinks = _IELinkGetCollection($oIE)
For $oLink In $oLinks
    $sLinkText = _IEPropertyGet($oLink, "innerText")
    If StringInStr($sLinkText, $sMyString) Then
        _IEAction($oLink, "click")
        ExitLoop
    EndIf
Next
;
;

Форум на phpbb. :beer:

oesoes · 14 Сен 2014

IMHO, если бы Вы с самого начала сказали бы адрес форума, то получили бы ответ (нужную информацию) гораздо раньше.

inververs · 14 Сен 2014

oesoes [?]

IMHO, если бы Вы с самого начала сказали бы адрес форума, то получили бы ответ нужную информацию гораздо раньше.

Это точно.
И еще, тем, кто делает что то похожее, не используйте этот код.

fortages · 16 Сен 2014

Ребята, я понимаю, что вопрос очень глупый... Но справиться не могу. Помогите, пожалуйста, если можно. :'(
Признаю свою ошибку, адрес форума надо было указать сразу: http://chloe.unoforum.ru
Логин fortages
Пароль qwerty
Там все

Код:

type="text/javascript"

и как нажать на кнопку (ссылку?) "Вход-Регистрация" не знаю. При наведении на нее мышкой показывает

и как быть в таком случае - не нашла информацию... Подскажите,пожалуйста. :'(

Garrett · 16 Сен 2014

fortages

Код:

#include<IE.au3>
$oIE = _IECreate('http://chloe.unoforum.ru/')
_IELinkClickByText($oIE, 'Вход-регистрация')

fortages · 16 Сен 2014

Garrett огромное спасибо! Как просто все оказалось... А я в исходном коде страницы поиском искала "вход". Позорище)

А как заполнить поля логин/пароль?

Тот же поиск по исходному коду по слову "form" выдает что-то невнятное.
Начала искать в гугле... Это не тот случай, когда у формы нет имени?

oesoes · 16 Сен 2014

У формы может и не быть имени, но может быть ID. Если нет ID, то индекс есть всегда.

fortages · 17 Сен 2014

oesoes сказал(а):
индекс есть всегда.

Нашла в гугле функцию _IETagNameAllGetCollection, которая элемент возвращает по индексу.
После выполнения вот этого кода:

Код:

$oElements = _IETagNameAllGetCollection($oIE)
For $oElement In $oElements
    If $oElement.id Then MsgBox($MB_SYSTEMMODAL, "Element Info", "Tagname: " & $oElement.tagname & @CRLF & "id: " & $oElement.id & @CRLF & "innerText: " & $oElement.innerText)
Next

появляется такое сообщение:

Это ведь как раз то, что нужно, правильно?
Ведь если так посмотреть на странице

поля логин/пароль они в "таблице" (рамочке?), а это tagname: table.
id: tabhid - это же то слово, которое в углу экрана было при наведении мышкой на "вход-регистрация".

А дальше я не понимаю... Есть _IETagnameGetCollection и есть _IETableGetCollection , но вот как это все собрать в кучу...
По ID эта форма (таблица?) с логином/паролем тоже не находится.

oesoes · 17 Сен 2014

Код:

#include <IE.au3>

$oIE = _IECreate('http://chloe.unoforum.ru/')
_IELoadWait($oIE)
_IELinkClickByText($oIE, 'Вход-регистрация')

$Form = _IEFormGetCollection($oIE,1) ; 1 - индекс формы

if IsObj($Form) Then
  $fNick = _IEFormElementGetObjByName($Form,'nick')
  $fPass = _IEFormElementGetObjByName($Form,'pass')

  _IEFormElementSetValue($fNick,'fortages')
  _IEFormElementSetValue($fPass,'qwerty')
  
  ;_IEFormElementCheckBoxSelect($Form,'','newreg',1,'byIndex') ; отметим первый флажок если нужно
  ;_IEFormElementCheckBoxSelect($Form,'','zabilpass',1,'byIndex') ; или второй (раскомментить если нужно)

  _IEFormSubmit($Form)
EndIf

Ищи формы не через просмотр кода страницы, а через просмотр кода элемента. Так и правильнее и быстрее. Могут стоять скрипты, которые тебе всю страницу просто не отдадут.

fortages · 17 Сен 2014

oesoes , спасибо огромное!!! Вот это да))
Все работает)) Видимо, вникать мне в функции *GetObjByName и вникать еще...

oesoes сказал(а):
Ищи формы не через просмотр кода страницы, а через просмотр кода элемента

Спасибо, учту на будущее. :smile:

Кнопка "ОК" по GetObjByName не получается. Думаю мышкой нажимать. Уже и координаты вычислила функцией

Код:

$MousePos = MouseGetPos()
$MousePos[0] ; Mouse X position
$MousePos[1] ; Mouse Y position 
msgbox(0,"Debug","Cursor located at " & $MousePos[0] & "," & $MousePos[1])

OffTopic:
А само окошко IE можно сделать, чтоб открывалось полностью на весь экран, а не "свернутое"?

Кстати, выходить тоже отлично получается

Код:

_IELinkClickByText($oIE, 'Выход')

Огромнейшее спасибо. :IL_AutoIt_1: Это так круто, теперь не придется вручную все делать. Ура-а-а!! я вам так благодарна, народ!! Спасибо огромное

oesoes · 17 Сен 2014

Кнопка OK тебе тут и не нужна, все отлично работает с IEFormSubmit($Form)
Добавлено:
Сообщение автоматически объединено: 17 Сен 2014

fortages [?]

А само окошко IE можно сделать, чтоб открывалось полностью на весь экран, а не "свернутое"?

Да, посмотри на новый код. 4 и 5 строка.

Код:

#include <IE.au3>

$oIE = _IECreate('http://chloe.unoforum.ru/')
$hwnd = WinWaitActive('Форум - Internet Explorer')
WinSetState($hwnd,'',@SW_MAXIMIZE)
_IELoadWait($oIE)
_IELinkClickByText($oIE, 'Вход-регистрация')

$Form = _IEFormGetCollection($oIE,1) ; 1 - индекс формы

if IsObj($Form) Then
  $fNick = _IEFormElementGetObjByName($Form,'nick')
  $fPass = _IEFormElementGetObjByName($Form,'pass')

  _IEFormElementSetValue($fNick,'fortages')
  _IEFormElementSetValue($fPass,'qwerty')

  ;_IEFormElementCheckBoxSelect($Form,'','newreg',1,'byIndex') ; отметим первый флажок если нужно
  ;_IEFormElementCheckBoxSelect($Form,'','zabilpass',1,'byIndex') ; или второй (раскомментить если нужно)

  _IEFormSubmit($Form)
EndIf

fortages · 17 Сен 2014

oesoes

огромное человеческое спасибо! Благодарю)) Как же все на самом деле выходит просто и красиво... Спасибо еще раз, oesoes и всем отозвавшимся в теме :IL_AutoIt_1: Ребята, вы меня просто спасли!

Спасибо за ваш форум и за отзывчивость :beer:

at · 18 Окт 2014

Час Добрый Всем!
Не получается ввести пароль в форму входа в личный кабинет на сайте Yota. Прошу подсказать, что не верно в скрипте.

Код:

#include <IE.au3>

$sLogin = 'Логин'
$sPass = 'Пароль'
$sUrl = 'https://my.yota.ru/selfcare/login'

$oIE = _IECreate($sUrl)
Sleep (3000)
If @error Then Exit 13
For $i = 1 To 1
    $oForm = _IEGetObjById($oIE, 'customerLoginForm')
    If @error Then MsgBox(0,'','Форма не найдена')
    $oEmail = _IEFormElementGetObjByName($oForm, 'IDToken1')
    If @error Then MsgBox(0,'','ID не найден')
    $oPass = _IEFormElementGetObjByName($oForm, 'IDToken2')
    If @error Then MsgBox(0,'','Password не найден')
    _IEFormElementSetValue($oEmail, $sLogin)
    If @error Then MsgBox(0,'','Ошибка ввода Логина')
    _IEFormElementSetValue($oPass, $sPass)
    If @error Then MsgBox(0,'','Ошибка ввода Пароля')
    _IEFormSubmit($oForm)
    If @error Then MsgBox(0,'','Ошибка отправки данных')
Next
If @error Then
    _IEQuit($oIE)
    Exit 13
Else
    MsgBox(64, 'Info', 'OK')
EndIf

Garrett · 18 Окт 2014

at [?]

Не получается ввести пароль в форму

Код:

#include <IE.au3>

$sLogin = 'Логин'
$sPass = 'Пароль'
$sUrl = 'https://my.yota.ru/selfcare/login'

$oIE = _IECreate($sUrl)
$oForm = _IEGetObjById($oIE, 'customerLoginForm')
$oUserName = _IEFormElementGetObjByName($oForm, 'IDToken1')
$oUserPass = _IEFormElementGetObjByName($oForm, 'IDToken2')
$oUserPass = $oUserPass.nextSibling.nextSibling
$oL1 = _IETagNameGetCollection($oIE, 'label', 0)
$oL2 = _IETagNameGetCollection($oIE, 'label', 1)
$oL1.style.visibility = 'hidden'
$oL2.style.visibility = 'hidden'
_IEFormElementSetValue($oUserName, $sLogin)
_IEFormElementSetValue($oUserPass, $sPass)

Автор темы	Похожие темы	Форум	Ответы	Дата
N	Oauth2 google авторизация	Стол заказов	0	5 Апр 2022
Д	Авторизация на Aliexpress	Стол заказов	0	14 Фев 2019
B	Авторизация без по типу поля input	Автоматизация IE и Web-интерфейса	0	30 Янв 2019
G	[Сеть, интернет] Авторизация на сайте с капчей через WINHTTP	Общие вопросы по AutoIt	0	30 Янв 2018
S	Авторизация на нескольких сайтах	Общие вопросы по AutoIt	2	11 Апр 2011

Авторизация на сайтах

xor eax,eax

Модератор

Новичок

xor eax,eax

Новичок

Модератор

Новичок

xor eax,eax

AutoIT Гуру

Новичок

Модератор

Новичок

xor eax,eax

Новичок

xor eax,eax

Новичок

xor eax,eax

Новичок

at

Гость

Модератор