MyChat Scripts: функция mGetCIDSByUINAndClientType, список подключений пользователя
"Для разработчиков", "Серверные скрипты", "Описание функций", "Пользователи", "mGetCIDSByUINAndClientType".
Получить список всех подключений (Connection ID) онлайн-приложений пользователя по его UIN и типу приложения.
Синтаксис
function mGetCIDSByUINAndClientType(const iUIN: integer; const sClientType: string): integer;
Параметры и возвращаемые значения
|
Параметр |
Тип |
Значение |
|
iUIN |
integer |
уникальный идентификатор пользователя, CID-ы которого необходимо узнать. |
|
sClientType |
string |
типы подключений, через запятую. Если указать пустую строку или слово "any", будут выбраны все подключения. |
Результат функции
Список CID-ов через запятую. Если список пуст — пользователь офлайн.
Пример
const
iUIN = 6; // user UIN for test, set your own number
var
iCID: integer;
sCIDList, sClientType, sIP: string;
begin
sCIDList := mGetCIDSByUINAndClientType(iUIN, 'win32,web,forum,kanban,admin');
if length(sCIDList) = 0 then mLogScript('User is offline or unregistered UIN', '')
else begin
while length(sCIDList) > 0 do begin
iCID := StrToInt(Fetch(sCIDList, ','));
sClientType := mGetCIDAttribute(iCID, 'ClientType');
sIP := mGetCIDAttribute(iCID, 'IP');
mLogScript(sClientType, sIP);
end;
end;
end.
Результат работы скрипта
[15:35:47] (Log "mGetCIDSByUIN"): [192.168.10.1] win32
[15:35:47] (Log "mGetCIDSByUIN"): [192.168.10.13] web
[15:35:47] (Log "mGetCIDSByUIN"): [192.168.10.113] admin
[15:35:47] (Log "mGetCIDSByUIN"): [213.130.24.149] kanban
[15:35:47] (Log "mGetCIDSByUIN"): [213.130.24.149] forum
[15:35:47] (Run "mGetCIDSByUIN"): Время выполнения скрипта: 3 мс
[15:35:47] (Run "mGetCIDSByUIN"): Скрипт выполнен успешно.