Find Users OU 1

[ClulessChris]

Can anybody suggest a method to find a users OU?


Everybody body is somebodys Nutter.

 

[CautionMP]

ClulessChris,
If your talking about the MS Active Directory OU you should take a look at the Active DS Type Library (activeds.tlb). I think you can use the [tt]GetEx[/tt] method of the [tt]IADsUser[/tt] class to return a users OU.

Hope this helps,
CMP

[small]For the best results do what I'm thinking, not what I'm saying.[/small]
(GMT-07:00) Mountain Time (US & Canada)

 

[xlbo]

Sample VBA - the OU is available from the DN field:

Sub GetUsersFromAD()
  Dim lRow As Long

  Const ADS_SCOPE_SUBTREE = 2

  Set objConnection = CreateObject("ADODB.Connection")
  Set objCommand = CreateObject("ADODB.Command")
  objConnection.Provider = "ADsDSOObject"
  objConnection.Open "Active Directory Provider"
  Set objCommand.ActiveConnection = objConnection

  objCommand.Properties("Page Size") = 1000
  objCommand.Properties("Searchscope") = ADS_SCOPE_SUBTREE

  objCommand.CommandText = _
      "SELECT DN FROM 'LDAP://dc=corphq,dc=co,dc=uk' WHERE samAccountName='UserIDGoesHere' "
  Set objRecordset = objCommand.Execute

Rgds, Geoff

We could learn a lot from crayons. Some are sharp, some are pretty and some are dull. Some have weird names and all are different colours but they all live in the same box.

Please read FAQ222-2244 before you ask a question

 

[ClulessChris]

Thanks for your input, Unfortunatly (for me) I'm not conversant with Active Directory. Could you suggest some reading that may give me a basic understanding?

Everybody body is somebodys Nutter.

 

[xlbo]

Active Directory is not too hard to understand

If you want to get a grip on the firlds included in it, use the CSVDE utility (available on MS website) to explore what fields are held. Other than that, I would suggest starting with the MS website and google and go from there

Rgds, Geoff

We could learn a lot from crayons. Some are sharp, some are pretty and some are dull. Some have weird names and all are different colours but they all live in the same box.

Please read FAQ222-2244 before you ask a question