Пример Веб робота на JScript (не JavaScript)



Автоматизированный серфинг.
©2003 автор Ивашин Ю.В. все права защищены

В составе операцонных систем Windows, начиная с версии 98, поставляется средство
автоматизации действий пользователя. Новейшая версия этой программы (Microsoft
Windows Script 5.6) может быть скачана с сервера Microsoft.
Автоматизация заключается в возможности исполнения программы на JScript, с помощью
интерпретатора - wscript.exe (в XP C:WindowsSystem32wscript.exe).
Попробуем автоматизировать серфинг в Microsoft Internet Explorer.
Средства JScript позволяют создать невидимое окно MSIE и "прокрутить" в нем
заданные URL, и даже совершить на них некоторые действия.В программестановится
доступной объектная модель загруженной странички, с элементами которой можно оперировать точно так-же,
как на JavaScript в HTML.
Пример.

Система посещений WM-Clicks, оплачивает посещения
сайтов рекламодателей через Webmoney, на
странице рекламодателя нужно пробыть 30 сек.
Запускаем notepad и пишем файл wmclick.js.
var oIE = WScript.CreateObject("InternetExplorer.Application");

oIE.navigate("http://wm-clicks.ru");

while (oIE.Busy) WScript.Sleep(200);

while (oIE.ReadyState != 4) WScript.Sleep(200);

oIE.document.forms[0].login.value = "Ваш логин";

oIE.document.forms[0].pass.value = "Ваш пароль";

oIE.document.forms[0].elements[3].click();

while (oIE.Busy) WScript.Sleep(200);

while (oIE.ReadyState != 4) WScript.Sleep(200);

oIE.navigate("http://www.wm-clicks.ru/cgi-bin/member.pl?cmd=earn2");

while (oIE.Busy) WScript.Sleep(200);

while (oIE.ReadyState != 4) WScript.Sleep(200);

var oIE2 = WScript.CreateObject("InternetExplorer.Application");

for (var j=0;j
if (oIE.document.links[j].pathname == "cgi-bin/begin.pl")

{oIE2.navigate(oIE.document.links[j].href);
WScript.Sleep(60000); };

Эти 16 строчек выполнят всю необходимую работу, ниже мы разберем их. Сохраните файл,
например в C:JScriptwmclicks.js, осталось только запланировать его выполнение в фоновом режиме.
Пуск->Настройки->Панель управления->Sheduled Tasks(Запланированные задачи)-> добавить новую.
В строке для выполнения пишем wscript.exe C:JScriptwmclicks.js, ставим на ежедневное выполнение. Теперь
каждый месяц Вам будет накапывать 0.5$.
Окна эксплорера, создаваемые программой, невидимы, досаждать могут только страницы спонсоров, если они с ошибками. В
этом случае эксплорер выведет окно, "На этой странице произошла ошибка сценария ...". Чтобы этого избежать,
поставьте в настройках MSIE галочку Disable script debugging.
Теперь разберем текст программы. Как он ни ужасен, по сути он очень прост. Первая строка создает
невидимый Internet Explorer. Вторая - заставляет его загрузить заданный URL. Все строки while - это ожидание,
окончания загрузки документа. Строки oIE.document.forms... позволяют ввести значения в поля формы, загруженного
документа (логин и пароль). Три последние строки описывают цикл "щелканья" по прибыльным ссылкам спонсоров. Каждая ссылка
открывается на 60 сек в отдельном эксплорере.

Если Вы хотите видеть окна, и происходящие в них действия - поставьте второй строкой

oIE.Visible = 1;
Очень похоже на javascript, верно? Читайте документацию - там все есть.


Тэги: javascript | jscript



далее Программное обеспечение такси, радиотакси

Похожие программы
Книга посвящена языку сценариев JavaScript и его использованию в Web-дизайне. Дан вводный курс по языку HTML. Рассматривается работа JavaScript-сценариев в составе Web-страниц: общие принципы...
Пятое издание бестселлера 'JavaScript. Подробное руководство' полностью обновлено. Рассматриваются взаимодействие с протоколом HTTP и применение технологии Ajax, обработка XML-документов, создание...
Книга 'JavaScript. Энциклопедия пользователя' является наиболее полным учебными справочным руководством по всем версиям языка JavaScript, включая JavaScript 1.5 и JScript 5.0.Ha сегодняшний день...



Новости Hardware

Случайная программа

AKSDocFIB 1.0
AKSDocFIB - компонент предназначен для хранения документов в БД через FIBPlus (Delphi 7). При помещении в БД документ подвергается упаковке.


LiveInternet: DDBS.Ru - программы для Windows
© 2005-2016 DDBS.Ru - каталог программ