Изменить группу прав пользователя.

 

Синтаксис

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"): Скрипт выполнен успешно.

 

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

IntToStr

mGetRoleIDByName

mLogScript