Enum group from a user

[gandzy]

Hello,

I'm a newbie in vbscript and i don't find any response for this problem :

I have to enumerate all group from an active directory where a user is the manager.

how can I do that ?
Thank you for your help !

 

[Targol]

Here is a script that gets all groups for the logged user. No question of manager or else in it but I think this should help you :

Dim G_User, Group, Gob_WshEnv

Set Gob_WshEnv = Gob_WshShell.Environment("PROCESS")
Set G_User = GetObject("WinNT://" & Gob_WshEnv.Item("USERDOMAIN")& "/" & WshNetwork.UserName)
For Each Group In G_User.Groups
  Msgbox Group.Name
Next

Water is not bad as long as it stays out human body ;-)

 

[Targol]

Sorry, I forgot defining and initializing "WshNetwork" var in my previous post. Add these lines at the top of the code I gave :

Dim WshNetwork
Set WshNetwork	= CreateObject("WScript.Network")

Water is not bad as long as it stays out human body ;-)