How to extract Group name from windows active directory?

[alisaif]

Hi,

Please refer to the subject, How can I get the same from Windows Server 2012 active Directory.

I am using Mr.Mike Gagnon's code which is giving me the details of the users.

strDomain = "STG"
Clear
On Error 
Public PrimDomainContr
Create Cursor names (username c(30),;
                     fullname c(80),;
                  description c(80),;
                        Class c(50),;
                       accdisable l,;
                        acclocked l,;
                      profile c(30),;
                  loginscript c(50),;
                      Homedir c(30))

PrimDomainContr = Getobject("WinNT://" + strDomain)
For Each User In PrimDomainContr
    If User.Class = 'User'
        Insert Into names (username,fullname,description,Class,accdisable,acclocked,profile,;
        loginscript,Homedir) Values (User.Name,user.fullname,User.description,User.Class,User.AccountDisabled,;
        User.IsAccountLocked,User.Profile,User.loginscript,User.Homedirectory)
    Endif
Next
Browse Norm

In addition to that kindly let me know how to include group name in the above mentioned code?

Thanks

Saif

 

[GriffMG]

A quick google suggests that something from here will take you in the right direction:

Set usr = GetObject("WinNT://Fabrikam/jsmith,user") 
grpPrimaryID = usr.Get("PrimaryGroupID")

This is VB, for VFP in your above example, the syntax would be more like:

replace names.Group with User.Get("PrimaryGroupID")

Regards

Griff
Keep [Smile]ing

There are 10 kinds of people in the world, those who understand binary and those who don't.

I'm trying to cut down on the use of shrieks (exclamation marks), I'm told they are not good for you. ​

 

[SytzedeBoer]

Mike, this would be really good if it could include a column for how many files each has open.
Can that be done ?

 

[DSummZZZ]

You're confusing domain data with file server data. You'll have to query a file server (or servers) to get open file handles.


-Dave Summers-

Even more Fox stuff at:

http://www.dave-summers.net/foxprolinks.htm

 

[Mike Gagnon]

Saif

This needs a little translation.

http://stackoverflow.com/questions/...s-member-of-active-directory-group-asp-net-vb

SytzedeBoer

Wrong place to find that information, it is not stored in the active directory module.



Mike Gagnon

If you want to get the best response to a question, please check out FAQ184-2483 first.