>From the Lanman docs...
NetUserGetInfo($server, $user, \%info)
Retrieves information about user testuser on server \\testserver.
if(!Win32::Lanman::NetUserGetInfo("testserver", "testuser", \%info))
{
print "Sorry, something went wrong; error: ";
# get the error code
print Win32::Lanman::GetLastError();
exit 1;
}
$hours = unpack("b168", $user{'logon_hours'});
print "$info{'name'}\n";
print "$info{'comment'}\n";
print "$info{'usr_comment'}\n";
###############################
print "$info{'full_name'}\n";
###############################
print "$info{'password_age'}\n";
print "$info{'priv'}\n";
print "$info{'home_dir'}\n";
print "$info{'flags'}\n";
print "$info{'script_path'}\n";
print "$info{'auth_flags'}\n";
print "$info{'parms'}\n";
print "$info{'workstations'}\n";
print "$info{'last_logon'}\n";
print "$info{'last_logoff'}\n";
print "$info{'acct_expires'}\n";
print "$info{'max_storage'}\n";
print "$info{'units_per_week'}\n";
print "$hours\n";
print "$info{'bad_pw_count'}\n";
print "$info{'num_logons'}\n";
print "$info{'logon_server'}\n";
print "$info{'country_code'}\n";
print "$info{'code_page'}\n";
print "$info{'user_id'}\n";
print "$info{'primary_group_id'}\n";
print "$info{'profile'}\n";
print "$info{'home_dir_drive'}\n";
print "$info{'password_expired'}\n";
-----Original Message-----
From: Veeraraju_Mareddi [mailto:[EMAIL PROTECTED]]
Sent: 04 September 2001 10:48
To: Jos I. Boumans
Cc: [EMAIL PROTECTED]
Subject: RE: Getting a list of USERS from an NT USER GROUP
I want to get Full name of the User
----------------------------------------------------------------------------
----------------------------------------------------------------------------
---
use Win32::Lanman;
if(!Win32::Lanman::NetGroupGetUsers("\\\\hotnt001", "Webusers", \@users))
{
print "Sorry, something went wrong; error: ";
# get the error code
print Win32::Lanman::GetLastError();
exit 1;
}
#$NOTE="C:\\Webusers.txt"
open(WRITE ,">>C:\\Webusers.txt");
foreach $user (@users)
{
#don't print these binary data
#print "${$user}{'sid'}\n";
print WRITE "${$user}{'name'}\t${$user}{'Full Name'}\n";
}
----------------------------------------------------------------------------
------------------------------------------------------------------------
But I am Getting Only Username ,Is there any way we can get Full Name Also..
Thanx and Regards
Rajuveera
----------
From: Jos I. Boumans [SMTP:[EMAIL PROTECTED]]
Sent: Tuesday, September 04, 2001 1:07 PM
To: Veeraraju_Mareddi; [EMAIL PROTECTED]
Cc: [EMAIL PROTECTED]
Subject: Re: Getting a list of USERS from an NT USER GROUP
coincidently, i had to do the same thing yesterday...
i used Win32::AdminMisc module, which you can obtain from
www.roth.net
the docu is good, so it should all explain itself from there.
if your'e still stuck after installing, msg me, i'll send you some
sample
code.
regards,
Jos
----- Original Message -----
From: "Veeraraju_Mareddi" <[EMAIL PROTECTED]>
To: <[EMAIL PROTECTED]>
Cc: <[EMAIL PROTECTED]>
Sent: Tuesday, September 04, 2001 9:30 AM
Subject: Getting a list of USERS from an NT USER GROUP
> Dear Beginners,
>
> I have a small task of getting NT user list from a NT USER GROUP.
Please
> suggest me..
>
> Thanking you....
>
> With Regards
> Rajuveera
>
> --
> To unsubscribe, e-mail: [EMAIL PROTECTED]
> For additional commands, e-mail: [EMAIL PROTECTED]
>
>
>
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
--------------------------Confidentiality--------------------------.
This E-mail is confidential. It should not be read, copied, disclosed or
used by any person other than the intended recipient. Unauthorised use,
disclosure or copying by whatever medium is strictly prohibited and may be
unlawful. If you have received this E-mail in error please contact the
sender immediately and delete the E-mail from your system.
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
