Изменить группу прав пользователя.
function mSetUserRoleID(iUIN, iRole: integer): integer;
Параметр |
Тип |
Значение |
|---|---|---|
iUIN |
integer |
уникальный идентификатор пользователя; |
iRole |
integer |
идентификатор новой группы прав. |
0 |
ошибок нет; |
-1 |
вы не можете изменять группу прав для встроенного робота (UIN = 0); |
-2 |
несуществующий UIN пользователя; |
-3 |
несуществующий идентификатор группы прав. |
const
ROLE_NAME = 'Administrators';
USER_UIN = 30;
var
iRoleID, iResult: integer;
begin
iRoleID := mGetRoleIDByName(ROLE_NAME);
if iRoleID <> -1 then begin
mLogScript('Role ID: ' + IntToStr(iRoleID), '');
iResult := mSetUserRoleID(USER_UIN, iRoleID);
case iResult of
0: mLogScript('All ok!', '0');
-1: mLogScript('You can''t use UIN = 0', '-1');
-2: mLogScript('User doesn''t exist', '-2');
-3: mLogScript('Wrong role id', '-3');
end;
end;
end.[17:05:07] (Log "mSetUserRoleID"): Role ID: 13
[17:05:07] (Log "mSetUserRoleID"): [0] All ok!
[17:05:07] (Run "mSetUserRoleID"): Время выполнения скрипта: 29 мс
[17:05:07] (Run "mSetUserRoleID"): Скрипт выполнен успешно.