USER_INFO_1 ui;

DWORD dwLevel = 1;

DWORD dwError = 0;

NET_API_STATUS nStatus;

ui.usri1_name = L"User1";

ui.usri1_password = L"1111111";

ui.usri1_priv = USER_PRIV_USER;//Привелгии: Гость, Пользователь или Админ

ui.usri1_home_dir = NULL;

ui.usri1_comment = NULL;

ui.usri1_flags = UF_SCRIPT;

ui.usri1_script_path = NULL;

//Создаем пользователя

nStatus = NetUserAdd(NULL, //NULL - создается на локальном компе

dwLevel, (LPBYTE)&ui, &dwError);

// Если все хорошо то сообщаем об этом

if (nStatus == NERR_Success)

ShowMessage("Пользователь создан!");