ANTICHAT — форум по информационной безопасности, OSINT и технологиям
ANTICHAT — русскоязычное сообщество по безопасности, OSINT и программированию.
Форум ранее работал на доменах antichat.ru, antichat.com и antichat.club,
и теперь снова доступен на новом адресе —
forum.antichat.xyz.
Форум восстановлен и продолжает развитие: доступны архивные темы, добавляются новые обсуждения и материалы.
⚠️ Старые аккаунты восстановить невозможно — необходимо зарегистрироваться заново.
16.05.2010, 12:47
|
|
Участник форума
Регистрация: 29.04.2010
Сообщений: 109
Провел на форуме:
160508
Репутация:
9
|
|
используй httpwebrequest инфы по нему много
|
|
|
16.05.2010, 21:03
|
|
Участник форума
Регистрация: 20.02.2010
Сообщений: 121
Провел на форуме:
496930
Репутация:
60
|
|
Ты что?
Конечно авторизуется. Так и нужно!
|
|
|
|
16.05.2010, 21:09
|
|
Постоянный
Регистрация: 29.10.2008
Сообщений: 306
Провел на форуме:
1819761
Репутация:
180
|
|
Сообщение от Berman
Ты что?
Конечно авторизуется. Так и нужно!
Нет. Проверь сам.
|
|
|
|
16.05.2010, 21:22
|
|
Участник форума
Регистрация: 23.07.2009
Сообщений: 261
Провел на форуме:
4435957
Репутация:
539
|
|
Сообщение от ArkNet
А для того чтоб получить исходный код самой страницы с анкетой что надо? 
idhttp1.Request.CustomHeaders.Add('Cookie: remixsid=' + s);
str := idhttp1.Get('http://vkontakte.ru/profile.php');
|
|
|
|
16.05.2010, 21:26
|
|
Участник форума
Регистрация: 20.02.2010
Сообщений: 121
Провел на форуме:
496930
Репутация:
60
|
|
Всё работает.
|
|
|
|
16.05.2010, 22:26
|
|
Постоянный
Регистрация: 29.10.2008
Сообщений: 306
Провел на форуме:
1819761
Репутация:
180
|
|
Сообщение от Berman
Всё работает.
У тебя же в примере '+' отправляется без urlencode, то есть, как пробел
|
|
|
|
16.05.2010, 22:38
|
|
Новичок
Регистрация: 15.05.2010
Сообщений: 26
Провел на форуме:
35421
Репутация:
5
|
|
Все получилось в Memo1 выводит код страницы.
Настройки IdHttp использовал как и Berman
Вот код.
procedure TForm1.Button1Click(Sender: TObject);
var
s,pass,str,uns: String;//переменный типа стринг
outfo: TStringList; // перменная типа стринглист
begin
pass := StringReplace(edit2.text, ' ', '+', [rfReplaceAll, rfIgnoreCase]);
outfo := TStringList.Create; //создаем пост перемменую
idhttp1.Get('http://vkontakte.ru/login.php?op=a_login_attempt'); //забераем исходный текст адресса
outfo.Add('act=login'); //создаем пост запрос
outfo.Add('email='+edit1.text); //создаем пост запрос
outfo.Add('pass='+pass); //создаем пост запрос
try
uns:=UTF8toANSI(idhttp1.post('http://login.vk.com/', outfo)); //отправляем пост запро на нужный адресс
s:=copy(uns, 286, 56); //вытягиваем 56 значную строку
finally
idhttp1.Request.CustomHeaders.Add('Cookie: remixsid=' + s); //отправляем запрос
str := idhttp1.Get('http://vkontakte.ru/profile.php'); //получаем исходник указаного адресса
Memo1.Text:=str; // Выводим в мемо исходный код страницы више указаной
IdHTTP1.Disconnect; // дисконект
end
end;
Теперь пару вопросов....
1. Что мы делаем тут idhttp1.Request.CustomHeaders.Add('Cookie: remixsid=' + s);
2. Что мы делаем тут pass := StringReplace(edit2.text, ' ', '+', [rfReplaceAll, rfIgnoreCase]);
3. Чтоб ввойти на другой аккаунт надо писать IdHTTP1.Disconnect;
4. Зачем это надо
memo1.Lines.add('Cookies: '+s);
IdCookieManager1.AddCookie('remixsid='+s+ '; path=/; ','vkontakte.ru');
Всем спасибо оказал помощь....  |
|
|
|
17.05.2010, 09:49
|
|
Участник форума
Регистрация: 23.07.2009
Сообщений: 261
Провел на форуме:
4435957
Репутация:
539
|
|
Сообщение от ArkNet
Теперь пару вопросов....
1. Что мы делаем тут idhttp1.Request.CustomHeaders.Add('Cookie: remixsid=' + s);
2. Что мы делаем тут pass := StringReplace(edit2.text, ' ', '+', [rfReplaceAll, rfIgnoreCase]);
3. Чтоб ввойти на другой аккаунт надо писать IdHTTP1.Disconnect;
4. Зачем это надо
memo1.Lines.add('Cookies: '+s);
IdCookieManager1.AddCookie('remixsid='+s+ '; path=/; ','vkontakte.ru');
Всем спасибо оказал помощь.... 1. Добавляем куки (можешь вообще не юзать куки менеджер).
4. Можешь убрать эти строчки.
|
|
|
|
17.05.2010, 22:25
|
|
Новичок
Регистрация: 15.05.2010
Сообщений: 26
Провел на форуме:
35421
Репутация:
5
|
|
При использование метода Get исходный код отображается неправильно
пример
<div id='coins_left'>? ??? <b>0</b> ????????????????
Заместь знаков вопроса должно писать "неиспользованных голосов."
Все символы кирилицы превратились в знаки вопроса, как это испарвить? |
|
|
|
|
|
Здесь присутствуют: 1 (пользователей: 0 , гостей: 1)
|
|
|
|
Линейный вид
