Re: Смена пароля у всех пользователей.

От: Pavel Loginov <CGatePro_at_mx_ru>
Дата: Sun 11 Mar 2012 - 08:02:42 MSK

> On Wed, 7 Mar 2012 17:10:10 +0600

>   "Pavel Loginov" <CGatePro@mx.ru> wrote:

>> Здравствуйте, .
>>
>> Приветствую.
>>
>> Появилась необходимость сменить всем пользователям в домене пароль.
>> Т.е. как я программированием плохо знаком то помогите объединить
>>2
>> функции:
>>
>> $AccountList = $cli->ListAccounts('domen.com')
>> || die "Error: ".$cli->getErrMessage.", quitting";
>> foreach(keys %$AccountList) { print "$_\n"; }
>>
>> $cli->SetAccountPassword('john','newPass')
>> || die "Error: ".$cli->getErrMessage.", quitting";

> вы всем пользователям хотите один и тот же пароль что ли поставить? > тогда так:

> $AccountList = $cli->ListAccounts('domen.com')

>                   || die "Error: ".$cli->getErrMessage.", quitting";

> foreach my $acct (keys %$AccountList)
> {
>   $cli->SetAccountPassword($acct,'newPass')
>          || die "Error: ".$cli->getErrMessage.", quitting";

> }

> но лучше все-таки найдите поблизости кого-нибудь со знанием перла и не > забудьте сделать бэкап...

Не работает. :( Пишет:

Error: unknown user account, quitting at ./testpass.pl line 19, <GEN0> line 5.

> Best wishes,
> Maxim

> ##################################################################

> Вы получили это сообщение потому, что подписаны на список рассылки > <CGatePro@mx.ru>.

> Чтобы отписаться, отправьте сообщение на адрес <CGatePro-off@mx.ru>
> Чтобы переключиться в режим дайджеста - mailto:<CGatePro-digest@mx.ru>
> Чтобы переключиться в индексный режим - mailto:<CGatePro-index@mx.ru>
> Для административных запросов адрес <CGatePro-request@mx.ru>
> Архив списка: http://mx.demos.su/lists/cgp-russian/

Получено Sun Mar 11 04:03:04 2012