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

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

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

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

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

Ответ
 
Опции темы Поиск в этой теме
Старый 27.07.2011, 02:44   #11
temchik2004
 
Регистрация: 28.11.2010
Сообщений: 8
По умолчанию

Код:
procedure TForm2.Button5Click(Sender: TObject);
var vkontakteavtorizacija,otvet:tstringlist;
begin
vkontakteavtorizacija:=TStringList.Create;
otvet:=TStringList.Create;
try
idhttp1.Get('http://vkontakte.ru');
vkontakteavtorizacija.Add('email='+edit1.Text);
vkontakteavtorizacija.Add('pass='+edit2.Text);
otvet.Text:=idhttp1.Post('http://login.vk.com/?act=login',vkontakteavtorizacija);
finally
vkontakteavtorizacija.free;
otvet.free;
end;
end;
но при этом у меня
idHTTP1.HandleRedirects:= True;
idHTTP1.iohandler:=IdSSLIOHandlerSo cketOpenSSL1;
temchik2004 вне форума Ответить с цитированием
Ответ


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



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Паскаль, строки. Не могу найти ошибку в коде. Liam_ Помощь студентам 6 11.05.2011 19:29
Не могу найти ошибку в коде написанном на FASM Devil21RUS Assembler - Ассемблер (FASM, MASM, WASM, NASM, GoASM, Gas, RosAsm, HLA) и не рекомендуем TASM 8 12.12.2010 04:52
не могу найти ошибку в коде pavelstraut Общие вопросы C/C++ 5 24.07.2009 23:20
Не могу найти ошибку в скрипте авторизации Revival001 PHP 8 26.06.2009 10:57
Не могу найти ошибку в коде! Natasha666 Помощь студентам 1 20.05.2009 09:27