Версия для печати темы (https://pro1c.org.ua/index.php?s=0ed8b522d7bda6c9eaca54e8be1c0d52&showtopic=66515)

Нажмите сюда для просмотра этой темы в обычном формате

Украинский 1С форум: всё про 1С 8.3, 1С 8.2, 1С 8.1, 1С 8.0, 1С 7.7 _ Мобильная платформа 1С _ З мобільного додатка відправити щось у Viber

Автор: vbi 26.05.21, 14:55

Мобільна платформа 8.3.14.78 Сборщик: 2.0.11.36, Платформа 8.3.14.1976

Доброго дня! Чи є якась можливість по кнопці з мобільного додатку відправити якийсь текст у Вайбер? Напряму, або не напряму а вибрати групу чи контакт, вибрав і відправився текст. Або може якось через "Поділитися"?

Автор: logist 26.05.21, 15:37

Не напрямую: ищите провайдера который отправляет сообщения на вайбер, берете у него апи и реализовываете, отправка за деньги и только конкретному контакту, плюс если вы не покупаете 40000 сообщений в месяц, то своё имя отправителя использовать не сможете.
Напрямую: https://pro1c.org.ua/redirect.php?https://developers.viber.com/docs/api/rest-bot-api/ или поищите документацию по chatapi.viber.com

Автор: vbi 26.05.21, 15:54

logist @ Сегодня, 15:37 * ,
Спасибо, разобрался сам, только что проверил - работает:

&НаКлиенте
Процедура ТЕСТ(Команда)
    
    НовВз=Новый ЗапускПриложенияМобильногоУстройства();
    //Отправить текст по вайберу, предлагает выбрать, кому отправлять, потом сразу отправляет
    НовВз.Действие = "android.intent.action.SEND";
    НовВз.Приложение = "com.viber.voip";
    НовВз.ИмяКласса = "com.viber.voip.WelcomeShareActivity";
    НовВз.Тип = "text/plain";
    НовВз.ДополнительныеДанные.Добавить("android.intent.extra.TEXT","ТЕКСТ: Теекст-текст-текст");
    
    НовВз.Запустить(Истина);
    //НовВз.ДополнительныеДанныеЦикл

КонецПроцедуры


vbi @ Сегодня, 15:52 * ,
Так же можно отправлять конкретному человеку напрямую, отправлять фото и т. д.

//Открывает вайбер 
НовВз.Действие = "com.viber.voip.action.CONVERSATION";
//или
НовВз.Действие = "com.viber.voip.action.MESSAGES";


//Открывает список контактов в вайбере
НовВз.Действие = "android.intent.action.CALL_BUTTON";


//открывает диалог с конкретным человеком в вайбере
НовВз.Действие = "android.intent.action.SENDTO";
НовВз.Данные = "smsto:+380965336452";
НовВз.Приложение = "com.viber.voip";
НовВз.ИмяКласса = "com.viber.voip.SystemDialogActivityPublic";
//Отправить текст по вайберу, предлагает выбрать, кому отправлять, потом сразу отправляет
НовВз.Действие = "android.intent.action.SEND";
НовВз.Приложение = "com.viber.voip";
НовВз.ИмяКласса = "com.viber.voip.WelcomeShareActivity";
НовВз.Тип = "text/plain";
НовВз.ДополнительныеДанные.Добавить("android.intent.extra.TEXT","ТЕКСТ: Теекст-текст-текст");


//Отправить фото по вайберу, предлагает выбрать, кому отправлять
НовВз.Действие = "android.intent.action.SEND";
НовВз.Приложение = "com.viber.voip";
НовВз.ИмяКласса = "com.viber.voip.WelcomeShareActivity";
НовВз.Тип = "image/jpeg";
НовВз.ДополнительныеДанные.Добавить("android.intent.extra.STREAM","file:///storage/emulated/0/DCIM/100ANDRO/DSC_0001.jpg","Uri");
//Открыть контакт в вайбере
НовВз.Действие = "android.intent.action.VIEW";
НовВз.Данные = "tel:+380965336452";
НовВз.Приложение = "com.viber.voip";
НовВз.ИмяКласса = "com.viber.voip.WelcomeShareActivity";


Пример нашел на инфостарте.

Автор: mut 26.05.21, 15:57

На джаве для "поделиться" делается intent, а в 1с, насколько я понимаю это ЗапускПриложенияМобильногоУстройства.
Делаете запуск приложения "com.viber.voip", ему передаете текст, тип text/plain.

Пока писал, вижу уже и сами разобрались cool.gif

Автор: vbi 27.05.21, 13:17

Цитата
Так же можно отправлять конкретному человеку напрямую

А вот это не работает(

Украинский 1С форум: всё про 1С 8.3, 1С 8.2, 1С 8.1, 1С 8.0, 1С 7.7
https://pro1c.org.ua