"Для разработчиков", "Серверные скрипты", "Описание функций", "Пользователи", "mGetCIDSByClientType".

 

Получить список всех подключений (Connection ID) онлайн-приложений сервера по типу.

 

Синтаксис

function mGetCIDSByClientType(const sClientType: string): string;

 

Параметры и возвращаемые значения

Параметр

Тип

Значение

sClientType

string

типы подключений, через запятую. Если указать пустую строку или слово "any", будут выбраны все подключения.

 

Результат функции

Список CID-ов через запятую. Если список пуст — нет онлайн-подключений указанного типа.

 

Пример

Скрипт получает список всех ConnectionID и показывает IP, тип клиентского подключения и UIN залогиненного пользователя.

var
  sIP, sCIDList, sClientType: string;
  iUIN: integer;
  iCID: int64;
begin
  sCIDList := mGetCIDSByClientType('any');
  
    while length(sCIDList) > 0 do begin
      iCID := StrToInt64(Fetch(sCIDList, ','));
      iUIN := mGetUINByCID(iCID);
      sIP := mGetCIDAttribute(iCID, 'IP');
      sClientType := mGetCIDAttribute(iCID, 'ClientType');
      
      mLogScript('UIN: ' + IntToStr(iUIN) + ', IP: ' + sIP + ', ClientType: ' + sClientType, 'CID ' + IntToStr(iCID));    
    end;  
end.

Результат работы скрипта

[16:17:01] (Log "mGetCIDSByClientType"): [CID 1] UIN: 6, IP: 127.0.0.1, ClientType: admin

[16:17:01] (Log "mGetCIDSByClientType"): [CID 2] UIN: 6, IP: 127.0.0.1, ClientType: kanban

[16:17:01] (Log "mGetCIDSByClientType"): [CID 3] UIN: 6, IP: 127.0.0.1, ClientType: forum

[16:17:01] (Run "mGetCIDSByClientType"): Время выполнения скрипта: 15 мс

[16:17:01] (Run "mGetCIDSByClientType"): Скрипт выполнен успешно.

 

Ещё посмотреть

Fetch

IntToStr

Length

mGetCIDAttribute

mLogScript

StrToInt64