Форум программистов «Весельчак У»
  *
Добро пожаловать, Гость. Пожалуйста, войдите или зарегистрируйтесь.
Вам не пришло письмо с кодом активации?

  • Рекомендуем проверить настройки временной зоны в вашем профиле (страница "Внешний вид форума", пункт "Часовой пояс:").
  • У нас больше нет рассылок. Если вам приходят письма от наших бывших рассылок mail.ru и subscribe.ru, то знайте, что это не мы рассылаем.
   Начало  
Наши сайты
Помощь Поиск Календарь Почта Войти Регистрация  
 
Страниц: [1]   Вниз
  Печать  
Автор Тема: Windows 7 Home и группы пользователей  (Прочитано 16608 раз)
0 Пользователей и 2 Гостей смотрят эту тему.
Dimka
Деятель
Команда клуба

ru
Offline Offline
Пол: Мужской

« : 24-12-2009 22:00 » 

В Home версиях 7-ки оснастка управления локальными пользователями и группами запрещена к использованию. В свойствах пользователя нет опций для управления группами.

Как (через консоль или через какие-нибудь программные интерфейсы) всё-таки включить юзера в некоторую группу?
Записан

Программировать - значит понимать (К. Нюгард)
Невывернутое лучше, чем вправленное (М. Аврелий)
Многие готовы скорее умереть, чем подумать (Б. Рассел)
Dimka
Деятель
Команда клуба

ru
Offline Offline
Пол: Мужской

« Ответ #1 : 25-12-2009 11:52 » 

Программно через ADSI при помощи WSH эта операция выполняется в одну строчку вида:
Код: (Text) JScript/VBScript
GetObject("WinNT://MYHOST/MyGroup").Add("WinNT://MYHOST/MyUser")
(Запускать с правами администратора.)

Вечером попробую дома на Window 7 Home.
Записан

Программировать - значит понимать (К. Нюгард)
Невывернутое лучше, чем вправленное (М. Аврелий)
Многие готовы скорее умереть, чем подумать (Б. Рассел)
Sla
Команда клуба

ua
Offline Offline
Пол: Мужской

WWW
« Ответ #2 : 25-12-2009 11:58 » 

интересно, а оснастка из другой версии 7-ки подойдет?
Записан

Мы все учились понемногу... Чему-нибудь и как-нибудь.
RXL
Технический
Администратор

Offline Offline
Пол: Мужской

WWW
« Ответ #3 : 25-12-2009 15:13 » 

На всякий случай проверил на XP: не работает Улыбаюсь
Записан

... мы преодолеваем эту трудность без синтеза распределенных прототипов. (с) Жуков М.С.
Sla
Команда клуба

ua
Offline Offline
Пол: Мужской

WWW
« Ответ #4 : 25-12-2009 15:22 » 

RXL, а попробуй раскрутить такой скрипт
Код:
Dim Domain 'as IADs
Set NameSpace = GetObject("WinNT:")
For Each Domain In NameSpace
WScript.Echo Domain.ADsPath
WScript.Echo Domain.Class
WScript.Echo Domain.GUID
WScript.Echo Domain.Parent
WScript.Echo Domain.Name
WScript.Echo Domain.Schema
WScript.Echo
Next
и дальше
Записан

Мы все учились понемногу... Чему-нибудь и как-нибудь.
Sla
Команда клуба

ua
Offline Offline
Пол: Мужской

WWW
« Ответ #5 : 25-12-2009 15:24 » 

или
Код:
Добавление новой группы:

Set Domain = GetObject("WinNT://myDomainName")
Set Group = Domain.Create("Group", "GroupName")
Group.Put "groupType", 4 'локальная группа
'Group.Put "groupType", 2 'глобальная группа
Group.SetInfo

Удаление группы:

Set Domain = GetObject("WinNT://myDomainName")
Domain.Delete "Group", "GroupName"


Записан

Мы все учились понемногу... Чему-нибудь и как-нибудь.
RXL
Технический
Администратор

Offline Offline
Пол: Мужской

WWW
« Ответ #6 : 25-12-2009 15:30 » 

Слав, пусто: ни ошибки, ни строчки информации.
Записан

... мы преодолеваем эту трудность без синтеза распределенных прототипов. (с) Жуков М.С.
Sla
Команда клуба

ua
Offline Offline
Пол: Мужской

WWW
« Ответ #7 : 25-12-2009 15:36 » 

а должно появится окошко MSG
Записан

Мы все учились понемногу... Чему-нибудь и как-нибудь.
RXL
Технический
Администратор

Offline Offline
Пол: Мужской

WWW
« Ответ #8 : 25-12-2009 16:02 » 

Я записал код в файл test.vbs и выполнил в командной строке. Просто выполняется и никакой реакции не видно.
Если принудительно запускать через интерпретатор cscript.exe (или задать расширение .wsh), то выдает ошибку: "Input Error: There is no script file specified." - пишет в консоль или создает информационное окно.
« Последнее редактирование: 25-12-2009 16:05 от RXL » Записан

... мы преодолеваем эту трудность без синтеза распределенных прототипов. (с) Жуков М.С.
Dimka
Деятель
Команда клуба

ru
Offline Offline
Пол: Мужской

« Ответ #9 : 25-12-2009 18:44 » 

Работает! Улыбаюсь

P.S. Эти проблемы с группами идут в развитие предыдущей темы про терминалы. Когда ставится telnet, он создаёт группу TelnetClients, и если юзер не в ней, то подключение отвергается.
« Последнее редактирование: 25-12-2009 18:46 от Dimka » Записан

Программировать - значит понимать (К. Нюгард)
Невывернутое лучше, чем вправленное (М. Аврелий)
Многие готовы скорее умереть, чем подумать (Б. Рассел)
Dimka
Деятель
Команда клуба

ru
Offline Offline
Пол: Мужской

« Ответ #10 : 25-12-2009 18:51 » new

Цитата: RXL
На всякий случай проверил на XP: не работает
Да ну её. Было время, я через ADSI в XP Prof пытался в IIS создать ещё один сайт в дополнение к Default Web Site - соответствующий программный интерфейс в ней есть, он такой же, как в Server-версии, но тоже не захотело работать Улыбаюсь
Записан

Программировать - значит понимать (К. Нюгард)
Невывернутое лучше, чем вправленное (М. Аврелий)
Многие готовы скорее умереть, чем подумать (Б. Рассел)
ayakovchuk
Гость
« Ответ #11 : 16-01-2010 06:29 » 

Так и не понял, как можно создать группу "Семья" и добавить туда пользователя "Женя"...
Подскажите, пожалуйста!

Windows 7 Домашняя расширенная.
Записан
Страниц: [1]   Вверх
  Печать  
 

Powered by SMF 1.1.21 | SMF © 2015, Simple Machines