Регистрация Главная Пользователи Все разделы прочитаны
Сообщения за день Справка Регистрация
Навигация
Zhyk.org LIVE! Реклама на Zhyk.org Правила Форума Награды и достижения Доска "почета"

Ответ
 
Опции темы
Старый 08.07.2020, 01:45   #1
 Старший сержант
Аватар для Stratego
 
Stratego троюродный дядя Чака НоррисаStratego троюродный дядя Чака НоррисаStratego троюродный дядя Чака НоррисаStratego троюродный дядя Чака НоррисаStratego троюродный дядя Чака НоррисаStratego троюродный дядя Чака НоррисаStratego троюродный дядя Чака НоррисаStratego троюродный дядя Чака НоррисаStratego троюродный дядя Чака НоррисаStratego троюродный дядя Чака НоррисаStratego троюродный дядя Чака Норриса
Регистрация: 25.03.2013
Сообщений: 175
Популярность: 7326
Сказал(а) спасибо: 8
Поблагодарили 36 раз(а) в 18 сообщениях
 
По умолчанию Автоматический поиск и проверка рабочего бесплатного прокси в сети.

Простой скрипт для [Ссылки могут видеть только зарегистрированные пользователи. ], который парсит сайт с списком бесплатных прокси, составляет из них массив и проверяет их на работоспособность.
Позволяет легко автоматически найти рабочий бесплатный прокси не заходя ни на какие сайты вручную и не проверяя список прокси руками.

В случае нахождения рабочего прокси выдает страницу [Ссылки могут видеть только зарегистрированные пользователи. ] на которую скрипт заходит через это прокси и выдает IP и порт для дальнейшего использования бесплатного прокси по назначению.

Код:
int pos_size_edit0[1][4];
string text_edit0[1];

pos_size_edit0[0][0]=10; pos_size_edit0[0][1]=9; pos_size_edit0[0][2]=221; pos_size_edit0[0][3]=20;
text_edit0[0]="Парсинг прокси...";

createdialog(0, EDIT, #pos_size_edit0[0][0], #text_edit0[0]);
showdialog(0, "Поиск прокси", 200, 200, 250, 70, 1, 1);
//////////



find_proxi();

loop()sleep(10);

function find_proxi()
{
string P[100];
string R="(?<=input type=^"checkbox^" class=^"ch^" value=^")[\d]+(\.)[\d]+(\.)[\d]+(\.)[\d]+(:)[\d]+(?=^" onclick=^"SelectProxy\(this\)^")";
int pade=1;
string T;
S:;
  if (sendgetweb(#T, "Mozilla/5.0 (Windows NT 6.1; Win64; x64; rv:78.0) Gecko/20100101 Firefox/78.0", "GET", "http:/^/foxtools.ru", "Proxy?page="+format(pade)))
  {
  text_edit0[0]="Парсинг прокси...";
  
  int k=regexsearch(100, #P[0], T, R);
    if (k==0)
    {
    messagebox ("Прокси нет");
    return;
    }
    for (int n=0; n<k; n++)
    {
    text_edit0[0]=P[n];
    
      if (sendgetweb(P[n], #T, "Mozilla/5.0 (Windows NT 6.1; Win64; x64; rv:78.0) Gecko/20100101 Firefox/78.0", "GET", "https:/^/kibor-bot.com", "forum"))
      {
        if (T!="")
        {
          if (fopen (tempfolder()+"proxi.txt", "w")!=0)
          {//если открылся
          fwrite("Рабочий прокси "+P[n]+"^r^n"+T);
          fclose();//закрываем файл
          }
        start(tempfolder()+"proxi.txt");
        if (messageboxyn("Прокси найден.^r^nДа - Закончить поиск^r^nНет - Продолжить поиск")==1)return;        
        }
      }
    }
  }
pade++;
goto S;
}
Видео работы.
[Ссылки могут видеть только зарегистрированные пользователи. ]

Последний раз редактировалось Stratego; 09.07.2020 в 14:22. Причина: Добавлено видео
  Ответить с цитированием
Старый 09.07.2020, 19:38   #2
 Старший сержант
Аватар для Stratego
 
Stratego троюродный дядя Чака НоррисаStratego троюродный дядя Чака НоррисаStratego троюродный дядя Чака НоррисаStratego троюродный дядя Чака НоррисаStratego троюродный дядя Чака НоррисаStratego троюродный дядя Чака НоррисаStratego троюродный дядя Чака НоррисаStratego троюродный дядя Чака НоррисаStratego троюродный дядя Чака НоррисаStratego троюродный дядя Чака НоррисаStratego троюродный дядя Чака Норриса
Регистрация: 25.03.2013
Сообщений: 175
Популярность: 7326
Сказал(а) спасибо: 8
Поблагодарили 36 раз(а) в 18 сообщениях
 
По умолчанию Re: Автоматический поиск и проверка рабочего бесплатного прокси в сети.

Такой же скрипт для автоматического поиска бесплатных прокси, только используя API сайта и парсер JSON. Дополнительно показывает страну.

Получаемый JSON:
Код:
{"response":{"pageNumber":1,"pageCount":2,"items":[{"ip":"116.66.197.228","port":8080,"type":2,"anonymity":"HighKeepAlive","uptime":2.34,"checked":"2020-07-07T06:55:28","available":"Yes","free":"Yes","country":{"nameEn":"Nepal","nameRu":"Непал","iso3166a2":"NP"}},{"ip":"200.239.64.36","port":80,"type":1,"anonymity":"HighKeepAlive","uptime":0.36,"checked":"2020-07-07T06:38:42","available":"Yes","free":"Yes","country":{"nameEn":"Brazil","nameRu":"Бразилия","iso3166a2":"BR"}},
.....................................
Код:
IP в Json.response.items[i].ip    
Порт в Json.response.items[i].port
Страна в Json.response.items[i].country.nameEn
Код:
int pos_size_edit0[1][4];
string text_edit0[1];

pos_size_edit0[0][0]=10; pos_size_edit0[0][1]=9; pos_size_edit0[0][2]=221; pos_size_edit0[0][3]=20;
text_edit0[0]="Парсинг прокси...";

createdialog(0, EDIT, #pos_size_edit0[0][0], #text_edit0[0]);
showdialog(0, "Поиск прокси", 200, 200, 250, 70, 1, 1);
//////////


find_proxi();

//loop()sleep(10);

function find_proxi()
{
string T;
int limit=100;
int page=1;

  loop()
  {
    if (sendgetweb(#T, "Mozilla/5.0 (Windows NT 6.1; Win64; x64; rv:78.0) Gecko/20100101 Firefox/78.0", "POST", "http:/^/api.foxtools.ru", "v2/Proxy?limit="+format(limit)+"&page="+format(page)))
    {
    //messagebox (T);
    text_edit0[0]="Парсинг прокси...";
    parserjson(Json, T);
    
      for(int i=0; i<limit; i++)
      {
      string ip = Json.response.items[i].ip;
      string port = Json.response.items[i].port;
      
        if(ip == "ERROR_SEARCH_JSON")
        {
        messagebox("Прокси не найден");
        return;
        }
      text_edit0[0]=ip+":"+port+"^t"+Json.response.items[i].country.nameEn;
      sleep(100);
      
        if (sendgetweb(ip+":"+port, #T, "Mozilla/5.0 (Windows NT 6.1; Win64; x64; rv:78.0) Gecko/20100101 Firefox/78.0", "GET", "https:/^/kibor-bot.com", "forum"))
        {
          if (T!="")
          {
            if (fopen (tempfolder()+"proxi.txt", "w")!=0)
            {//если открылся
            fwrite("Рабочий прокси "+ip+":"+port+"^r^n"+T);
            fclose();//закрываем файл
            }
          start(tempfolder()+"proxi.txt");
          if (messageboxyn("Прокси найден.^r^nДа - Закончить поиск^r^nНет - Продолжить поиск")==1)return;
          }
        }
      
      }
    }
    else
    {
    messagebox ("Прокси не найден");
    return;
    }
  page++;
  }
}

Последний раз редактировалось Stratego; 09.07.2020 в 19:44.
  Ответить с цитированием
Ответ

Опции темы

Ваши права в разделе
Вы не можете создавать новые темы
Вы не можете отвечать в темах
Вы не можете прикреплять вложения
Вы не можете редактировать свои сообщения

BB коды Вкл.
Смайлы Вкл.
[IMG] код Вкл.
HTML код Выкл.

Быстрый переход

Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
[Услуги] Автоматический сервис продвижение в социальной сети Вконтакте krist11 Социальные сети 1 02.06.2013 12:05
Предлагаю сделать автоматический поиск тем Dream_Wizard Team of development 6 10.06.2012 21:21
Автоматический поиск схожих тем. Dunя О портале Zhyk.Ru 12 22.11.2010 21:23
Помощь зала, правильный поиск рабочих прокси. Gudsaf Треп 0 15.08.2010 16:51

Заявление об ответственности / Список мошенников

Часовой пояс GMT +4, время: 15:13.

Пишите нам: [email protected]
Copyright © 2024 vBulletin Solutions, Inc.
Translate: zCarot. Webdesign by DevArt (Fox)
G-gaMe! Team production | Since 2008
Hosted by GShost.net