Отсылка СМС из 1С напрямую через модем

01.03.11

Интеграция - SMS рассылки

+34 –
  • Скрин
Новые времена требуют новых идей по привлечению клиентов. Одной из таких идей является отсылка СМС конечному клиенту с сообщениями об акциях, скидках, бонусах и т.д. Можно, конечно, воспользоваться одним из платных SMS шлюзов, но цены от 75 копеек за СМС весьма непривлекательны, в то время, как отсылка СМС напрямую с SIM карты зачастую возможно вообще, либо бесплатно (например при подключенной опции "безлимит SMS"), либо за символическую сумму (у многих операторов цена за SMS меньше 5 копеек).

Файлы

ВНИМАНИЕ: Файлы из Базы знаний - это исходный код разработки. Это примеры решения задач, шаблоны, заготовки, "строительные материалы" для учетной системы. Файлы ориентированы на специалистов 1С, которые могут разобраться в коде и оптимизировать программу для запуска в базе данных. Гарантии работоспособности нет. Возврата нет. Технической поддержки нет.

Наименование Скачано Купить файл
Отсылка.ert
.ert 32,00Kb
296 2 500 руб. Купить
mscomm32.ocx и инструкция по установке
.ZIP 49,78Kb
86 2 500 руб. Купить
Файл лицензии для mscomm32.ocx. Применить если пишет "Не удалось создать объект". Спасибо defini
.reg 0,30Kb
91 2 500 руб. Купить

Подписка PRO — скачивайте любые файлы со скидкой до 85% из Базы знаний

Оформите подписку на компанию для решения рабочих задач

Оформить подписку и скачать решение со скидкой

Вы можете заказать платную доработку или адаптацию этой разработки под вашу конфигурацию на «Бирже заказов».

  • 0% комиссии — оплата напрямую исполнителю;
  • Исполнители любого масштаба — от отдельных специалистов до команд под проект;
  • Прямой обмен контактами между заказчиком и исполнителем;
  • Безопасная сделка — при необходимости;
  • Рейтинги, кейсы и прозрачная система откликов.

Эта разработка дублирует //infostart.ru/public/15458/. Единственное её отличие - это то, что весь код в 1Се и, что называется, в зоне действия прямого доступа для редактирования, и в этой разработке не используются сторонние ВК.

 

Как использовать:

Перво-наперво вставляем СИМку в модем, устанавливаем штатное программное обеспечение и драйвера, что идут в комплекте с модемом. Далее идем в диспетчер устройств и смотрим какой COM-порт занял у нас модем и на какой скорости он работает

Далее в любой конфигурации 1С 7.7 открываем обработку из вложения и в поле "порт" указываем номер порта, в поле "параметры связи" указываем [скорость],N,8,1 где [скорость] - это скорость работы (может и не нужно, но на всякий случай указываем). После этой настройки наслаждаемся. В текст СМС указываем ясно что (можно использовать русские, либо английские буквы), в номер - номер телефона без 8 или +7, только 10 цифр номера.

Обработка представляет из себя "рыбу". Т.е. демонстрирует основные принципы и возможности работы с GSM-модемами из 1С. При желании можно сделать массовую рассылку, на отправку одного СМС выделяется в среднем 2 секунды.

 

UPD 0103 Добавлен компонент mscomm32.ocx для работы и файл регистрации лицензии.

Вступайте в нашу телеграмм-группу Инфостарт

+34 –

См. также

Рассылка СМС из 1С через GET API сервиса WEBSMS.RU. Минимальный код для внедрения в конфигурацию на платформе 1С 7.7

SMS рассылки Разработчик 1С:Предприятие 7.7 1С:Бухгалтерия 7.7 Россия Бесплатно (free)

Пример отправки SMS сообщений методом GET на сервис WEBSMS.RU.

14.11.2023    3289    a.rezyhin    6    

3
SMS - сервис в 1С, управляемая форма

SMS рассылки Системный администратор Разработчик Бухгалтер Руководитель проекта 1С:Предприятие 7.7 1С:Предприятие 8 1C:Бухгалтерия 1C77 Абонемент ($m)

ВСЕ ОБРАБОТКИ АБСОЛЮТНО БЕСПЛАТНЫ К СКАЧИВАНИЮ И ПОЛНОСТЬЮ РАБОТОСПОСОБНЫ.  Внешние обработки для отправки коротких смс сообщений своим клиентам из базы 1С. Не требует никаких дополнительных настроек, открыл и через минуту можно приступать к рассылке. Инструкция встроена в обработку. (хотя, возможно, интерфейс и так интуитивно понятен). Список вложений и описание: 1. Обработка SMSSender 7.7.ert (внешняя обработка для 1С версии 7.7. (код открытый) 2. Обработка SMSSender_8.1.epf (внешняя обработка для 1С версии 8.1 (код открытый) 3. Обработка SMSSender 8.2.epf (внешняя обработка для 1С версии 8.2 (код открытый) (обычная форма). 4. Обработка SMSSender 8.3.epf (внешняя обработка для 1С версии 8.3 (код открытый) (обычная форма). 5. Внешняя обработка/ база данных (данные хранятся независимо от конфигурации) - Prostor_Sms_8_3.epf (код открытый) (Управляемая форма). Имеются свои отчеты, статистика и сортировка, импорт из других внешних файлов (Excel, csv) и справочника Контрагенты. Работает со всеми конфигурациями на управляемых формах, включая Комплексная автоматизация 2 (где справочник Контрагенты не иерархический). 6. Файлы описания протоколов для самостоятельной реализации. Включены протоколы и методы реализации JSON, HTTP, REST, POST. ВСЕ ОБРАБОТКИ АБСОЛЮТНО БЕСПЛАТНЫ К СКАЧИВАНИЮ И ПОЛНОСТЬЮ РАБОТОСПОСОБНЫ. 

1 стартмани

13.03.2017    29078    12    dmv78    1    

14
СМС-рассылка через USB-модем

SMS рассылки 1С:Предприятие 7.7 1С:Торговля и склад 7.7 Абонемент ($m)

Обработка предназначена для ТиС 9.2 для осуществления СМС-рассылки напрямую через USB-модем без использования внешних компонент (работает со стандартными библиотеками)

1 стартмани

18.09.2013    17594    26    severchukov    6    

6
Отправка SMS в 1С:Предприятие 7.7 "Торговля + Склад", 1С:Предприятие 8 "УТ 10.3", "УТ 11", "БП 3.0" по справочнику контрагенты 22 копейки за СМС

SMS рассылки Управление взаимоотношениями с клиентами (CRM) Руководитель проекта 1С:Предприятие 8 Оперативный учет 7.7 1С:Управление торговлей 10 1С:Торговля и склад 7.7 1С:Бухгалтерия 3.0 1С:Управление торговлей 11 Управленческий учет Абонемент ($m)

Очень часто в торговых организациях проводятся рассылки своим покупателям об акциях, скидках, новых поступлениях и т.д. Для этих целей мы создали комплекс внешних обработок, которые помогут осуществить рассылку. Для отправки используем сервис sms.ru, который является дешевым: 22 копеек за 1 SMS, если количество отправленных SMS перевалило через сумму 5 т.р. то цена снижается до 7 копеек за SMS. Плюс, этот вариант давно обкатан на наших клиентах.

1 стартмани

01.04.2013    57853    349    Diversus    29    

46
Отправляем СМС из 1С напрямую через USB-модем

SMS рассылки 1С:Предприятие 7.7 1C77 Абонемент ($m)

Обработка предназначена для отправки СМС-сообщения любой длины из 1С 7.7 без использования внешних компонент

1 стартмани

08.03.2013    14607    41    severchukov    3    

5
Быстрый способ отправки SMS из 1С

SMS рассылки Системный администратор Разработчик 1С:Предприятие 7.7 1С:Предприятие 8 1C:Бухгалтерия 1C77 Бесплатно (free)

Задача: Максимально быстро организовать рассылку SMS сообщений из 1С.

25.07.2012    33040    bestuzheff    31    

82
[SendGoogleSMS] Отправка SMS уведомлений через сервис Google Calendar

WEB-интеграция SMS рассылки Разработка внешних компонент Системный администратор Разработчик 1С:Предприятие 7.7 1С:Предприятие 8 1C:Бухгалтерия 1C77 Бесплатно (free)

Компонента генерирует события в Google Calendar с извещением по SMS. В архивах ВК для 7.7 (работает и в 8-ке) и ActiveX - для работы в контексте сервера 1С 8.х

07.08.2009    38306    564    Душелов    37    

65
Рассылка SMS для 1С:Предприятие 7.7

SMS рассылки Управление взаимоотношениями с клиентами (CRM) Системный администратор Разработчик Оперативный учет 7.7 Бухгалтерский учет 7.7 Расчет 7.7 1C77 Бесплатно (free)

Внешняя обработка для отправки SMS сообщений. Работает через сервис крупнейшего Российского SMS провайдера SteamSMS.ru

02.04.2009    19179    418    postnet    9    

10
Вознаграждение за ответ
Показать полностью
Отзывы
28. severchukov 46 10.03.13 00:22 Сейчас в теме
Вот текст. Вставить в Процедуру ДобавитьСМС(...)

ТекстДляРазбивки = ТекстСообщения;
КоличествоСМС = СтрДлина(СокрЛП(ТекстСообщения))/67;
Если КоличествоСМС <> Цел(КоличествоСМС) Тогда
КоличествоСМС = Цел(КоличествоСМС) + 1;
КонецЕсли;
Для сч = 1 По КоличествоСМС Цикл
ТекстС = Сред(ТекстСообщения,1,?(СтрДлина(ТекстСообщения)>67,67,СтрДлина(ТекстСообщения)));
ТекстСообщения = СокрП(Прав(ТекстСообщения,?(СтрДлина(ТекстСообщения)>67,СтрДлина(ТекстСообщения)-67,СтрДлина(ТекстСообщения))));
ЗакодироватьТекст(ТекстС);
СтрокаСообщения = "51000B91" + НомерТелефона + "0008FF" + Хекс((СтрДлина(ТекстС) / 2)+6) + "050003" + Хекс(Указатель) + Формат(КоличествоСМС,"Ч(0)2") + Формат(сч,"Ч(0)2") + ТекстС;
Текст.ДобавитьСтроку("AT+CMGS=" + СокрЛП(СтрДлина(СтрокаСообщения) / 2));
Текст.ДобавитьСтроку(СтрокаСообщения + Симв(26));
КонецЦикла;
+ – Ответить
Остальные комментарии
Подписаться на ответы Инфостарт бот Сортировка: Древо развёрнутое
Свернуть все
1. IgorHvoronov 01.03.11 12:41 Сейчас в теме
У меня ошибку выдает "Не могу создать объект"
udjin15; ShantinTD; +2 – Ответить
2. alex_2k 03.03.11 09:19 Сейчас в теме
Актуально только для одного пользователя.
А если одновременно отправляют 5-6 менеджеров? Тогда эта штука не поможет.
Хотя идея интересная.
+ – Ответить
3. ROM_1C 692 11.03.11 10:00 Сейчас в теме
Все зделал как написано, а мне ответ

Создан объект OLE.IMSComm и включен
Отсылка AT+CMGF=0
, ответ OK
Отсылка AT+CMGS=18
, ответ >
Отсылка 11000B910779170999F20018C1040073006D
, ответ
Неверный ответ модема:

Получаеться, что модем отвечает пустой строкой, либо ввобще ничега не отвечает!
+ – Ответить
4. v.a.ryag 37 08.09.11 13:39 Сейчас в теме
а если надо анонимно? реально ли вычислить физическое местоположение модема?)) или симки? да, да я параноик)
+ – Ответить
5. vas5780 41 19.09.11 08:33 Сейчас в теме
От руководства поступила задача, настроить отправку СМС из 1с7. Сообщать клиентам об акциях, и поздравлять их с днём рождения. Планируем отправку через USB модем. Насторожило только одно, отправка одного смс сообщения занимает 2 сек. Что же будет при отправке 20 тысячам клиентов, ну как говорится с руководством не поспоришь, с вашего позволения беру вашу обработку за основу. Спасибо! от меня вам жирный плюс.
+ – Ответить
9. seakuban 11 19.09.11 13:29 Сейчас в теме
(5) vas5780,
ознакомьтесь:
http://infostart.ru/public/81822/
--
обработки для отсылки смс через интернет gsm-шлюз для 1с 7.7 (стоимость смс у шлюза 30 коп...)
+ – Ответить
6. vas5780 41 19.09.11 09:04 Сейчас в теме
Из описания не совсем понятно, обработка на прямую работает, или всё-таки через ВК mscomm32.ocx?
+ – Ответить
7. leonidt84 478 19.09.11 12:24 Сейчас в теме
vas5780 пишет:

Из описания не совсем понятно, обработка на прямую работает, или всё-таки через ВК mscomm32.ocx?
Да mscomm32.ocx используется. Но в Windows он уже предустановлен. В некоторых случаях Вам надо ему просто прописать лицензию из комплектного к обработке файла.
vas5780 пишет:
Насторожило только одно, отправка одного смс сообщения занимает 2 сек. Что же будет при отправке 20 тысячам клиентов
Хех. Если планируется отправка в таких объёмах, то Вам никакой ЮСБ-модем не поможет. Это Вам нужно тогда на специализированные сервисы по отсылке. 2 секунды это минимальное время необходимое для обработки модемом команды. На команды связанные с обращению к GSM-сети желательно вообще эти 2 секунды увеличить до 5-10-ти. И даже в этом случае не гарантируется стабильная работа.
+ – Ответить
8. seakuban 11 19.09.11 13:28 Сейчас в теме
ознакомьтесь:
http://infostart.ru/public/81822/
--
обработки для отсылки смс через интернет gsm-шлюз для 1с 7.7 (стоимость смс у шлюза 30 коп...)
+ – Ответить
10. Boudybuilder 35 31.10.11 11:48 Сейчас в теме
Через собственный USB модем всегда приятнее. Но есть минус - это время на отсылку смс сообщений , и есть плюс это выбор дешевого оператора где действительно можно заказать пакет с безлимитным количеством смс.
+ – Ответить
11. Boudybuilder 35 31.10.11 11:48 Сейчас в теме
Будем пробовать , разбираться...
+ – Ответить
12. leonidt84 478 31.10.11 19:21 Сейчас в теме
Boudybuilder пишет:
Через собственный USB модем всегда приятнее. Но есть минус - это время на отсылку смс сообщений.
У меня у клиента список рассылки всего 2000 номеров, при тесте оказалось что 2-х секунд катастрофически не хватает, лишь на 5 секундах на номер плюс 20 секунд перерыв после 100 номеров удалось добиться какой-то более-менее стабильной работы, отсылается около 4 часов, клиент запускает обработку с утра и в фоне она у него отсылает, а сам работает в другой копии программы. И то где-то 2-м процентам клиентов так и не доходит.
+ – Ответить
13. WellMaster 106 14.11.11 17:18 Сейчас в теме
Если в строке 92 модуля обработки вместо строки "0018C1" поставить строку "0008C1", то сообщения будут сохраняться в телефоне, а не просто отображаться (может кому пригодится, сам долго мучился).
adhocprog; virtyoz; berghouse; +3 – Ответить
20. severchukov 46 06.03.13 18:29 Сейчас в теме
(13) WellMaster, Огромнейшее СПАСИБО, тоже мучался этим вопросом пол дня, а оказалось надо просто комментарии почитать.
+ – Ответить
14. WellMaster 106 14.11.11 17:20 Сейчас в теме
Кстати, ищу ответ на проблему: под 7.7 сообщения на русском отправляются нормально. Переделав обработку под 8.2 сообщения на кириллице доходят квадратиками вместо букв. Кто знает в чем проблема - прошу натолкнуть на путь истинный.

UPD
Нашел в чем проблема.
В 8.2 в строке 141 не нужно проверять на то, что код символа меньше 192 и прибавлять 848. Платформа сразу выдает правильный код символа. Это, видимо, обусловлено различной реализацией встроенных функций КодСимв() (7.7.) и КодСимвола() (8.x)
+ – Ответить
15. WellMaster 106 14.11.11 22:04 Сейчас в теме
Теперь вот проблема с разбиением длинной смс-ки на короткие, да так, чтобы телефон их потом склеивал в одну. Простая разбивка длинного текста на куски по 70 символов не подходит, т.к. телефон их воспринимает как несколько отдельно взятых СМС-ок. А нужна склейка.
+ – Ответить
21. severchukov 46 06.03.13 18:31 Сейчас в теме
(15) WellMaster, А с разбивкой и последующей склейкой смс в телефоне получателя решили вопрос???
+ – Ответить
22. WellMaster 106 07.03.13 08:39 Сейчас в теме
(21) severchukov, Да, решил.
В личку ответить не могу, карма не позволяет.
+ – Ответить
16. VragHorosh 24.11.11 11:23 Сейчас в теме
блтин чет неработает , ругается на MSCOMM32.OCX ((( немогу зарегистрировать эту приблуду
+ – Ответить
19. WellMaster 106 24.11.11 16:18 Сейчас в теме
(16) VragHorosh, нужен файл с лицензией. Есть тут: http://infostart.ru/public/16088/
+ – Ответить
17. пользователь 24.11.11 11:32
Сообщение было скрыто модератором.
...
18. veforg 28 24.11.11 11:41 Сейчас в теме
regsvr32 -u MSCOMM32.OCX
regsvr32 MSCOMM32.OCX
+ – Ответить
23. severchukov 46 07.03.13 12:00 Сейчас в теме
В личку и не прошу, с кармой лучше не шутить!!!
Если можно то ответьте в этой теме, или если карма не позволит,то хотя бы натолкните на мысль, или какие либо общие шаблоны или идеи, а там сам постараюсь "разрыть".
+ – Ответить
24. leonidt84 478 07.03.13 13:11 Сейчас в теме
(23) severchukov, Давайте я немного поспособствую развития отсылки СМС.
За ответ на вопрос как в рамках данного метода склеивать длинные СМС так, что бы в телефоне получателя они отображались как одна дам 10 СМ ответившему.
+ – Ответить
25. severchukov 46 07.03.13 13:44 Сейчас в теме
ОК. Моя карма мне это позволяет :)
+ – Ответить
26. severchukov 46 08.03.13 11:01 Сейчас в теме
Вот ссылка: http://infostart.ru/public/177049/

Пользуйтесь на здоровье.
После прохождения модерации и ваших тестов жду свои мани :)
+ – Ответить
27. leonidt84 478 09.03.13 23:56 Сейчас в теме
(26) severchukov, лень эту штуку скачивать. Приведите программный код, или что нужно поменять в этой разработке для склейки.
+ – Ответить
28. severchukov 46 10.03.13 00:22 Сейчас в теме
Вот текст. Вставить в Процедуру ДобавитьСМС(...)

ТекстДляРазбивки = ТекстСообщения;
КоличествоСМС = СтрДлина(СокрЛП(ТекстСообщения))/67;
Если КоличествоСМС <> Цел(КоличествоСМС) Тогда
КоличествоСМС = Цел(КоличествоСМС) + 1;
КонецЕсли;
Для сч = 1 По КоличествоСМС Цикл
ТекстС = Сред(ТекстСообщения,1,?(СтрДлина(ТекстСообщения)>67,67,СтрДлина(ТекстСообщения)));
ТекстСообщения = СокрП(Прав(ТекстСообщения,?(СтрДлина(ТекстСообщения)>67,СтрДлина(ТекстСообщения)-67,СтрДлина(ТекстСообщения))));
ЗакодироватьТекст(ТекстС);
СтрокаСообщения = "51000B91" + НомерТелефона + "0008FF" + Хекс((СтрДлина(ТекстС) / 2)+6) + "050003" + Хекс(Указатель) + Формат(КоличествоСМС,"Ч(0)2") + Формат(сч,"Ч(0)2") + ТекстС;
Текст.ДобавитьСтроку("AT+CMGS=" + СокрЛП(СтрДлина(СтрокаСообщения) / 2));
Текст.ДобавитьСтроку(СтрокаСообщения + Симв(26));
КонецЦикла;
+ – Ответить
29. leonidt84 478 10.03.13 00:35 Сейчас в теме
(28) severchukov, Извиняюсь, указывал 10, но почему-то сервис передал только 8.
+ – Ответить
30. severchukov 46 11.03.13 12:43 Сейчас в теме
Ничего страшного. дело не в деньгах.
+ – Ответить
31. Proser 16.10.15 21:18 Сейчас в теме
Доброго времени суток! Я из Белоруссии. В наборе номера я убрал 7. Пробовал номер и с 8 и 375- только в номере с 8 иногда все проходит и пишет ответ >. Но при этом СМС не приходит, т.е. не отправляется. Модем е303. Определяется на порт 13, а порт 14 и 15 еще два у-ва хуавей. Когда указываю порт 13- ошибка на стадии драйвера, а проходит ,как описал выше, только с портом 15. Модем рабочий- из другой проги смс шлет в автомате. В какую сторону рыть?
+ – Ответить
Для отправки сообщения требуется регистрация/авторизация