Выгрузка номенклатуры в социальную сеть Вконтакте
Комментарии
В избранное
Подписаться на ответы
Сортировка:
Древо развёрнутое
Свернуть все
(3) Здравствуйте! Подскажите, пожалуйста, я правильно понимаю, что для данной обработки необходимо, чтобы 1с размещался на хостинге а не на пк? Извиняюсь, если вопрос глупый, не особо еще разбираюсь в 1с. Просто одна из задач внедрения 1с стоит как раз в выгрузке товаров на сайт и в вк. Спасибо!
Выглядит с первого взгляда, как что-то интересное :-) Правда, лично у меня есть сомнения в её востребованности, по той простой причине, что ВКонтакте не воспринимается большинством людей как торговая площадка, по моему скромному мнению.
(4) Отчасти, согласен. Лично я тоже не особо воспринимаю магазин(категория - товары, в группе). Однако у нас в ДНР, очень много розничных предприятий которые заводят группы и публикуют там свои товары, вот и подумал может кроме "наших", в мире тоже кто-то так делает))) Ну, за одно и познакомился с API ВКонтакте...
У всех таких публикаций есть общая беда - они косячат при попытке подключиться к ВК. На этапе авторизации. Я 2-3 таких скачал, обломался и плюнул. Автор, если не сложно, можете подробнее описать, как в вашем случае сделана авторизация?
(9)
Доброй ночи. Авторизацию, а именно получение "токена", делал просто:
На форме создаем поле HTML документа, указываем у него ПутьКДанным - ссылаемся на реквизит формы/объекта(не важно с типом строка).
Ну далее отправляем по нужно url, а короче вот код, думаю разберешься:
P.S. У меня кстати тоже не сразу, вышло... Но голова уже забита другим, не помню в чем была проблема, а не кажись вспомнил, где-то я подглядел и там был в url указан такой параметр &redirect_uri=http://api.vk.com/blank.html, а нужно указать так - &redirect_uri=https://api.vk.com/blank.html, как говорится найди 10 отличий :D
Доброй ночи. Авторизацию, а именно получение "токена", делал просто:
На форме создаем поле HTML документа, указываем у него ПутьКДанным - ссылаемся на реквизит формы/объекта(не важно с типом строка).
Ну далее отправляем по нужно url, а короче вот код, думаю разберешься:
&НаСервере
Процедура ПриСозданииНаСервере(Отказ, СтандартнаяОбработка)
ПЕРЕМ ИДПриложения;
//
Если НЕ Параметры.Свойство("ИДПриложения", ИДПриложения)
ИЛИ НЕ ЗначениеЗаполнено(ИДПриложения) Тогда
Отказ = Истина;
КонецЕсли;
//
АдресURL = "https://oauth.vk.com/authorize"
+ "?client_id=" + ИДПриложения + "" // Идентификатор Вашего приложения.
+ "&redirect_uri=https://api.vk.com/blank.html" // Адрес, на который будет переадресован пользователь после прохождения авторизации
+ "&display=page" // Указывает тип отображения страницы авторизации. (page — форма авторизации в отдельном окне; popup — всплывающее окно; mobile — авторизация для мобильных устройств (без использования Javascript))
+ "&scope=wall,groups,photos,market,offline" // Битовая маска настроек доступа приложения (
+ "&response_type=token" // Тип ответа, который необходимо получить. Укажите token.
+ "&state=" // Произвольная строка, которая будет возвращена вместе с результатом авторизации.
+ "&revoke=1" // Параметр, указывающий, что необходимо не пропускать этап подтверждения прав, даже если пользователь уже авторизован.
+ ""
;
КонецПроцедуры // ПриСозданииНаСервере
&НаКлиенте
Процедура HTMLДокументСформирован(Элемент)
ПЕРЕМ КлючДоступаПользователя;
//
Если Элемент.Документ.Location.host = "api.vk.com" Тогда
//маПараметры = СтроковыеФункцииКлиентСервер.РазложитьСтрокуВМассивПодстрок(Сред(Элемент.Документ.Location.hash, 2), "&");
маПараметры = СтрРазделить(Сред(Элемент.Документ.Location.hash, 2), "&");
Для Каждого Параметр ИЗ маПараметры Цикл
Сообщить(Параметр);
Позиция = СтрНайти(Параметр, "=");
Если Позиция > 0
И НРег(СокрЛП(Лев(Параметр, Позиция - 1))) = "access_token" Тогда
КлючДоступаПользователя = СокрЛП(Сред(Параметр, Позиция + 1));
Прервать;
КонецЕсли;
КонецЦикла;
Закрыть(КлючДоступаПользователя);
КонецЕсли;
КонецПроцедуры // HTMLДокументСформирован
ПоказатьP.S. У меня кстати тоже не сразу, вышло... Но голова уже забита другим, не помню в чем была проблема, а не кажись вспомнил, где-то я подглядел и там был в url указан такой параметр &redirect_uri=http://api.vk.com/blank.html, а нужно указать так - &redirect_uri=https://api.vk.com/blank.html, как говорится найди 10 отличий :D
Здравствуйте, пробовал вашу обработку на Рознице редакция 2.2 (2.2.11.24) выходит ошибка при выгрузке товаров без изображений
Ошибка выполнения запроса, код ошибки - 100 (One of the parameters specified was missing or invalid: main_photo_id is undefined). Подробности см. на:
Далее идет информация для программиста.
{"error":{"error_code":100,"error_msg":"One of the parameters specified was missing or invalid: main_photo_id is undefined","request_params":[{"key":"method","value":"market.add"},{"key":"oauth","value":"1"},{"key":"","value":""},{"key":"owner_id","value":"-166466472"},{"key":"name","value":"Валик-резинка черный\n40"},{"key":"description","value":"Валик-резинка черный\n40"},{"key":"category_id","value":"103"},{"key":"price","value":"40.00"},{"key":"main_photo_id","value":""},{"key":"photo_ids","value":""},{"key":"v","value":"5.101"}]}}
Возможно ли сделать выгрузки без изображений?
Ошибка выполнения запроса, код ошибки - 100 (One of the parameters specified was missing or invalid: main_photo_id is undefined). Подробности см. на:
Далее идет информация для программиста.
{"error":{"error_code":100,"error_msg":"One of the parameters specified was missing or invalid: main_photo_id is undefined","request_params":[{"key":"method","value":"market.add"},{"key":"oauth","value":"1"},{"key":"","value":""},{"key":"owner_id","value":"-166466472"},{"key":"name","value":"Валик-резинка черный\n40"},{"key":"description","value":"Валик-резинка черный\n40"},{"key":"category_id","value":"103"},{"key":"price","value":"40.00"},{"key":"main_photo_id","value":""},{"key":"photo_ids","value":""},{"key":"v","value":"5.101"}]}}
Возможно ли сделать выгрузки без изображений?
Добрый день!
Отличная обработка , в УТ 11,4 работает, авторизуется без проблем
Но есть , тем не менее, несколько нюансов
1. У нас товар с характеристиками.
В прайсе для розницы цена указана на характеристику ( размер)
В рамках артикула - все цены на размеры одинаковы
- Можно сделать, чтобы цена цеплялась из характеристики?
2, Выгрузка изображений
Изображения из уТ выгружаются .
Но - Превью в товарах и (на странице и в альбоме) - обрезанные
То есть - картинка из 1с некорректно обрабатывается в ВК
можно это как-то побороть?
И отбор желательно сделать более понятным для сотрудника - менеджера
Готов пообщаться в личке
спасибо
Отличная обработка , в УТ 11,4 работает, авторизуется без проблем
Но есть , тем не менее, несколько нюансов
1. У нас товар с характеристиками.
В прайсе для розницы цена указана на характеристику ( размер)
В рамках артикула - все цены на размеры одинаковы
- Можно сделать, чтобы цена цеплялась из характеристики?
2, Выгрузка изображений
Изображения из уТ выгружаются .
Но - Превью в товарах и (на странице и в альбоме) - обрезанные
То есть - картинка из 1с некорректно обрабатывается в ВК
можно это как-то побороть?
И отбор желательно сделать более понятным для сотрудника - менеджера
Готов пообщаться в личке
спасибо
Прикрепленные файлы:
пример загрузки изображений.pdf
При открытии в 1с 8.3.14.1565 УТ 10.3.47.3:
ОШИБКА:
{ВнешняяОбработка.ПубликацияТоваровВСоциальнуюСетьVK.МодульОбъекта(27,25)}: Переменная не определена (ДополнительныеОтчетыИОбработки)
ПараметрыРегистрации = <<?>>ДополнительныеОтчетыИОбработки.СведенияОВнешнейОбработке();
{ВнешняяОбработка.ПубликацияТоваровВСоциальнуюСетьVK.МодульОбъекта(34,39)}: Переменная не определена (ДополнительныеОтчетыИОбработкиКлиентСервер)
ПараметрыРегистрации.Вставить("Вид", <<?>>ДополнительныеОтчетыИОбработкиКлиентСервер.ВидОбработкиДополнительнаяОбработка());
{ВнешняяОбработка.ПубликацияТоваровВСоциальнуюСетьVK.МодульОбъекта(42,6)}: Переменная не определена (ДополнительныеОтчетыИОбработкиКлиентСервер)
<<?>>ДополнительныеОтчетыИОбработкиКлиентСервер.ТипКомандыОткрытиеФормы());
{ВнешняяОбработка.ПубликацияТоваровВСоциальнуюСетьVK.МодульОбъекта(485,21)}: Процедура или функция с указанным именем не определена (СтрСоединить)
СтрокаПараметров = <<?>>СтрСоединить(МассивПараметров, "&");
{ВнешняяОбработка.ПубликацияТоваровВСоциальнуюСетьVK.МодульОбъекта(561,23)}: Процедура или функция с указанным именем не определена (СтрНайти)
ПротоколПозиция = <<?>>СтрНайти(Гиперссылка, "://");
{ВнешняяОбработка.ПубликацияТоваровВСоциальнуюСетьVK.МодульОбъекта(569,18)}: Процедура или функция с указанным именем не определена (СтрНайти)
СерверПозиция = <<?>>СтрНайти(Гиперссылка, "/", , нПозиция);
{ВнешняяОбработка.ПубликацияТоваровВСоциальнуюСетьVK.МодульОбъекта(581,15)}: Процедура или функция с указанным именем не определена (СтрНайти)
ХешПозиция = <<?>>СтрНайти(Гиперссылка, "#");
ОШИБКА:
{ВнешняяОбработка.ПубликацияТоваровВСоциальнуюСетьVK.МодульОбъекта(27,25)}: Переменная не определена (ДополнительныеОтчетыИОбработки)
ПараметрыРегистрации = <<?>>ДополнительныеОтчетыИОбработки.СведенияОВнешнейОбработке();
{ВнешняяОбработка.ПубликацияТоваровВСоциальнуюСетьVK.МодульОбъекта(34,39)}: Переменная не определена (ДополнительныеОтчетыИОбработкиКлиентСервер)
ПараметрыРегистрации.Вставить("Вид", <<?>>ДополнительныеОтчетыИОбработкиКлиентСервер.ВидОбработкиДополнительнаяОбработка());
{ВнешняяОбработка.ПубликацияТоваровВСоциальнуюСетьVK.МодульОбъекта(42,6)}: Переменная не определена (ДополнительныеОтчетыИОбработкиКлиентСервер)
<<?>>ДополнительныеОтчетыИОбработкиКлиентСервер.ТипКомандыОткрытиеФормы());
{ВнешняяОбработка.ПубликацияТоваровВСоциальнуюСетьVK.МодульОбъекта(485,21)}: Процедура или функция с указанным именем не определена (СтрСоединить)
СтрокаПараметров = <<?>>СтрСоединить(МассивПараметров, "&");
{ВнешняяОбработка.ПубликацияТоваровВСоциальнуюСетьVK.МодульОбъекта(561,23)}: Процедура или функция с указанным именем не определена (СтрНайти)
ПротоколПозиция = <<?>>СтрНайти(Гиперссылка, "://");
{ВнешняяОбработка.ПубликацияТоваровВСоциальнуюСетьVK.МодульОбъекта(569,18)}: Процедура или функция с указанным именем не определена (СтрНайти)
СерверПозиция = <<?>>СтрНайти(Гиперссылка, "/", , нПозиция);
{ВнешняяОбработка.ПубликацияТоваровВСоциальнуюСетьVK.МодульОбъекта(581,15)}: Процедура или функция с указанным именем не определена (СтрНайти)
ХешПозиция = <<?>>СтрНайти(Гиперссылка, "#");
Здравствуйте! Попробовал Вашу обработку на УТ 11.4.7.128. После попытки публикации единственного товара на стене выдает ошибку Ошибка выполнения запроса, код ошибки - 100 (One of the parameters specified was missing or invalid: photos_list is invalid). Подробности см. на:
Далее идет информация для программиста.
{"error":{"error_code":100,"error_msg":"One of the parameters specified was missing or invalid: photos_list is invalid","request_params":[{"key":"method","value":"photos.saveWallPhoto"},{"key":"oauth","value":"1"},{"key":"","value":""},{"key":"photo","value":"[]"},{"key":"server","value":"204824"},{"key":"hash","value":"359cfe289cea3aeb8a0895332d666710"},{"key":"caption","value":"Тестовая выгрузка"},{"key":"v","value":"5.101"}]}}. Куда смотреть?
Далее идет информация для программиста.
{"error":{"error_code":100,"error_msg":"One of the parameters specified was missing or invalid: photos_list is invalid","request_params":[{"key":"method","value":"photos.saveWallPhoto"},{"key":"oauth","value":"1"},{"key":"","value":""},{"key":"photo","value":"[]"},{"key":"server","value":"204824"},{"key":"hash","value":"359cfe289cea3aeb8a0895332d666710"},{"key":"caption","value":"Тестовая выгрузка"},{"key":"v","value":"5.101"}]}}. Куда смотреть?
(34) Разобрались. Имена файлов изображений должны быть на латинице. Но возникла другая проблема. При двухфакторной аутентификации не показывается окно от ВК, а 1с генерирует окно с вводом имени пользователя и пароля. Вводим, жмем на ок и вновь появляется окно ввода пользователя и пароля от 1с... Ни приглашения ввести код доступа, ничего.
В общем, сам уже добавил. )
Необходимо строки
Заменить на
и добавить функцию
Необходимо строки
ЗаписьДанных.ЗаписатьСтроку(СтрШаблон("Content-Disposition: form-data; name=photo; filename=%1.%2", ИзображениеНоменклатуры.Наименование, ИзображениеНоменклатуры.Расширение));Заменить на
ЗаписьДанных.ЗаписатьСтроку(СтрШаблон("Content-Disposition: form-data; name=photo; filename=%1.%2", ВычислитьMD5(ИзображениеНоменклатуры.Наименование), ИзображениеНоменклатуры.Расширение));и добавить функцию
&НаСервере
Функция ВычислитьMD5(Данные)
ХэшированиеДанных = Новый ХешированиеДанных(ХешФункция.MD5);
ХэшированиеДанных.Добавить(Данные);
Хэш = НРег(СтрЗаменить(ХэшированиеДанных.ХешСумма, " ", ""));
Возврат Хэш;
КонецФункции
Показать
Вопросы с вознаграждением
|
|
|
||
|
|
|
||
|
|
|
||
|
|
|
||
|
|
|
||
|
|
|
||
|
|
|
||
|
|
|
||
|
|
|
||
|
|
|
||
|
|
|
||
|
|
|
||
|
|
|
||
|
|
|
||
|
|
|
||
|
|
|
||
|
|
|
||
|
|
|
||
|
|
|
||
|
|
|