Загрузка документа через VK API - Вопросы и ответы, обсуждения - Ваши вопросы по Pascal/Delphi только в данном разделе
06.08.2014, 04:38
#1
Разведчик
Регистрация: 27.10.2012
Сообщений: 24
Популярность: -183
Сказал(а) спасибо: 35
Поблагодарили 23 раз(а) в 14 сообщениях
Загрузка документа через VK API
Загружаю:
Код:
FormData := TIdMultiPartFormDataStream.Create;
FormData.AddFormField('fileldname', 'value');
FormData.AddFile('file', 'log.txt', 'multipart/form-data');
zapros:=HTTP.Post('https://api.vk.com/method/docs.getUploadServer?access_token=******',FormData);
FormData.Free;
Edit1.Text:=zapros;
Получаю ответ :
Цитата:
{"response":{"upload_url":"http:\/\/cs539618.vk.com\/upload.php?act=add_doc&mid=145530528&aid=0&gid=0&h ash=7156cb 8bec61a71516e0ea5a15c60b95&rhash=9e9217690ebadc57e dcbcb73f66 be3cf&api=1"}}
Сохраняю:
Код:
zapros:='https://api.vk.com/method/docs.save';
log:=TstringList.Create;
log.Add('file='+Edit1.Text);
log.Add('title=log');
log.Add('tags=log');
log.Add('access_token=******');
StrPage:=HTTP.Post(zapros,log);
memo1.text:=StrPage;
Получаю ответ:
Цитата:
{"error":{"error_code":5,"error_msg":"User authorization failed: no access_token passed.","request_params":[{"key":"oauth","value":"1"},{"key":"method","value ":"docs.sa ve"}]}}
Я уже понятия не имею что делать... Помогите Please.
P.S.
Загрузка: [
Ссылки могут видеть только зарегистрированные пользователи. ]
Сохранение: [
Ссылки могут видеть только зарегистрированные пользователи. ]
Добавлено через 10 часов 25 минут
Они чутка приврали...
Загрузка и сохранение происходит в 3 шага, а не в 2...
Код:
sil:=http.Get('https://api.vk.com/method/docs.getUploadServer.xml?access_token=******');
sil:=ParseStr(sil, '<upload_url>', '</upload_url>');
sil:=StringReplace(sil, 'amp;', '', [rfReplaceAll]);
FormData := TIdMultiPartFormDataStream.Create;
FormData.AddFile('file', 'D:\log.txt', 'text/plain');
load:=HTTP.Post(sil,FormData);
FormData.Free;
Load:=ParseStr(load, '{"file":"', '"}');
http.Get('https://api.vk.com/method/docs.save?file='+load+'&title=godlal&tags=godnob&access_key=3&access_token=******');
Щас всё норм работает, только вот не понятно как поменять доступ к файлу ? Всмысле что бы был не личный документ, а что бы все смогли его найти.
Добавлено через 20 часов 14 минут
Знает кто как поменять тип файла при сохранении ? (Личный документ, Учебный документ, Книга, Другой документ)
Последний раз редактировалось RamDigga; 07.08.2014 в 00:52 .
Причина: Добавлено сообщение
Пользователь сказал cпасибо:
Ваши права в разделе
Вы не можете создавать новые темы
Вы не можете отвечать в темах
Вы не можете прикреплять вложения
Вы не можете редактировать свои сообщения
HTML код Выкл.
Заявление об ответственности / Список мошенников
Часовой пояс GMT +4, время: 08:32 .