Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > Delphi программирование > Компоненты Delphi
Регистрация

Восстановить пароль
Повторная активизация e-mail

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 13.04.2013, 01:05   #11
Vedaslav
Ищите и обрящете!
Пользователь
 
Регистрация: 06.09.2010
Сообщений: 41
По умолчанию

Цитата:
Сообщение от eval Посмотреть сообщение
да не я не спорю, делать мне чтоль нечего ...
просто покажите какойнибудь автокилер, вот и весь спор
Легко, только без TWebBrowser, используется IdHTTP:
Прокси кликер
Vedaslav вне форума Ответить с цитированием
Старый 13.04.2013, 01:40   #12
eval
Подтвердите свой е-майл
 
Регистрация: 29.08.2012
Сообщений: 4,011
По умолчанию

ну началось, когда я сказал без браузера, вы стали пальцы гнуть и говорить что я путаю, а когда дело дошло до дела, так и у вас уже без браузера, и как тебя понимать саид?
eval вне форума Ответить с цитированием
Старый 13.04.2013, 09:49   #13
Vedaslav
Ищите и обрящете!
Пользователь
 
Регистрация: 06.09.2010
Сообщений: 41
По умолчанию

Хотите увидеть с TWebBrowser пример, хорошо, но свой исходник выкладывать не буду, опишу теоретически весь процесс, смотрите:

1) Ищем элитные ip прокси (можно купить).

2) Очищаем куки;

3) Меняем user агент;

4)
Код:
procedure SetProxy(host: string; port: string);
  var ProxyInfo: PInternetProxyInfo;
      addr: AnsiString;
begin
  EndSession;
  New(ProxyInfo);
  try
    ProxyInfo^.dwAccessType := INTERNET_OPEN_TYPE_PROXY;
    addr:=host + ':' + port;
    ProxyInfo^.lpszProxy := PChar(addr);
    ProxyInfo^.lpszProxyBypass := PChar('');
    UrlMkSetSessionOption(INTERNET_OPTION_PROXY, ProxyInfo, SizeOf(Internet_Proxy_Info), 0);
Webbrowser1.Navigate('www.site,ru);
  finally
    Dispose(ProxyInfo);
  end;
end;
Через эту процедуру грузим страницу в TWebBrowser,

получается мы зашли на сайт через прокси (т.е. под ip какого-нибудь элитного прокси сервера);

5) Далее, можно по тегам, классам, типам найти нас интересующую ссылку;

6) Пишем процедуру осуществляющую клик;

7) Клик по заданной ссылке.

Усложняем.

Кинем на форму Timer, загрузим в Listbox наш список ip адресов прокси, пишем код, и через определённый интервал времени наша прога будет автоматически заходить под разными ip адресами на сайт и кликать по ссылкам тем самым имитируя действия настоящего юзера.

Что получилось? получилась программа - бот, посещающая сайты под разными ip и имитирующая поведение "настоящего юзера".

Но мне нужно что бы имитация была полной т.е. двигался курсор мыши по экрану к TWebBrowser и уже в нём осуществлялся клик по заданной ссылке!
Вот на этом пункте я остановился, т.к. полноценного решения в инете пока не нашёл.


А теперь вопрос.

eval, как вы считаете - это разве не бот автокликер?
И ещё, eval, пальцы я пока не гнул и делать этого здесь не собираюсь и следите за своим сленгом. Сюда я пришёл что бы получить конкретный ответ на поставленный вопрос, а не спорить и ругаться.

p.s. Я всегда рад конструктивной критике.
Vedaslav вне форума Ответить с цитированием
Старый 13.04.2013, 22:49   #14
eval
Подтвердите свой е-майл
 
Регистрация: 29.08.2012
Сообщений: 4,011
По умолчанию

все это делается на раз-два и без браузера, про что я вам говорю уже 2 день
eval вне форума Ответить с цитированием
Старый 13.04.2013, 23:04   #15
Vedaslav
Ищите и обрящете!
Пользователь
 
Регистрация: 06.09.2010
Сообщений: 41
По умолчанию

Но мне было нужно именно с браузером!
Ещё раз повторюсь что бы с имитировать поведение "настоящего юзера", потому что поисковики учитывают всё и в том числе использовался ли браузер при просмотре того или иного веб ресурса.
Vedaslav вне форума Ответить с цитированием
Старый 13.04.2013, 23:07   #16
eval
Подтвердите свой е-майл
 
Регистрация: 29.08.2012
Сообщений: 4,011
По умолчанию

если вы хотите обмануть поисковик, то для этого не нужен ни браузер ни сайт, надо только посылать запросы поисковику, и дурить ему мозг
eval вне форума Ответить с цитированием
Старый 13.04.2013, 23:24   #17
Vedaslav
Ищите и обрящете!
Пользователь
 
Регистрация: 06.09.2010
Сообщений: 41
По умолчанию

Чувствую тема нашего диалога медленно, но верно переходит в диспут и тем самым уходит в сторону от настоящего вопроса.

eval, если вам интересно, то почитайте в инете про "поведенческие факторы" и как к ним относится Яндекс.
Vedaslav вне форума Ответить с цитированием
Старый 13.04.2013, 23:31   #18
eval
Подтвердите свой е-майл
 
Регистрация: 29.08.2012
Сообщений: 4,011
По умолчанию

дет сад, мы уже тут и про браузеры все поняли, и про килеры, сейчас вот еще про факторы узнаем
и как ваш бот будет эти самые поведенческие факторы имитировать, и чем ему в этом поможет браузер?
eval вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
TWebBrowser - изменить текст ссылки AvRob Компоненты Delphi 8 23.07.2012 17:02
как заставить twebbrowser принудительно открывать все ftp ссылки в пассивном режиме key-bo2 Помощь студентам 0 24.07.2011 18:41
Как вычислить координаты после отражения? TacoBell Помощь студентам 3 20.04.2010 22:20
Как в TWebBrowser узнать адрес ссылки которая находится под курсором мышки SeRhy Общие вопросы Delphi 0 10.08.2008 10:11
twebbrowser Как получить ссылки на которые ведут картинки? darkcoder Работа с сетью в Delphi 1 07.03.2008 14:10