Объект Device/Свойства/SMSList

Материал из Call Office Wiki
Версия от 11:23, 15 февраля 2019; Jugin (обсуждение | вклад)
(разн.) ← Предыдущая | Текущая версия (разн.) | Следующая → (разн.)
Перейти к навигации Перейти к поиску

Свойство SMSList позволяет получить список принятых СМС сообщений.

Синтаксис

VARIANT SMSList (VARIANT)

Описание

Свойство SMSList позволяет получить список принятых СМС сообщений. Список принятых сообщений возвращается в виде двумерного массива, каждая строка которого - отдельное СМС, а столбцы имеют значение:
  • 0 - номер СМС;
  • 1 - статус СМС (0 - сообщение не прочитано; 1 - сообщение прочитано); Если сообщение является статусом доставки статус может принимать значения:
  • 2 - доставлено (DELIVRD);
  • 3 - время доставки истекло (EXPIRED);
  • 4 - сообщение удалено (DELETED);
  • 5 - не доставлено (UNDELIV);
  • 6 - принято (ACCEPTD);
  • 7 - неизвестно (UNKNOWN)
  • 8 - отклонено (REJECTD);
  • 2 - номер телефона с которого отправлено СМС;
  • 3 - текст сообщения;
  • 4 - дата и время сообщения в формате: YYYY-MM-DD HH:MM:SS. (Не для всех типов сообщений может быть получено);
  • 5 - тип сообщения (0 - обычное, 1 - статус доставки);
  • 6 - идентификатор сообщения (имеет смысл если сообщение является статусом доставки).

По умолчания функция возвращает список только тех SMS-сообщений, которые получены полностью, если SMS-сообщение состоит из нескольких частей. Для получения всех SMS-сообщений, в том числе и частей не полностью полученных сообщений следует указать параметр 'All'. Для удаления сообщений следует использовать метод DeleteSMS.

Примеры

Пример на JavaScript
var Device = new ActiveXObject ("CallOffice.Device");

Device.Open ();

var List = Device.SMSList.toArray ();         // Получаем список полученных СМС
var TextSMS = "";
for (i = 0; i < List.length; i++) {
   TextSMS += List[i].toArray ()[3] + ", ";   // Выводим текст СМС
}
alert(TextSMS);
Device.Close ();
Пример на VBScript
Dim Device
Set Device = CreateObject ("CallOffice.Device")

Device.Open

List = Device.SMSList                         ' Получаем список полученных СМС

for i = 0 to UBound (List)
   MsgBox List(i)(3),  vbOkOnly + VbInformation, "Сообщение № " + CStr (List(i)(0)) + " от : " + List(i)(2)    ' Выводим сообщение
next

Device.Close

Назад к свойствам объекта Device.