Might be this is a stupid question but
i dont know how to solve the problem.
I create new useraccounts with win32::lanman.
Here is the code:
sub create_user {
if(!Win32::Lanman::NetUserAdd($server, {'name' => $user,
'password' => $password,
'comment' => $domain,
'flags' =>
UF_DONT_EXPIRE_PASSWD,
'full_name' => $user,
'password_expired' => 0}))
{
print "Account cant be created!\n";
&emergency_exit;
}
Win32::Lanman::NetLocalGroupAddMembers($server, "Users", [$user]);
Win32::Lanman::NetLocalGroupAddMembers($server, "Quota", [$user]);
}
Everything works well, the account is created
an the user is member of both groups.
Now i try to login with this useraccount
on a webpage which is password protected
but it wont work. In the event log it tells
me it can not logon this account as is has
expired (the error message is in german so
i can not tell you what exactly would be the
message on an englich nt box).
Does anyone know why this happens?
As you can see the flag UF_DONT_EXPIRE_PASSWD
is set and 'password_expired' is set to '0'
(i tried '1' also -- no effort).
What have i done wrong?
BTW. this happens on NT4 and W2k, on
Worksstations and Servers, on PDC�s,
BDC�s and standalone machines.
Best regards
Michael
[EMAIL PROTECTED]
_______________________________________________
Perl-Win32-Admin mailing list
[EMAIL PROTECTED]
http://listserv.ActiveState.com/mailman/listinfo/perl-win32-admin
