Getting operating system group for a user

Hi

Using TS 6.5 SP1 Win 2003.

I have to know the operating system user group of a user .

I searched through the net but could not get any command to do so .

Could anyone let me know how to get the group(s) of a user to which he belongs ?

Regards
Rohit Pathak

Find more posts tagged with

Comments

kaalraa

Hi

Using TS 6.5 SP1 Win 2003.

I have to know the operating system user group of a user .

I searched through the net but could not get any command to do so .

Could anyone let me know how to get the group(s) of a user to which he belongs ?

Regards
Rohit Pathak

Use the command - groups userid. This will return you all the OS group names in which the user belongs to.

Migrateduser

Use the command - groups userid. This will return you all the OS group names in which the user belongs to.

I does not work as the environemt is Windows and not unix.

milind

Hi Achin,

Pls check foll link and let me know if you can solve ur problem.
http://jeremy.zawodny.com/perl/AcctInfo/AcctInfo.html

Regards
Milind

kaalraa

I does not work as the environemt is Windows and not unix.

Oops... overlooked that.

TestReport.rptdesign

ISCBorisB

Hi

Using TS 6.5 SP1 Win 2003.

I have to know the operating system user group of a user .

I searched through the net but could not get any command to do so .

Could anyone let me know how to get the group(s) of a user to which he belongs ?

Regards
Rohit Pathak

If you are (or can login as) a group member then "whoami /groups" will return group membership info for current user.

If you want an access from code take a look at Win32::NetAdmin package

rohitspathak123

Problem still exists .

Most of the replies are for unix OS . I am using WINDOWS 2003.

Pls let me know if we have any sollution .

Regards
Rohit Pathak

ISCBorisB

Pls let me know if we have any sollution

You obviously do not.

However, since I feel a bit altruistic today... Hopefully from the following sample you would be able to code what you need.
If you target a single user you may want to use Win32::NetAdmin::LocalGroupIsMember instead of LocalGroupGetMembers, etc...
Please note that it covers local groups only, LDAP/ADS won't be that simple

#!D:\system\iw-home\iw-perl\bin\iwperl
use strict;
use Win32::NetAdmin;
use Win32API::Net;

foreach my $group (@{getLocalGroups()}) {
   print "\n$group\n";
   foreach my $member (@{getLocalGroupMembers($group)}) {
      print "\t$member\n";
   }
}
exit 0;

sub getLocalGroups {
   my @groups = ();
   print Win32::GetLastError() if(!Win32API::Net::LocalGroupEnum('', \@groups));
   return \@groups;
}

sub getLocalGroupMembers {
   my ($group) = @_;
   my @members = ();
   print Win32::GetLastError() if(!Win32::NetAdmin::LocalGroupGetMembers('', $group, \@members));
   return \@members;
}