Объект Device/Методы/SendSMS: различия между версиями
Перейти к навигации
Перейти к поиску
McBurns (обсуждение | вклад) |
Jugin (обсуждение | вклад) |
||
| (не показана 1 промежуточная версия этого же участника) | |||
| Строка 5: | Строка 5: | ||
==Синтаксис== | ==Синтаксис== | ||
:<syntaxhighlight lang="c"> | :<syntaxhighlight lang="c"> | ||
LONG SendSMS (BSTR Phone, BSTR Text [, BSTR Sender], LONG * Result) | LONG SendSMS (BSTR Phone, BSTR Text [, BSTR Sender][, BOOL StatusReport], LONG *Result) | ||
</syntaxhighlight> | </syntaxhighlight> | ||
|style="width:10%;"|__TOC__ | |style="width:10%;"|__TOC__ | ||
| Строка 21: | Строка 21: | ||
|'''Sender''' | |'''Sender''' | ||
| - имя отправителя. | | - имя отправителя. | ||
|- | |||
|'''StatusReport''' | |||
| - признак запроса результата доставки (true - запрашивать результат доставки SMS сообщения). | |||
|} | |} | ||
| Строка 52: | Строка 55: | ||
==Описание == | ==Описание == | ||
:Метод выполняет отправку | :Метод выполняет отправку SMS-сообщения. | ||
==Примеры== | ==Примеры== | ||
Текущая версия на 11:46, 14 сентября 2021
Метод SendSMS отправляет СМС сообщение по указанному номеру телефона.
Синтаксис
|
Параметры
Phone - номер телефона. Text - текст сообщения. Sender - имя отправителя. StatusReport - признак запроса результата доставки (true - запрашивать результат доставки SMS сообщения).
Результат
Название константы Значение Описание DEVICE_S_OK 0 (0x00) сообщение отправлено успешно DEVICE_S_FAILED 1 (0x01) ошибка отправки сообщения DEVICE_S_INTERRUPTED 4 (0x04) ожидание ответа абонента прервано DEVICE_S_TIMEOUT 5 (0x05) время ожидания ответа абонента истекло DEVICE_S_BUSY 6 (0x06) номер занят
Описание
- Метод выполняет отправку SMS-сообщения.
Примеры
- Пример на JavaScript
var Device = new ActiveXObject ("CallOffice.Device");
var NumberPhone = prompt ("Введите номер телефона",'');
Device.Open ();
var Result = Device.SendSMS (NumberPhone, "Тестовое сообщение");
if (Result == 0){
alert("Сообщение отправлено!");
}
Device.Close ();
- Пример на VBScript
Dim Device
Set Device = CreateObject ("CallOffice.Device")
NumberPhone = prompt ("Введите номер телефона","")
Device.Open
Result = Device.SendSMS (NumberPhone, "Тестовое сообщение")
if Result = 0 then
MsgBox "Сообщение отправлено!"
end if
Device.Close