get user details from Active Directory

[Guest]

Hi

I've got the Username of the logged in user and domain with
Page.User.Identity.Name. It comes in as "domain\user".

Now, I want to query AD to get the users Firstname and Email address. Can
anyone point me in the direction of an article?

Cheers


Dan

 

[Guest]

hi nash,
you have it all here
http://www.c-sharpcorner.com/DirectoryServices.asp
HTH
srini

 

[Mike Newton]

Use an LDAP search.

Here's the RFC: http://www.faqs.org/rfcs/rfc2254.html

Here are a couple of articles on how to use it:
http://www.wwwcoder.com/main/parentid/272/site/1694/68/default.aspx
http://www.codeproject.com/csharp/ADTester.asp
http://www.codeproject.com/aspnet/adsi1.asp

This one isn't as detailed:
http://www.codeproject.com/vb/net/LDAP_Using_VBnet.asp

Just remember that your logical operators for the filter are in prefix
notation. A search would go something like (&(CN='Dog')(Name='Yada'))
for AND operations, (|...) for OR operations.

The particular AD property that has the user name, I've found, is
sAMAccountName. This may or may not be the same for you. You'll have
to split off the domain name in any case.

 

[Guest]

Thanks guys - all very helpful.

However, I'm now trying to get it working (VC#). Problem I'm getting is it
doesn't seem to recognise the System.DirectoryServices namespace?

It's not in the Intellisense lists, and if I just type it, it says it can't
find it. Any ideas?

Cheers

Dan

 

[Mike Newton]

You need to add System.DirectoryServices as a reference.

 

[Eddy Jawed]

This is my technique listing e-mail addresses

Hi guys,

Here is some simple code that if you pass the first and surname of the person, it will find ALL e-mails of people with that name, not just the first one.


Imports System.Diagnostics.Debug
Imports System.DirectoryServices

Public Function GetEmailAddress(ByVal FirstName As String, ByVal LastName As String)

Dim X As Integer
Dim search As DirectorySearcher = New DirectorySearcher()
search.Filter = "(&(givenName=" + FirstName + ")(sn=" + LastName+ "))"

Dim res As SearchResultCollection = search.FindAll()

For Each ItemRes As SearchResult In res

WriteLine(ItemRes.Properties("mail")(0).ToString())
Next

End Function

Thanks

Eddy

 

[Eddy Jawed]

To get other object items.

Also if you want to modify it to get other items belonging to the person in question, then simply call on another property.

I used "mail" property in ItemRes.Properties("mail")(0).ToString())

But there are other properties for given name, domain etc, whatever it is you need. Just play around with it for a bit.