Форум программистов, компьютерный форум, киберфорум
PHP: API, боты
Войти
Регистрация
Восстановить пароль
Блоги Сообщество Поиск Заказать работу  
 
Рейтинг 4.62/13: Рейтинг темы: голосов - 13, средняя оценка - 4.62
 Аватар для Muhammad97
10 / 10 / 2
Регистрация: 10.11.2013
Сообщений: 238
VK API

Не удается добавить пост на стену

06.07.2014, 15:29. Показов 2467. Ответов 2
Метки нет (Все метки)

Студворк — интернет-сервис помощи студентам
Пытаюсь отправить пост на стену:

PHP
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
<?php
 
function wparse($s, $starts, $ends){
   $result=substr($s, strpos($s, $starts)+strlen($starts), strpos($s, $ends)-strpos($s, $starts)-strlen($starts));
   return $result;
}
 
function GET($url)
{
  $useragent='Mozilla/5.0 (Windows; U; Windows NT 5.1; en-US; rv:1.9.0.3) Gecko/2008092417 Firefox/3.0.3';
 
 
  $ch = curl_init();
  curl_setopt($ch, CURLOPT_URL, $url);
  curl_setopt($ch, CURLOPT_RETURNTRANSFER, 1);
  curl_setopt($ch, CURLOPT_HEADER, true);
  curl_setopt($ch, CURLOPT_SSL_VERIFYPEER, 0);
  curl_setopt($ch, CURLOPT_SSL_VERIFYHOST, 0);
  $result=curl_exec($ch);
curl_close($ch);
  
  return $result;
}
 
  $login = 'xxx';
  $pass = '000';
 
  $url = 'https://oauth.vk.com/token?grant_type=password&client_id=2274003&client_secret=hHbZxrka2uZ6jB1inYsH&username='.$login.'&password='.$pass.'&captcha_key=&captcha_sid=';
 
  $response = GET($url);
 
  echo $response.'<br>';
  
  $token = wparse($response, '"access_token":"', '","expires_in"');
 
  echo $token.'<br>';
 
  $url = 'https://api.vk.com/method/wall.post?owner_id=-xxxxxx&message=QWERTY&attachments=photo210154979_33207xxxx&access_token='.$token;
 
  $response = GET($url);
 
  echo $response;
 
 
?>
Парсит токен, но не постит. Этот же запрос в Delphi работает нормально:

Delphi
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
function GET(url: string): string;
var
  HTTP : THTTPSend;
  response: TStringList;
begin
  HTTP := THTTPSend.Create;
 
  if HTTP.HTTPMethod('GET',url) then
  begin
    response := TStringList.Create;
    response.LoadFromStream(http.Document);
    result:=response.Text;
  end
  else
  result:='Error';
 
  HTTP.Headers.Clear;
  HTTP.Free;
end;
 
...
 
login:=Edit1.Text;
  pass:=Edit2.Text;
 
  url:='https://oauth.vk.com/token?grant_type=password&client_id=2274003&client_secret=hHbZxrka2uZ6jB1inYsH&username='+login+'&password='+pass+'&captcha_key=&captcha_sid=';
 
  response:=GET(url);
 
  Memo1.Lines.Add(response);
 
  token:=Cut(response, '{"access_token":"', '","expires_in":', 1);
  Memo1.Lines.Add(token);
 
  //С вложением
  //url:='https://api.vk.com/method/wall.post?owner_id=-xxxxxx&message=QWERTY&attachments=photo210154979_33207xxxx&access_token='+token;
 
  response:=GET(url);
 
  Memo1.Lines.Add(response);
0
IT_Exp
Эксперт
34794 / 4073 / 2104
Регистрация: 17.06.2006
Сообщений: 32,602
Блог
06.07.2014, 15:29
Ответы с готовыми решениями:

VK пост фото на стену сообщества
saveWallPhoto возвращает id, из которого потом собирается ссылка для метода wall.Post в в формате...

Пост на стену, юзаем VkNet
Уже 3 день ломаю голову над тем, как правильно сделать пост на стену вк с помощью VkNet. Документацию толком не нашел по этой библиотеке,...

Добавить пост и прибавить значение
Доброй ночи! Думал разберусь сам, но сам себя и запутал... В общем есть две таблицы одной базы user и post. Стоит задача при отпрвке...

2
F́́́́́́́ŕ́́́́́́́é́́́ ́ak
 Аватар для Tatikoma
260 / 224 / 109
Регистрация: 07.07.2014
Сообщений: 965
09.07.2014, 10:38
Muhammad97, а какой ответ приходит от сервера?
0
 Аватар для Muhammad97
10 / 10 / 2
Регистрация: 10.11.2013
Сообщений: 238
09.07.2014, 12:12  [ТС]
Проблема решена, дело было в домене, нужно использовать api.vkontakte.ru, а не vk.com
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
BasicMan
Эксперт
29316 / 5623 / 2384
Регистрация: 17.02.2009
Сообщений: 30,364
Блог
09.07.2014, 12:12
Помогаю со студенческими работами здесь

Как добавить изображения в пост с админки?
Всем привет! Прошу совета. Стоит задача вывода данных в таком виде: Текст Картинка Текст Картинка Текст ...........

vBulletin 3.8.3 - как добавить HTML таблицу в пост?
Кто-нить может подсказать какую крутку крутить и где чтобы добавить HTML таблицу в пост? Иногда нужно вывести в посте списки. КАК...

Не удается добавить сервер в AD
Всем привет. Нужна ваша помощь. Мне нужно в локальную группу администраторов сервера(где стоит AD) добавить доменные учетные записи....

Не удается добавить данные в таблицу
Вот код страницы добавления сотрудника поликлиники. Приведен полностью. Подскажите, почему не удается добавить запись в phpmyadmin? ...

Не удаётся добавить ссылку на проект
Уважаемые форумчане, требуется Ваша помощь! В вижуал студии создал два проекта с названиями А и В по форме в каждом. Чтобы вызвать...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
3
Ответ Создать тему
Новые блоги и статьи
Знаешь почему 90% людей редко бывают счастливыми?
kumehtar 14.04.2026
Потому что они ждут. Ждут выходных, ждут отпуска, ждут удачного момента. . . а удачный момент так и не приходит.
Фиксация колонок в отчете СКД
Maks 14.04.2026
Фиксация колонок в СКД отчета типа Таблица. Задача: зафиксировать три левых колонки в отчете. Процедура ПриКомпоновкеРезультата(ДокументРезультат, ДанныеРасшифровки, СтандартнаяОбработка) / / . . .
Настройки VS Code
Loafer 13.04.2026
{ "cmake. configureOnOpen": false, "diffEditor. ignoreTrimWhitespace": true, "editor. guides. bracketPairs": "active", "extensions. ignoreRecommendations": true, . . .
Оптимизация кода на разграничение прав доступа к элементам формы
Maks 13.04.2026
Алгоритм из решения ниже реализован на нетиповом документе, разработанного в конфигурации КА2. Задачи, как таковой, поставлено не было, проделанное ниже исключительно моя инициатива. Было так:. . .
Контроль заполнения и очистка дат в зависимости от значения перечислений
Maks 12.04.2026
Алгоритм из решения ниже реализован на примере нетипового документа "ПланированиеПерсонала", разработанного в конфигурации КА2. Задача: реализовать контроль корректности заполнения дат назначения. . .
Архитектура слоя интернета для сервера-слоя.
Hrethgir 11.04.2026
В продолжение https:/ / www. cyberforum. ru/ blogs/ 223907/ 10860. html Знаешь что я подумал? Раз мы все источники пишем в голове ветки, то ничего не мешает добавить в голову такой источник, который сам. . .
Подстановка значения реквизита справочника в табличную часть документа
Maks 10.04.2026
Алгоритм из решения ниже реализован на примере нетипового документа "ПланированиеПерсонала", разработанного в конфигурации КА2. Задача: при выборе сотрудника (справочник Сотрудники) в ТЧ документа. . .
Очистка реквизитов документа при копировании
Maks 09.04.2026
Алгоритм из решения ниже применим как для типовых, так и для нетиповых документов на самых различных конфигурациях. Задача: при копировании документа очищать определенные реквизиты и табличную. . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2026, CyberForum.ru