Что нового
Автор:
Фильтры

[Автоматизация] Скрытое вхождение на сайт, выдирание оттуда исходника страницы...

L

LepreconSTR

Новичок
Сообщения
5
Репутация
0
Нужно залогиниться на сайте с целью получения нужной информации со страницы на которой находится приватная информация. Все это требуется сделать скрыто без всякий выскакивающих окошек. И в конце вывести сообщение с требуемой информацией.
P.S. Сайт находится в локальной сети и зайти в него с внешки нельзя
P.S.S. Я не пишу вирус и ему подобный скрипт. Думаю навалять мини програмку которая будет показывать кол-во оставшихся денег на счету у провайдер и напоминать когда платить и сколько.
P.S.S.S. Если есть подобная тема прошу дать ссылку, а то я нашел только там где логинится через браузер.
 
B

bulldog5293

Знающий
Сообщения
172
Репутация
10
После r35p3ct я незаметил нового поста, так что решил всё же сюда прекинуть, вдруг ты не увидел
Код: 
$oHTTP = ObjCreate("WinHttp.WinHttpRequest.5.1")
$oHTTP.Open("POST", "http://xxx.ru/login.html")
$oHTTP.setTimeouts(5000, 5000, 15000, 15000)
$oHTTP.SetRequestHeader("Accept", "text/html,application/xhtml+xml,application/xml;q=0.9,*/*;q=0.8")
$oHTTP.SetRequestHeader("Accept-Language", "ru")
$oHTTP.SetRequestHeader("Referer","http://xxx.ru/login.html")
$oHTTP.SetRequestHeader("Content-Type","application/x-www-form-urlencoded")
$oHTTP.SetRequestHeader("User-Agent", "Mozilla/4.0 (compatible; MSIE 6.0; Windows NT 5.1)")
$oHTTP.SetRequestHeader("Host","xxx.ru")
$oHTTP.SetRequestHeader("Proxy-Connection", "Keep-alive")
$oHTTP.Send("login=Vasya&pass=123")
$oHTTP.WaitForResponse
 
Автор
L

LepreconSTR

Новичок
Сообщения
5
Репутация
0
Скажите пожалуйста в чем заключается ошибка?
Есть такой код:
Код: 
#include <IE.au3>
$oIE = _IECreate ("https://stat.mirgiga.net/cgi-bin/utm5/aaa5")

$oUser =_IEGetObjByName($oIE,"login")
$oPass =_IEGetObjByName($oIE,"password")
_IEFormElementSetValue ($oUser, 'логин')
_IEFormElementSetValue ($oPass, 'Пароль')
По теории на странице в поля логина и пароля должны вставиться соответствующие символы, но на деле это не происходит.
Так как страница не доступна из интернета, то выкладываю исходник страницы:
<HTML>
<HEAD>
<meta http-equiv="Content-Type" content="text/html; charset=UTF-8">
<TITLE>
Giganet:
Вход в статистику</TITLE>
<LINK rel="stylesheet" type="text/css" href="/utm.css">
<SCRIPT language="JavaScript" type="text/javascript" src="/utm.js"></SCRIPT>
</HEAD>
<BODY bgcolor="#FFFFFF" text="#000000" link="#003BA9" vlink="#E7651A" marginwidth="0" marginheight="0" topmargin="0" bottommargin="0" leftmargin="0" rightmargin="0">
<TABLE width="100%" height="100%" cellspacing="0" cellpadding="0" border="0">
<TR>
<TD height="5%" bgcolor="#004f93"><img src="http://10.25.200.200/hleft.jpg"></TD>
<TD bgcolor="#004f93"></TD>
</TR>
<TR>
<TD height="5" bgcolor="#004f93"></TD>

<TD bgcolor="#004f93">
<a href="http://www.mirgiga.net"><img src="http://10.25.200.200/h1.jpg"></a><a href="http://10.25.200.200/balance.php"><img src="http://10.25.200.200/h2.jpg"></a><a href="http://10.25.200.200/page/wm/gigawm.php" target="_blank"><img src="http://10.25.200.200/h3.jpg"></a><a href="http://stat.mirgiga.net/up/index.php?act=form" target="_blank"><img src="http://stat.mirgiga.net/h4.jpg"></a>
</TD>
</TR>
<TR>
<TD width="20%" class="menu-area">
<DIV class="mainmenu-act">Вход в статистику</DIV>

<DIV ALIGN="CENTER"></DIV>
</TD>
<TD width="80%" class="work-area">
<TABLE width="100%" cellspacing="0" cellpadding="0" border="0" bgcolor="#C9E6F7"><TR><TD class="submenu-area"></TD></TR></TABLE>

Вход в статистику<FORM name="login" accept-charset="UTF-8" action="/cgi-bin/utm5/aaa5" target="" method="post"><DIV class="form-tab"><TABLE cellspacing="5" cellpadding="3" border="0">
<TR>
<TD class="form-field" align="right">Логин</TD>

<TD class="form-field" align="left"><INPUT type="text" class="form-field" size="40" name="login" value=""></TD>
</TR>
<TR>
<TD class="form-field" align="right">Пароль</TD>
<TD class="form-field" align="left"><INPUT type="password" class="form-field" size="40" name="password" value=""></TD>
</TR>
<INPUT type="hidden" name="cmd" value="login"><TR>
<TD></TD>
<TD><INPUT type="submit" class="form-button" value="OK"></TD>
</TR>
</TABLE></DIV></FORM>
</TD>
</TR>
</TABLE>
<SCRIPT language="JavaScript" type="text/javascript" src="/add_years.js"></SCRIPT>

</BODY>
</HTML>

Хотя идентичный код работает на другой странице:
Код: 
#include <IE.au3>
$oIE = _IECreate ("http://www.vgtrk.com/program/login.html")

$oUser =_IEGetObjByName($oIE,"login")
$oPass =_IEGetObjByName($oIE,"passwd")
$oSubmit =_IEGetObjByName($oIE, "log")
_IEFormElementSetValue ($oUser, 'логин')
_IEFormElementSetValue ($oPass, 'пароль')

Что-то мне кажется что дело в протоколе https...
 
Garrett

Garrett

Модератор
Локальный модератор
Сообщения
3,999
Репутация
967
LepreconSTR
У вас в HTML коде есть ещё элементы, содержащие имя "login"!
Так, должно работать:
Код: 
#include <IE.au3>
$oIE = _IECreate("https://stat.mirgiga.net/cgi-bin/utm5/aaa5")

$oForm =_IEFormGetObjByName($oIE,"login")
$oUser =_IEFormElementGetObjByName($oForm,"login")
$oPass =_IEFormElementGetObjByName($oForm,"password")
_IEFormElementSetValue ($oUser, 'логин')
_IEFormElementSetValue ($oPass, 'Пароль')
 
Автор
L

LepreconSTR

Новичок
Сообщения
5
Репутация
0
Garrett сказал(а):
LepreconSTR
У вас в HTML коде есть ещё элементы, содержащие имя "login"!
Так, должно работать:
Код: 
#include <IE.au3>
$oIE = _IECreate("https://stat.mirgiga.net/cgi-bin/utm5/aaa5")

$oForm =_IEFormGetObjByName($oIE,"login")
$oUser =_IEFormElementGetObjByName($oForm,"login")
$oPass =_IEFormElementGetObjByName($oForm,"password")
_IEFormElementSetValue ($oUser, 'логин')
_IEFormElementSetValue ($oPass, 'Пароль')
Нажмите, чтобы раскрыть...

Нет, тоже не работает результат такой же как и в моем скрипте, окошко с сайтом открывается и скрипт впадает в ступор.

Все проблему решил путем переноса ресурса в IE из "надежных узлов" в зону "интернет". Хотя почему там не работало хз...
 
Garrett

Garrett

Модератор
Локальный модератор
Сообщения
3,999
Репутация
967
LepreconSTR [?]
Все проблему решил путем переноса ресурса в IE из "надежных узлов" в зону "интернет". Хотя почему там не работало не знаю...
Нажмите, чтобы раскрыть...
Думаю потому, что ваш сайт не использует доверенный идентификатор.
 
Вам необходимо войти или зарегистрироваться, чтобы здесь отвечать.
Автор темы Похожие темы Форум Ответы Дата
A Автоматизация, копирование текста в строке до знака | и после знака | Общие вопросы по AutoIt 0
X Автоматизация Автоматизация входа в игру с переименованным окном Стол заказов 0
N Автоматизация нажатия клавиш мышки. Покупка/продажа, поиск услуг 1
G Автоматизация + сообщение в ТГ Стол заказов 0
RAMzor Автоматизация WinSCP через COM. Копирование файлов с индикатором прогресса Общие вопросы по AutoIt 1
Похожие темы
Автоматизация, копирование текста в строке до знака | и после знака |
Автоматизация Автоматизация входа в игру с переименованным окном
Автоматизация нажатия клавиш мышки.
Автоматизация + сообщение в ТГ
Автоматизация WinSCP через COM. Копирование файлов с индикатором прогресса
Верх