ANTICHAT.XYZ    VIDEO.ANTICHAT.XYZ    НОВЫЕ СООБЩЕНИЯ    ФОРУМ  
Баннер 1   Баннер 2

ANTICHAT — форум по информационной безопасности, OSINT и технологиям

ANTICHAT — русскоязычное сообщество по безопасности, OSINT и программированию. Форум ранее работал на доменах antichat.ru, antichat.com и antichat.club, и теперь снова доступен на новом адресе — forum.antichat.xyz.
Форум восстановлен и продолжает развитие: доступны архивные темы, добавляются новые обсуждения и материалы.
⚠️ Старые аккаунты восстановить невозможно — необходимо зарегистрироваться заново.
Вернуться   Форум АНТИЧАТ > Программирование > С/С++, C#, Delphi, .NET, Asm
   
Ответ
 
Опции темы Поиск в этой теме Опции просмотра

Накрутка счётчика через Delphi
  #1  
Старый 04.03.2009, 14:57
MiRiN
Новичок
Регистрация: 25.07.2008
Сообщений: 5
Провел на форуме:
2952

Репутация: -1
По умолчанию Накрутка счётчика через Delphi

Всех приветствую.
Возникла такая идя но вот с реализацией пока что то туговато( В общем нужна программка которая через каждые 15 сек меня прокси и заходила уже с новым прокси на необходимый сайт. Желательно реализовать это на Delphi но мона и на C++ и С#. Жду предложений)
 
Ответить с цитированием

  #2  
Старый 04.03.2009, 17:11
Assembler
Участник форума
Регистрация: 01.09.2007
Сообщений: 203
Провел на форуме:
812964

Репутация: 302
Отправить сообщение для Assembler с помощью ICQ
По умолчанию

topgen тебе чем не подходит?
 
Ответить с цитированием

  #3  
Старый 04.03.2009, 17:46
St0nX
Участник форума
Регистрация: 19.05.2007
Сообщений: 281
Провел на форуме:
2823587

Репутация: 106
Отправить сообщение для St0nX с помощью ICQ
По умолчанию

Так бы и сказал напишите за меня программу которая счетчик накручивает.

По сбажу
Работа с проксей
Цитата:
SOCKET socks5(char *socks, int sockport, char *server, int srvport)
{
struct hostent *Ip = gethostbyname(socks);
if(Ip == NULL)
return 0;

sockaddr_in sa;
sa.sin_family = AF_INET;
sa.sin_port = htons(sockport);
sa.sin_addr.s_addr = inet_addr(inet_ntoa(*((struct in_addr *)Ip->h_addr)));

char pack[12];
SOCKET s = socket(AF_INET, SOCK_STREAM, IPPROTO_TCP);
int tmo = 3000;
setsockopt(s,SOL_SOCKET,SO_RCVTIMEO,(const char*)&tmo,sizeof(tmo));
if(s == SOCKET_ERROR)
return SOCKET_ERROR;

if(connect(s, (SOCKADDR *)&sa, sizeof(sa)) == SOCKET_ERROR)
return SOCKET_ERROR;

if(send(s, pack, 3, 0) == SOCKET_ERROR)
return SOCKET_ERROR;

int i = recv(s, pack, 2, 0);
if(i == 0 || i == SOCKET_ERROR)
return SOCKET_ERROR;
if(pack[0] != 0x05 || pack[1] == 0xFF)
return 0;

pack[0] = 0x05;
pack[1] = 0x01;
pack[2] = 0x00;
pack[3] = 0x01;

Ip = gethostbyname(server);
if(Ip == NULL)
return 0;
char ip[16];
strcpy(ip, inet_ntoa(*((struct in_addr *)Ip->h_addr)));
int j = strlen(ip), k=4;
char *p = ip;
for(i = 0; i<j; i++)
if(ip[i] == '.')
{
ip[i] = 0;
pack[k] = atoi(p);
k++;
p = ip+i+1;
}
pack[k] = atoi(p);
pack[8] = srvport/256;
pack[9] = srvport%256;

if(send(s, pack, 10, 0) == SOCKET_ERROR)
return SOCKET_ERROR;

i = recv(s, pack, 10, 0);
if(i == 0 || i == SOCKET_ERROR)
return SOCKET_ERROR;
if(pack[0] == 0x05 && pack[1] == 0x00)
return s;
closesocket(s);
return 0;
}
с HTTP ничего мудрить не надо.
Чек и проверка типа прокси
http://forum.devisible.ru/showthread.php?t=270

Береш снифер заходиш на ту страницу которую ты накручивать собрался, потом дублируеш отснифанный запрос в цикле, меняя прокси.

В делфи все так же.
 
Ответить с цитированием

  #4  
Старый 04.03.2009, 23:30
Tigger
Познавший АНТИЧАТ
Регистрация: 27.08.2007
Сообщений: 1,107
Провел на форуме:
5386281

Репутация: 1177


Отправить сообщение для Tigger с помощью ICQ
По умолчанию

Я не понимаю тебя... Если пауза на 15 секунд, то чем тебя PHP не устраивает?
 
Ответить с цитированием

  #5  
Старый 05.03.2009, 22:07
De-visible
Banned
Регистрация: 06.01.2008
Сообщений: 904
Провел на форуме:
4037638

Репутация: 1821


Отправить сообщение для De-visible с помощью ICQ
По умолчанию

Цитата:
Сообщение от Tigger  
Я не понимаю тебя... Если пауза на 15 секунд, то чем тебя PHP не устраивает?
везде толкаем PHP??? разделом ошиблись молодой человек =/

Тему удалю, если не увижу твои же старания, примеры реализаций и т.д., это не раздел советов... вам на ксакеп:-D
 
Ответить с цитированием

  #6  
Старый 06.03.2009, 18:57
GlooK
Участник форума
Регистрация: 20.04.2007
Сообщений: 174
Провел на форуме:
2310282

Репутация: 149
По умолчанию

Моя заготовка.
Реализация с использованием idHTTP.

http://rapidshare.com/files/206048721/code.zip.html
 
Ответить с цитированием

  #7  
Старый 14.03.2009, 02:53
t04
Участник форума
Регистрация: 10.01.2007
Сообщений: 140
Провел на форуме:
246020

Репутация: 105
По умолчанию

кто может на сокетах сделать норм пример для делф?
 
Ответить с цитированием
Ответ



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Продам акки вконтакте [FREE] Покупка, продажа, услуги в Соц. Сетях 57 27.03.2009 22:08
Active Perl через проксю Elekt Анонимность 7 10.03.2008 22:14
Отправка почты через TNMSMTP {Delphi 5} D1mOn С/С++, C#, Delphi, .NET, Asm 4 22.03.2006 17:24
Взлом через cookie k00p3r Чужие Статьи 0 13.06.2005 13:56
Получение шела через Cgi приложения k00p3r Чужие Статьи 0 08.06.2005 15:04



Здесь присутствуют: 1 (пользователей: 0 , гостей: 1)
 


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




ANTICHAT.XYZ