Что нового

[Автоматизация] Смена авторизации с mail.ru на newsland.com в рабочем скрипте

Alex300

Новичок
Сообщения
17
Репутация
1
Привет всем, кто открыл тему!

Ранее спецом с форума был написан скрипт, сейчас возникла необходимость внести изменения - сменить авторизацию с mail.ru на newsland.com, но спец никак не отзывается. Самому не удается.

Логин и пароль для авторизации на mail.ru подтягиваются из ini файла, который содержит связки "логин"-"пароль", они будут заменены на связки "мыло полностью"-"пароль" входа на newsland.com.


Может быть кто-то сможет помочь?
Подозреваю, что для спеца там дел на 15 минут, а я как рыбо об лед :(

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

С уважением, Alex
 

inververs

AutoIT Гуру
Сообщения
2,135
Репутация
465
Привет, вот решение ;D
Код:
#include <IE.au3>
Global $sNewsLandLogin = "[email protected]"
Global $sNewsLandPass = "somewrongpass"

$oIE = _IECreate('http://newsland.com/user/login/',1)
If @error Then Exit 99
$oInputLogin = _IEGetObjByName($oIE,'login_or_email')
$oInputPass = _IEGetObjByName($oIE,'password')
If Not (IsObj($oInputLogin) Or IsObj($oInputPass)) Then
	ConsoleWrite('! Нет полей для ввода' & @LF)
	Exit 98
EndIf
$oInputLogin.value = $sNewsLandLogin
$oInputPass.value = $sNewsLandPass

;1 Cпособ нажать на войти
;~ $oIE.document.parentwindow.execScript("xajax_userLogin(xajax.getFormValues('user_login_form'))")

;2 Cпособ
$oEnter = _IEGetObjByName($oIE,'Войти')
If Not IsObj($oEnter) Then
	ConsoleWrite("! Не найдено Войти" & @LF)
	Exit 97
EndIf
_IEAction($oEnter,'click')
 
Автор
A

Alex300

Новичок
Сообщения
17
Репутация
1
Написал в личку, тут дублирую.

Может быть вышлю исходный скрипт на мыло?
Там структура скрипта в принципе понятна.
 
Верх