Скачать: CL | DM;

NetUserAdd   Найти похожие ветки 

← →
DelphiN! ©   (2005-05-12 09:21) [0]

Пытаюсь создать пользователя так :

var
 res, errInd : dword;
 ui : USER_INFO_1; //запись с данными о пользователе
 s : string;
begin
 ui.usri1_name := "newadm";       // имя нового пользователя
 ui.usri1_password := "mypass"; //пароль
 ui.usri1_password_age := 0;      //этот параметригнорируется
 ui.usri1_priv := USER_PRIV_ADMIN; //привелегия пользователя — обычный USER
       //другие возможные значения этого поля USER_PRIV_USER и USER_PRIV_ADMIN
 ui.usri1_home_dir := "C:\";        //рабочий каталог пользователя
 ui.usri1_comment := "";
 ui.usri1_flags := UF_NORMAL_ACCOUNT;
    //набор флагов, определяющий тип пользователя. Подробнее см. win32.hlp
 ui.usri1_script_path := "";      //имя скрипта пользователя,
                                  //выполняемого при входе в систему

 //вызываем функцию NetUserAdd
 res := NetUserAdd("198.162.0.90", 1, @ui, errInd);

 //и в зависимости от возвращенного результата,
 //выдаем те или иные сообщения

 case res of
   ERROR_INVALID_PARAMETER : begin
     s := IntToStr(errInd);
     s := "Error Invalid Parameter number " + s;
     ShowMessage(s);
   end;
   ERROR_ACCESS_DENIED: ShowMessage("Access Denied");
   Nerr_Success : ShowMessage("Success");
   Nerr_InvalidComputer : ShowMessage("InvalidComputer");
   NERR_NotPrimary : ShowMessage("The operation is allowed only on the PDC.");
   NERR_GroupExists : ShowMessage("The group already exists.");
   NERR_UserExists : ShowMessage("The user account already exists.");
   NERR_PasswordTooShort : ShowMessage("The password is shorter than required.");
 end;


Но возвращается ошибка ERROR_INVALID_PARAMETER с индексом 5

В чем дело ?

---

← →
VMcL ©   (2005-05-12 11:28) [1]

#define USER_PRIV_PARMNUM               5

---

← →
VMcL ©   (2005-05-12 11:30) [2]

Дело вот в чём:

usri1_priv
Specifies a DWORD value that indicates the level of privilege assigned to the usri1_name member. When you call the NetUserAdd function, this member must be USER_PRIV_USER.

---

Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.45 MB
Время: -0.975 c