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

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

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

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

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

Закрытая тема
Ваша тема закрыта, почему это могло произойти? Возможно,
Нет наработок или кода, если нужно готовое решение - создайте тему в разделе Фриланс и оплатите работу.
Название темы включает слова - "Помогите", "Нужна помощь", "Срочно", "Пожалуйста".
Название темы слишком короткое или не отражает сути вашего вопроса.
Тема исчерпала себя, помните, один вопрос - одна тема
Прочитайте правила и заново правильно создайте тему.
 
Опции темы Поиск в этой теме
Старый 25.07.2007, 18:06   #31
CoDeR
Пользователь
 
Регистрация: 04.07.2007
Сообщений: 76
По умолчанию

Чтобы прога как браузер определялась надо что-то такое написать:
Код:
idhttp1.Request.Referer:=' http://izobilnik.ru/random11.aspx';
idhttp1.Request.AcceptLanguage:=' ru-ru';
idhttp1.Request.Host:= 'izobilnik.ru';
idhttp1.Request.ProxyConnection:=' Keep-Alive';
idhttp1.Request.UserAgent:=' Mozilla/4.0 (compatible; Opera 12; Linux 2.4.20-bf2.4 i686; SV1; Mozilla/4.0 (compatible; MSIE 6.0; Windows NT 5.1; SV1) ; .NET CLR 1.1.4322; .NET CLR 2.0.50727; FDM; MEGAUPLOAD 2.0)';
idhttp1.Request.ContentType:='application/x-www-form-urlencoded';
Вообщем вот пример запроса, не знаю что и как там нужно передать (это лишь на один из запросов)
Код:
GET http://izobilnik.ru/start01.aspx HTTP/1.0
Accept: */*
Referer: http://izobilnik.ru/random11.aspx
Accept-Language: ru-ru
Proxy-Connection: Keep-Alive
User-Agent: Mozilla/4.0 (compatible; Opera 12; Linux 2.4.20-bf2.4 i686; SV1; Mozilla/4.0 (compatible; MSIE 6.0; Windows NT 5.1; SV1) ; .NET CLR 1.1.4322; .NET CLR 2.0.50727; FDM; MEGAUPLOAD 2.0)
Host: izobilnik.ru
Pragma: no-cache
Cookie: ASP.NET_SessionId=p8gdrt29qb0mu251524pddbbd
Про WSASend ещё не понял, но кажется мне, что для WSASend с сокетами нужно работать.
http://wmhelpers.narod.ru/ - сайт программ, помогающими получить немного денег.
CoDeR вне форума
Старый 26.07.2007, 09:46   #32
FAiver
Пользователь
 
Аватар для FAiver
 
Регистрация: 13.07.2007
Сообщений: 60
По умолчанию

Спасибо огромное!!! за помощь... хоть теперь разобрался!
и маленький второй вопрос дело в том что там есть вторые cookie кажись они не меняются...
вот так будет работать?
idHTTP1.CookieManager.AddCookie2();
FAiver вне форума
Старый 26.07.2007, 18:47   #33
CoDeR
Пользователь
 
Регистрация: 04.07.2007
Сообщений: 76
По умолчанию

Всё равно у меня не получается. Добавил все Request, отправляю запрос на первую страницу и всё равно выдаёт ту же ошибку.
http://wmhelpers.narod.ru/ - сайт программ, помогающими получить немного денег.
CoDeR вне форума
Старый 26.07.2007, 22:43   #34
FAiver
Пользователь
 
Аватар для FAiver
 
Регистрация: 13.07.2007
Сообщений: 60
По умолчанию

Значит наверное на сокетах работать будет...
к сожалению... я с ними ещё не разбирался...
FAiver вне форума
Старый 27.07.2007, 19:43   #35
CoDeR
Пользователь
 
Регистрация: 04.07.2007
Сообщений: 76
По умолчанию

Пробовал написать другую прогу для подобной работы в сети и выяснил что:
Код:
zap.Add('InputButton.x='+FloatToStr(random(100)));
zap.Add('InputButton.y='+FloatToStr(random(100)));
не нужно, видимо это из-за снифера появляется. А с этим выдаёт ошибку ту которая и выдавалась.

Код:
s:=idhttp1.Post('http://izobilnik.ru/random11.aspx',zap);
здесь, после этого запроса сайт перекидывает на другую страницу, и в этот момент вылетает ошибка.

Вопрос: Как сделать чтобы программа переходила без ошибки на ту страницу на которую её посылает сайт и в момент перехода отправляла post запрос? С idHttp конечно...
http://wmhelpers.narod.ru/ - сайт программ, помогающими получить немного денег.
CoDeR вне форума
Старый 27.07.2007, 20:51   #36
FAiver
Пользователь
 
Аватар для FAiver
 
Регистрация: 13.07.2007
Сообщений: 60
По умолчанию

отвечу на первый вопрос про
Код:
zap.Add('InputButton.x='+FloatToStr(random(100)));
zap.Add('InputButton.y='+FloatToStr(random(100)));
это я так понимаю был один из вариантов защиты от программ на том сайте данные передоваимые в этих строках на что иное как координата нажатия на кнопку! причим координата относительно самой кнопки для этого я и сделал random что бы эмулировать клик в случайную координату на кнопке.
а вот со вторым вопросом сложнее дело в том что я смотрел куда меня перекидывает из браузера... и составлял запрос уже для той страницы.
FAiver вне форума
Старый 27.07.2007, 21:28   #37
trafbite
Форумчанин
 
Регистрация: 21.07.2007
Сообщений: 103
По умолчанию

Вот еще вопрос, вот полный код процедуры:

procedure TForm1.Button1Click(Sender: TObject);
var
PIInfo: PInternetProxyInfo;
begin
New(PIInfo);
PIInfo^.dwAccessType := INTERNET_OPEN_TYPE_PROXY;
// Èçìåíåíèå íàñòðîåê ÏÐÎÊÑÈ
PIInfo^.lpszProxy := PChar('203.69.39.251:80');
// óêàçàòü ïðîêñè íàïð.
PIInfo^.lpszProxyBypass := PChar('');
// Ñïèñîê àäðåñîâ, äîñòóï ê êîòîðûì âîçìîæåí ìèíóÿ Proxy ñåðâåð
UrlMkSetSessionOption(INTERNET_OPTI ON_PROXY, piinfo, SizeOf(Internet_Proxy_Info), 0);
Dispose(PIInfo);
webbrowser1.navigate('http://lifchikov.net/dimaslenin.html');
end;

при работе программы, она выкидывает не на указанную страницу, а вообще непонятно на какой сайт...там какой-то серч..Это что значит?
trafbite вне форума
Старый 27.07.2007, 22:36   #38
CoDeR
Пользователь
 
Регистрация: 04.07.2007
Сообщений: 76
По умолчанию

trafbite, на досуг кидает. А ты используешь прокси. Там определяет какой у тебя IP, а он не российский и видимо кидает на другую страницу из-за этого! Меняй прокси!

FAiver, да тоже посчитал что защита, но в другой моей проге из-за этого выскакивала ошибка. Убрал и заработало!

Продолжаю смотреть программу:
Код:
zap.Add('AccountRadioButtonList='+'0');
что это и зачем посылается на главную страницу?


А как вообще можно послать запрос который в "zap" методом get, а не post?

Кстати каким снифером пользуешься?
http://wmhelpers.narod.ru/ - сайт программ, помогающими получить немного денег.
CoDeR вне форума
Старый 27.07.2007, 22:51   #39
trafbite
Форумчанин
 
Регистрация: 21.07.2007
Сообщений: 103
По умолчанию

CoDeR, а можно как-нить определить к какой стране принадлежит IP? У меня есть список общедоступных прокси и мне нужно, что бы я заходил на этот досуг под разными IP. Как-нить можно реализовать это?

пысы: блин, почему вы все не используете Indy, а именно Internet?
trafbite вне форума
Старый 27.07.2007, 22:59   #40
CoDeR
Пользователь
 
Регистрация: 04.07.2007
Сообщений: 76
По умолчанию

trafbite, можно. Есть специальные проги которые проверяют живой ли прокси и пишут какой страны. Не спрашивай какие, не пользуюсь сейчас и не помню. Можно поискать где-нибудь список чисто российских прокси. Но российских не так много живых...
Internet?!?!? Вот какраз в этой теме Indy использую!
http://wmhelpers.narod.ru/ - сайт программ, помогающими получить немного денег.
CoDeR вне форума
Закрытая тема


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



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
WebBrowser POST micq Компоненты Delphi 5 19.09.2008 21:37
post запрос Editor Работа с сетью в Delphi 4 20.04.2008 14:01
POST Stanislav Работа с сетью в Delphi 3 03.03.2008 18:05
Все тот же IdHTTP (Post) AVer Работа с сетью в Delphi 5 28.09.2007 10:40
HTTP POST SJMS Работа с сетью в Delphi 15 30.05.2007 13:36