SMS через ActiveSync (бета)

Опубликовал Стас (Salvador Limones) в раздел Обмен - SMS рассылки

Отправка SMS с компьютера через смартфоны/коммуникаторы, подключенные через Active Sync.

Скачиваем, распаковываем, файл smsPPC.exe кидаем на устройство Windows Mobile. Запускаем!

sms.dll кидаем на ПК в любое место. Регистрируем с помощью "regsvr32 sms.dll"

Код для 8.х

Экз=Новый COMОбъект("SMS.SMSCntr");
Сообщить(Экз.SendSMS("xxxxxxxxxxx","Проверка связи, чуваааак!"));

Для выгрузки smsPPC.exe из памяти смарта/коммуникатора пишем:

Сообщить(Экз.Close()); //В ответ должны получить "Exiting!"

Код для 7.7 (инициализация):

Экз=СоздатьОбъект("SMS.SMSCntr");

Пример скрипта (vbs):

Set objShell = CreateObject("SMS.SMSCntr")
MSRet = objShell.SendSMS("xxxxxxxxxx","Превышение сальдо, свяжитесь с оператором!")
wscript.echo MSRet

Часть для КПК скомпилена под Windows Mobile 2003 SE, успешно протестирована на смарте с WM2005(Ginza) и коммуникаторе с WM6.0 (E-ten X500)


ВНИМАНИЕ! Устройство при подключении обязательно должно создавать сетевое подключение!

Возможная ошибка на PPC: "Bind the socket failed", на моих тестовых аппаратах и в эмуляторе возникала только при попытке повторного запуска приложения.

Скачать файлы

Наименование Файл Версия Размер
-
.1228477373 15,98Kb
25.09.09
100
.1228477373 15,98Kb 100 Бесплатно

См. также

Добавить вознаграждение
Комментарии
1. Андрей Скляров (coder1cv8) 3275 05.12.08 17:58 Сейчас в теме
2. Khaliff (Khaliff) 3 05.12.08 17:59 Сейчас в теме
Привет! поясни вот это:

"(для 7.7 или скриптов vbs по аналогии)"

напиши подробнее для 7.7 и для не программистов (но умеющих вставлять код куда надо, только скажи куда)
3. Василий Демидов (Душелов) 3773 05.12.08 17:59 Сейчас в теме
А без клиентской части? Если напрямую обратиться к телефонному модулю?
4. Василий Демидов (Душелов) 3773 05.12.08 18:00 Сейчас в теме
(2)

Экз=СоздатьОбъект("SMS.SMSCntr");
Сообщить(Экз.SendSMS("xxxxxxxxxxx","Проверка связи, чуваааак!"));
5. Khaliff (Khaliff) 3 05.12.08 18:12 Сейчас в теме
Спасибо, Душелов, но пока мне как юзеру не понятно...
6. Василий Демидов (Душелов) 3773 05.12.08 22:06 Сейчас в теме
Автор, приложи ты демо примеры на 7.7 и 8.х ;) И будет тебе счастие :)
8. Стас (Salvador Limones) 93 08.12.08 10:42 Сейчас в теме
(3) Пока такого не нашел, но изыскания продолжу.
P.S. Статью немного дописал.
13. Khaliff (Khaliff) 3 16.12.08 18:33 Сейчас в теме
Salvador Limones
подскажи как в 7.70 повесить запуск твоей проги на кнопку или в меню, например, создаю пункт меню Сервис-SMS
объект: Задача
команда: Задача.Выполнить
далее как сделать?