APIAddUser |
|
Эта функция добавляет клиента с настройками по умолчанию.
NewUserID = APIAddUser(UserID, DisplayName, Group)
Аргументы
UserID
Строковое выражение, определяющее GUID добавляемого клиента. Если задать пустую строку (""), то будет создан новый уникальный идентификатор.
DisplayName
Строковое выражение задающее отображаемое имя клиента. Обязательный параметр, должен быть уникальным.
Group
Строковое выражение определяющее GUID группы, в которую добавляется клиент. Если задать пустую строку ("") или группы с заданным GUID не существует, то клиент будет помещен в общий список.
Возвращаемое значение
NewUserID - возвращает GUID нового клиента.
Замечания
Клиент создается с параметрами по умолчанию. Авторизация не прописана, он находятся в состоянии СТОП.
После вызова данной функции нужно через функцию APISetAttr обязательно заполнить атрибуты, задающие авторизацию.
Если в тарифе задана оплата по умолчанию, то она заносится клиенту на счет и его доступ делается с автоотключением, иначе доступ безлимитный.
Пример использования
Set Srv = CreateObject("TrafInsp.TrafInspAdmin")
APIPass = "123456" 'Пароль для доступа через API
Srv.APILogon(APIPass)
UserName = "Kovrikov Ivan"
GroupID = "{2ACAB0DD-925C-4F49-90B6-A5E27E6DDD75}" ' GUID группы
UserID = Srv.APIAddUser("", UserName, GroupID)
' Добавили клиента Kovrikov Ivan в заданную группу
' Задаем параметры авторизации по логину и паролю
Dim ArAttr(1)
ArAttr(0) = 5 'User_LogonName
ArAttr(1) = 6 'User_Password
Dim ArVal(1)
ArVal(0) = "Kovrikov"
ArVal(1) = "Kovrik"
UserAttr = Srv.APISetAttr(3, UserID, ArAttr, ArVal, True)
' Сохранение конфигурации клиентов
Srv.APISaveUserConfig
WScript.Echo "Клиент " & UserName & " добавлен, GUID: " & UserID
Текущая страница справки: help.smart-soft.ru/index.html?apiadduser.htm