I think you want
Win32::Lanman::NetUserModalsSet($server, \%info) , but the call has not
been tested (according to the documentation).
Win32::Lanman::NetUserModalsGet($server, \%info) populates %info hash with
below keys:
key value pairs and GUI translation (INCOMPLETE)
min_passwd_age Allow Changes Immediately = 0; Allow Changes in X
(seconds or days)
role ?
lockout_observation_window Account lockout Reset count in seconds (gui
has minutes)
max_passwd_age Maximum Password Age in seconds (gui has days) -1
=Password Never Expires ; divide by 5184000
min_passwd_len Minimum Password Length (unknown for blank)
domain_id binary information -- SID??
primary ???guessing PDC???
lockout_duration -1 = Forever gui is minutes, this setting is
probably in seconds
password_hist_len Password Uniqueness. Don't know what Do Not Keep
Password History value is.
domain_name ??guess domain??
force_logoff -1 = not checked box for Forcibly disconnect remote
users from server when logon hours expire.
lockout_threshold Lockout after X bad attempts.
The only ones I know work (and I only Get, not Set) are:
min_passwd_age
lockout_observation_window
max_passwd_age
min_passwd_len
lockout_duration
password_hist_len
lockout_threshold
Please let me know if you get more concrete key/value pairs.
joe
"Paul Greenwood" <[EMAIL PROTECTED]>@listserv.ActiveState.com on
05/14/2001 12:38:38 AM
Sent by: [EMAIL PROTECTED]
To: [EMAIL PROTECTED]
cc:
Subject: (Password) Account Policy?
Hi,
Can anybody tell me, is it possible to configure (Password) Account Policy
using a Perl Module?
I'm not sure if "LsaSetAccountDomainPolicy($server, \%info)" is the
function to use from Win32::Lanman. If it is, I don't know what the hash
structure is.
Any helpers?
Thanks! Paul
_______________________________________________
Perl-Win32-Admin mailing list
[EMAIL PROTECTED]
http://listserv.ActiveState.com/mailman/listinfo/perl-win32-admin
