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

Материал из Call Office Wiki
Перейти к навигации Перейти к поиску
Версия для печати больше не поддерживается и может содержать ошибки обработки. Обновите закладки браузера и используйте вместо этого функцию печати браузера по умолчанию.

Свойство 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.