[Сеть, интернет] Как залогиниться на сайте и перейти по ссылке

Mr. Anderson · 23 Ноя 2010

Как я понял залогиниться можно вот так, а как перейти по ссылке и получить содержимое страницы к которой залогинился?

r35p3ct сказал(а):

Код:

Func login()
$oIE     = _IECreate("http://xxx.ru/login.html", 0, 0)
$oForm   = _IEFormGetObjByName($oIE,"auth")
$ologin   = _IEFormElementGetObjByName($oForm,"login")
$opass   = _IEFormElementGetObjByName($oForm,"pass")

_IEFormElementSetValue($ologin,"Vasya")
_IEFormElementSetValue($opass,"12345")
_IEFormSubmit($oForm,1)
_IELoadWait ($oIE)
EndFunc

Garrett · 23 Ноя 2010

Mr. Anderson [?]

а как перейти по ссылке

Код:

_IELinkClickByIndex()
_IELinkClickByText()

получить содержимое страницы к которой залогинился

Если просто HTML код:

Код:

_IEDocReadHTML()

Mr. Anderson · 24 Ноя 2010

Спасибо, а что могут означать следующие ошибки SciTE?

[box title=Ошибки]--> IE.au3 V2.4-0 Warning from function _IEFormGetObjByName, $_IEStatus_NoMatch
--> IE.au3 V2.4-0 Error from function _IEFormElementGetObjByName, $_IEStatus_InvalidDataType
--> IE.au3 V2.4-0 Error from function _IEFormElementSetValue, $_IEStatus_InvalidDataType
--> IE.au3 V2.4-0 Error from function _IEFormSubmit, $_IEStatus_InvalidDataType[/box]

В таком коде:

Код:

$oIE = _IECreate("http://vkontakte.ru/", 0, 0)
$oForm = _IEFormGetObjByName($oIE,"login")
$ologin = _IEFormElementGetObjByName($oForm,'email')
$opass = _IEFormElementGetObjByName($oForm,'pass')
_IEFormElementSetValue($ologin,$pLogin)
_IEFormElementSetValue($opass,$pPass)
_IEFormSubmit($oForm,1)
_IELoadWait($oIE)
$hTMPF = FileOpen($navView, 2)
FileWrite($hTMPF, _IEDocReadHTML($oIE))
FileClose($hTMPF)

Garrett · 24 Ноя 2010

Mr. Anderson [?]

могут означать следующие ошибки

Для работы с сайтом необходима поддержка Javascript и Cookies.
Вас перенаправляют на адрес httр://vkontakte.ru/badbrowser.php, отсюда и ошибки.
Разрешите в настройках IE Javascript и Cookies.

P.S. Кстати при использование IE в скрытом режиме

Код:

$oIE = _IECreate("http:// ", 0, 0)

и возникновение ошибок подобного рода, следует позаботиться об удалении скрытых процессов iexplore.exe!

Код:

OnAutoItExitRegister( "_Exit" )

Func _Exit()
	Local $aIE = ProcessList("iexplore.exe")
	For $i = 1 to $aIE[0][0]
	ProcessClose($aIE[$i][1])
	Next
EndFunc

Иначе со временем, РС начнёт притормаживать ;)
Я рекомендую на момент теста скрипта не запускать IE в скрытом режиме!

Mr. Anderson · 27 Ноя 2010

А как увидеть содержимое фрейма вида:

Код:

<IFRAME id=app_container style="WIDTH: 800px; HEIGHT: 1203px" border=0 name="9609790f,http<#>//vkontakte.ru,default0,3,afef47f7c44468" src="http://vk-all.ordersgame.com/distributor.php?api_url=http://api.vk.............. frameBorder=0 width=800 scrolling=no height=730></IFRAME>

Это возможно командой:

Код:

_IEDocReadHTML()

Или надо что то еще???

И будут ли внутри этого фрейма работать:

Код:

_IELinkClickByIndex()
_IELinkClickByText()

Garrett · 27 Ноя 2010

Mr. Anderson [?]

А как увидеть содержимое фрейма вида

Код:

_IEFrameGetCollection()
_IEFrameGetObjByName()

И будут ли внутри этого фрейма работать

Нет
Добавлено:
Сообщение автоматически объединено: 27 Ноя 2010

Для обращения к iFrame, нужно сначала получить его src, потом загрузить его как отдельную страницу.

Mr. Anderson · 27 Ноя 2010

Код:

$oFrame = _IEFrameGetObjByName ($oIE, $tttz) ;$tttz - имя фрейма
MsgBox(0,'',$oFrame)

$bb = _IEBodyReadHTML ($oFrame)
MsgBox(0,'',$bb)

Код:

C:\Program Files\AutoIt3\Include\ie.au3 (1940) : ==> The requested action with this object has failed.:
Return SetError($_IEStatus_Success, 0, $o_object.document.body.innerHTML)
Return SetError($_IEStatus_Success, 0, $o_object.document^ ERROR

Что бы это могло значить? :blink:

Garrett · 27 Ноя 2010

Mr. Anderson [?]

Что бы это могло значить?

Это значить, что объект $oFrame сам по себе не содержит структуру документа, следовательно, функция _IEBodyReadHTML не может быть выполнена. Проще говоря, в iFrame документ (страница) загружается

Для применения функции _IEBodyReadHTML к документу, который загружен в iFrame:

Garrett [?]

нужно сначала получить его src, потом загрузить его как отдельную страницу.

Mr. Anderson · 27 Ноя 2010

Хорошо, спасибо, только не разберусь как запускать, имя фрейма:

Код:

name="1e9a4734,http<#>//vkontakte.ru,default0,3,09c3f0de26513"

Если загружать именно 1e9a4734,http<#>//vkontakte.ru,default0,3,09c3f0de26513, то получается типа страница не найдена, и ссылка превращается в http://1e9a4734,http%3C/
:-X

---
а может не по name, а по src надо переходить) счас попробую
В итоге появляется окно IE с сообщением об ошибке "Выполнено, но с ошибками на странице" и пустой документ, просмотр HTML кода показывает:

Код:

<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<html>
    <head>
        <script language="javascript" type="text/javascript">

            cfg_path_web = 'http://vk25.ordersgame.com';
            cfg_site_theme = 'default';
            cfg_ajax_get = '?api_url=http://api.vkontakte.ru/api.php';
            cfg_api_settings = 0;
            cfg_viewer_id = 0;
            cfg_is_app_user = 0;
            cfg_needed_settings = 7;

            resume_ajax = false;
        </script>
    </head>
<script src="http://vk-all.ordersgame.com/js/server.js?rnd=1290891202" type="text/javascript"></script>
<script src="http://vk-all.ordersgame.com/js/vk_api.js?rnd=1290891202" type="text/javascript"></script>
<script src="http://vkontakte.ru/js/api/xd_connection.js?rnd=1290891202" type="text/javascript"></script>

<script language="javascript" src="/js/jquery-1.4.2.min.js?rnd=1290891202" type="text/javascript"></script>


<body>

    
    <script type="text/javascript">
      VK.init(function() {
        checkProperInstall();
        addCallbacks();
      });
      if (checkProperInstall()){
          onRedirectMainPage(cfg_ajax_get, cfg_viewer_id);
      }
    </script>
    
<!--
    <img src="img/splash.jpg" alt="" onclick="checkProperInstall()" style="cursor: pointer;" /> -->
</body>
</html>

Наверное он не подгружает то что надо по ссылкам в ява скрипте? Это можно исправить?

Garrett · 28 Ноя 2010

Mr. Anderson
Попробуйте так:

Код:

#include <IE.au3>
$sFrameName = "имя фрейма"
$oIE = _IECreate("http://vkontakte.ru")

ConsoleWrite(_IEFrameGetContent($oIE, $sFrameName) & @CRLF)

Func _IEFrameGetContent($o_Obj, $s_Name)
	$o_iFrame = _IEGetObjByName($o_Obj, $s_Name)
	If @error Then 
		ConsoleWrite("Error: _IEGetObjByName -> " & @error)
		Exit
	EndIf
	$s_Content = $o_iFrame.contentWindow.document.body.innerHTML
	Return $s_Content
EndFunc

Mr. Anderson · 28 Ноя 2010

Из консоли:

Код:

--> IE.au3 V2.4-0 Warning from function _IEGetObjByName, $_IEStatus_NoMatch (Name: http://vk-all.ordersgame.com/distributor.php?api_url=http://api.vkontakte.ru/api.php&amp;api_id=1824042&amp;api_settings=7&amp;viewer_id=110884948&amp;viewer_type=2&amp;sid=1d29ff1075af2e4422075e36a678f9e6b804f705e89bb258b6b27bf724&amp;secret=8b0d82f372&amp;user_id=110884948&amp;group_id=0&amp;is_app_user=1&amp;auth_key=804283c6401df09d778fb78efeda8adb&amp;language=0&amp;parent_language=0&amp;api_result=%7B%22response%22%3A%5B%7B%22uid%22%3A110884948%2C%22first_name%22%3A%22%D0%92%D0%B0%D0%B4%D0%B8%D0%BC%22%2C%22last_name%22%3A%22%D0%92%D0%B5%D0%BB%D0%B8%D0%BA%D0%B8%D0%B9%22%2C%22photo_medium%22%3A%22http%3A%5C%2F%5C%2Fcs10359.vkontakte.ru%5C%2Fu110884948%5C%2Fb_5dae381b.jpg%22%2C%22sex%22%3A%222%22%7D%5D%7D&amp;lc_name=29fd055a&amp;hash=, Index: 0)
Error: _IEGetObjByName -> 7>Exit code: 0    Time: 10.172

Кажется я уже начинаю ничего не понимать :whistle:

Код:

7 ($_IEStatus_NoMatch) = No Match

-------------
А если передавать в переменной $sFrameName имя фрейма а не его src то получается вот это:

Код:

: ==> The requested action with this object has failed.:
$s_Content = $o_iFrame.contentWindow.document.body.innerHTML
$s_Content = $o_iFrame.contentWindow.document^ ERROR

Mr. Anderson · 29 Ноя 2010

Так, как загрузить фрейм, и что бы без ошибок? В чем причина ошибки?

Garrett · 29 Ноя 2010

Mr. Anderson
Дайте полную ссылку на страницу с нужным вам фреймом (свой данные в адресе смените, на что-то типа id00000000), я попробую посмотреть и помочь.

Mr. Anderson · 29 Ноя 2010

http://vkontakte.ru/app1824042 вот это приложение

Garrett · 30 Ноя 2010

Mr. Anderson
Я так понимаю, вы хотите это приложение загрузить отдельно в GUI?
Если так, то вам понадобится использовать IE встроенный в GUI.
Для загрузки же самого приложения проще воспользоваться ссылкой:
httр://vk24.ordersgame.com/?api_id=1824042&viewer_id=Ваш ID&auth_key=Ваш ключ авторизации
Однако вы уже должны быть авторизированы.

Mr. Anderson · 30 Ноя 2010

Отображать в GUI как таковой цели нет. Скорее автоматизировать некоторые действия в приложении, а уж об отображении я как то не забочусь, по крайней мере выполнял это следующей функцией (для отображения промежуточного этапа):

Код:

Func ViewResult($pfView)
	If $pfView = 1 Then
		$hTMPF = FileOpen($navView, 2)
		FileWrite($hTMPF, _IEDocReadHTML($oIE))
		FileClose($hTMPF)
		$Obj1.Navigate($navView)
	EndIf
EndFunc

$oIE - глобальная переменная

httр://vk24.ordersgame.com/?api_id=1824042&viewer_id=Ваш ID&auth_key=Ваш ключ авторизации

_IECreate для такой ссылки гугл открывает и пытается найти текст ссылки.

Код:

Func GameLoad($viewer_id, $auth_key)
	_IEQuit($oIE)
	$sLoadGameString = "httр://vk24.ordersgame.com/?api_id=1824042&viewer_id="&$viewer_id&"&auth_key="&$auth_key
	$oIE = _IECreate($sLoadGameString,0,1)
EndFunc

Не найдено ни одного документа, соответствующего запросу httр://vk25.ordersgame.com/?api_id=1824042&viewer_id=11088494&auth_key=804283c6401df09d778fb78efeda8adb.

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

И кстати httр://vk24.ordersgame.com vk не всегда равно 24, исходя из текста страницы с фреймом и не узнать чему оно равно будет...

Mr. Anderson · 1 Дек 2010

Большое спасибо, задача решена.

Код:

Func FrameName()
	$sLoadFrame = ''
	$sContentPage = _IEDocReadHTML($oIE)
	$sContentPage_Frame = StringRegExp($sContentPage, '(?s)<IFRAME\sid=app_container.+?</IFRAME>', 1)
	If @error = 0 Then
		$sURL_Game = 'http://vk24.ordersgame.com/?'
		
		$sApiID = StringRegExp($sContentPage_Frame[0], 'api_id=\d+?&', 1)
		$sApiSettings = StringRegExp($sContentPage_Frame[0], 'api_settings=\d+?&', 1)
		$sViewerID = StringRegExp($sContentPage_Frame[0], 'viewer_id=\d+?&', 1)
		$sViewerType = StringRegExp($sContentPage_Frame[0], 'viewer_type=\d+?&', 1)
		$sUserID = StringRegExp($sContentPage_Frame[0], 'user_id=\d+?&', 1)
		$sGroupID = StringRegExp($sContentPage_Frame[0], 'group_id=\d+?&', 1)
		$sIsAppUser = StringRegExp($sContentPage_Frame[0], 'is_app_user=.+?&', 1)
		$sAuthKey = StringRegExp($sContentPage_Frame[0], 'auth_key=.+?&', 1)
		$sLanguage = StringRegExp($sContentPage_Frame[0], 'language=.+?&', 1)
		$sApiURL = StringRegExp($sContentPage_Frame[0], 'api_url=.+?php', 1)
		
		$sLoadFrame = $sURL_Game&$sApiID[0]&$sApiSettings[0]&$sViewerID[0]&$sViewerType[0]&$sUserID[0]&$sGroupID[0]&$sIsAppUser[0]&$sAuthKey[0]&$sLanguage[0]&$sApiURL[0]
	Else
		MsgBox(0,"Ошибка", "Ошибка в определении имени фрейма")
	EndIf
	Return $sLoadFrame
EndFunc

Автор темы	Похожие темы	Форум	Ответы	Дата
H	[Сеть, интернет] Поиск html кода на сайте	Общие вопросы по AutoIt	0	8 Авг 2019
	[Сеть, интернет] InetRead, InetGet, ERROR 403. Доступ запрещен	Автоматизация IE и Web-интерфейса	2	12 Июл 2019
Y	[Сеть, интернет] Не копирует txt в сетевую папку в домене	Общие вопросы по AutoIt	1	23 Апр 2019
A	[Сеть, интернет] Скрипт уведомление о свободных талончиках	Стол заказов	4	15 Апр 2019
	[Сеть, интернет] Залогиниться на сайте без использования IE	Общие вопросы по AutoIt	23	9 Окт 2010

Поиск

Поиск

[Сеть, интернет] Как залогиниться на сайте и перейти по ссылке

Mr. Anderson

Новичок

Garrett

Модератор

Mr. Anderson

Новичок

Garrett

Модератор

Mr. Anderson

Новичок

Garrett

Модератор

Mr. Anderson

Новичок

Garrett

Модератор

Mr. Anderson

Новичок

Garrett

Модератор

Mr. Anderson

Новичок

Mr. Anderson

Новичок

Garrett

Модератор

Mr. Anderson

Новичок

Garrett

Модератор

Mr. Anderson

Новичок

Mr. Anderson

Новичок