Показать сообщение отдельно
  #4  
Старый 13.04.2012, 21:51
metra52 metra52 вне форума
Прохожий
 
Регистрация: 04.05.2011
Сообщения: 20
Версия Delphi: Delphi 7 Lite
Репутация: 10
По умолчанию

У меня Indy 10

Запрос составляется так
Цитата:
PostVK:=TStringList.Create;
sig:=stroka1+'api_id='+idp+'format=XMLmethod=getUs erInfoExuids='+stroka1+'v=3.0'+stroka3; //подпись запроса + секрет сессии
sig:=md5(sig);
PostVK.Clear;
PostVK.Add('api_id='+idp);
PostVK.Add('v=3.0');
PostVK.Add('method=getUserInfoEx');
PostVK.Add('format=XML');
PostVK.Add('uids='+stroka1);
PostVK.Add('sid='+stroka2);
PostVK.Add('sig='+sig);
logVK:=IdHTTP1.Post('http://api.vk.com/api.php',PostVK);
PostVK.Free;
__________________
А это мое скромное радио... ((:FunFM)
Ответить с цитированием