MyChat Scripts: mHaltUIN, shut down all MyChat Client connections by UIN

Disconnect any online user from the server and force shutting down of all his connected applications.

Syntax

function mHaltUIN(iUIN: integer): integer;

Parameters and return values

Parameter	Type	Value
iUIN	integer	online user unique ID;

Function result

>0	all OK, N connections were disconnected;
-1	you can't shuit down the built-in bot (UIN 0);
-2	UIN must be above zero;
-3	specified user is disconnected from the server (offline).

Example

The function disconnects from the server and shut down all connected applications for users of the specified group.

const
GROUP_NAME = 'External users';
var
SL: TStringList;
i, iUIN, iCount: integer;
begin
SL := TStringList.Create;
SL.CommaText := mGetUsersListInGroupByName(GROUP_NAME);

if SL.Count > 0 then begin
iCount := 0;

for i := 0 to SL.Count - 1 do begin
iUIN := StrToInt(SL[i]);

if mIsUINOnline(iUIN) then begin
mHaltUIN(iUIN);
inc(iCount);
end;
end;
end;

SL.Free;

if iCount > 0 then mLogScript('Halted ' + IntToStr(iCount) + ' users', '');
end.

Script work result

[18:09:47] (Log "mHaltUIN"): Halted 17 users

[18:09:47] (Run "mHaltUIN"): Script operation time: 527 ms

[18:09:47] (Run "mHaltUIN"): Script done successfully.

MyChat Help