Q: searching active directory

[JIM.H.]

Hello,
Here is my code that I got from internet and I am assuming this give me
e-mail address of the people in the active directory.

Private Sub Page_Load(ByVal sender As System.Object, ByVal e As
System.EventArg s) Handles MyBase.Load
'Put user code to initialize the page here
Dim rootEntry As New DirectoryEntry( "GC://dc=oecc,dc=net" )
Dim searcher As New DirectorySearch er(rootEntry)
searcher.Proper tiesToLoad.Add( "mail")

Dim results As SearchResultCol lection
results = searcher.FindAl l()

Dim result As SearchResult

For Each result In results
Response.Write( result.Properti es("mail")(0))
Next

End Sub

I got “Object reference not set to an instance of an object� at line
Response.Write( result.Properti es("mail")(0)) , what am I missing?
Thanks,
Jim.

[JIM.H.]

Juan,
I use this at the filter
searcher.Filter = "(&(anr=myUser) (objectCategory =person))"
and this to see the result,
Response.Write( result.Properti es("mail")(0))
It seems I am getting active directory E-mail information for myUser.
Problem is when user does not have anything defined in the e-mail field,
response.write fails. How should I prevent from that?
Thanks,
Jim.
"JIM.H." wrote:

Juan,
Thanks for your help. your are very helpful. when I did,
searcher.Filter = "(&(anr=myUser) (objectCategory =mail))"
this did not give anything. I am using
Response.Write( result.GetDirec toryEntry.Name) to display result, is this
correct?
"Juan T. Llibre" wrote:

You'd need to modify the Filter.

searcher.Filter = "(&(anr=myUser) (objectCategory =person))"

Changing the objectCategory to the
category for "mail" should do it.

See a complete listing for LDAP objectCategorie s at:
http://dotnetjunkies.com/WebLog/bria.../31/40012.aspx


Juan T. Llibre
ASP.NET MVP
===========
"JIM.H." <JI**@discussio ns.microsoft.co m> wrote in message
news:D5******** *************** ***********@mic rosoft.com...

Thanks Juan,
It hellped well. I still have a problem though. This code gives me the
display name from active directory for myUser, I was trying to achive
e-mail
of the user, how should I get it?
Private Sub Page_Load(ByVal sender As System.Object, ByVal e As
System.EventArg s) Handles MyBase.Load
'Put user code to initialize the page here
Dim rootEntry As New DirectoryEntry( "LDAP://DC=MYDOMAIN,DC= net",
"MYDOMAIN\Admin ", "myPassword ")

Dim searcher As New DirectorySearch er(rootEntry)
searcher.Proper tiesToLoad.Add( "cn")
searcher.Proper tiesToLoad.Add( "mail")

searcher.Filter = "(&(anr=myUser) (objectCategory =person))"

Dim results As SearchResultCol lection
results = searcher.FindAl l()

Dim result As SearchResult

For Each result In results
Response.Write( result.GetDirec toryEntry.Name)
Next

End Sub
Thanks,
Jim.
"Juan T. Llibre" wrote:

> The server which is managing the
> Active Directory you want to search.
>
> You'll also need to feed the name and password
> of a user authorized to access the LDAP server.
>
> C#
> DirectoryEntry rootentry = new DirectoryEntry( LDAP://ADservername,
> "username","pas sword");
>
> VB.NET
> Dim rootEntry As New DirectoryEntry( LDAP://ADservername,
> "username","pas sword")
>
> See:
> http://www.codeproject.com/aspnet/ac...rectoryuse.asp
>
>
>
>
>
> Juan T. Llibre
> ASP.NET MVP
> ===========
> "JIM.H." <JI**@discussio ns.microsoft.co m> wrote in message
> news:66******** *************** ***********@mic rosoft.com...
> > yes but it requires a server name, which server I need to give?
> >
> > "David Jessee" wrote:
> >
> >> Shouldn't your DirectoryEntry Constructor start with LDAP:// ?
> >>
> >> "JIM.H." <JI**@discussio ns.microsoft.co m> wrote in message
> >> news:61******** *************** ***********@mic rosoft.com...
> >> > Hello,
> >> > Here is my code that I got from internet and I am assuming this give
> >> > me
> >> > e-mail address of the people in the active directory.
> >> >
> >> > Private Sub Page_Load(ByVal sender As System.Object, ByVal e As
> >> > System.EventArg s) Handles MyBase.Load
> >> > 'Put user code to initialize the page here
> >> > Dim rootEntry As New DirectoryEntry( "GC://dc=oecc,dc=net" )
> >> > Dim searcher As New DirectorySearch er(rootEntry)
> >> > searcher.Proper tiesToLoad.Add( "mail")
> >> >
> >> > Dim results As SearchResultCol lection
> >> > results = searcher.FindAl l()
> >> >
> >> > Dim result As SearchResult
> >> >
> >> > For Each result In results
> >> > Response.Write( result.Properti es("mail")(0))
> >> > Next
> >> >
> >> > End Sub
> >> >
> >> > I got "Object reference not set to an instance of an object" at line
> >> > Response.Write( result.Properti es("mail")(0)) , what am I missing?
> >> > Thanks,
> >> > Jim.
> >> >
> >> >
> >> >
> >>
> >>
> >>
>
>
>

[Juan T. Llibre]

Try

Response.Write( Result.GetDirec toryEntry().Pro perties("mail") .Value)

C'ya tomorrow! I'm outtahere.

Going to see a movie ( need to blow off some steam )


Juan T. Llibre
ASP.NET MVP
===========
"JIM.H." <JI**@discussio ns.microsoft.co m> wrote in message
news:76******** *************** ***********@mic rosoft.com...

Juan,
Thanks for your help. your are very helpful. when I did,
searcher.Filter = "(&(anr=myUser) (objectCategory =mail))"
this did not give anything. I am using
Response.Write( result.GetDirec toryEntry.Name) to display result, is this
correct?
"Juan T. Llibre" wrote:

You'd need to modify the Filter.

searcher.Filter = "(&(anr=myUser) (objectCategory =person))"

Changing the objectCategory to the
category for "mail" should do it.

See a complete listing for LDAP objectCategorie s at:
http://dotnetjunkies.com/WebLog/bria.../31/40012.aspx


Juan T. Llibre
ASP.NET MVP
===========
"JIM.H." <JI**@discussio ns.microsoft.co m> wrote in message
news:D5******** *************** ***********@mic rosoft.com...

> Thanks Juan,
> It hellped well. I still have a problem though. This code gives me the
> display name from active directory for myUser, I was trying to achive
> e-mail
> of the user, how should I get it?
>
>
> Private Sub Page_Load(ByVal sender As System.Object, ByVal e As
> System.EventArg s) Handles MyBase.Load
> 'Put user code to initialize the page here
> Dim rootEntry As New DirectoryEntry( "LDAP://DC=MYDOMAIN,DC= net",
> "MYDOMAIN\Admin ", "myPassword ")
>
> Dim searcher As New DirectorySearch er(rootEntry)
> searcher.Proper tiesToLoad.Add( "cn")
> searcher.Proper tiesToLoad.Add( "mail")
>
> searcher.Filter = "(&(anr=myUser) (objectCategory =person))"
>
> Dim results As SearchResultCol lection
> results = searcher.FindAl l()
>
> Dim result As SearchResult
>
> For Each result In results
> Response.Write( result.GetDirec toryEntry.Name)
> Next
>
> End Sub
> Thanks,
> Jim.
>
>
> "Juan T. Llibre" wrote:
>
>> The server which is managing the
>> Active Directory you want to search.
>>
>> You'll also need to feed the name and password
>> of a user authorized to access the LDAP server.
>>
>> C#
>> DirectoryEntry rootentry = new DirectoryEntry( LDAP://ADservername,
>> "username","pas sword");
>>
>> VB.NET
>> Dim rootEntry As New DirectoryEntry( LDAP://ADservername,
>> "username","pas sword")
>>
>> See:
>> http://www.codeproject.com/aspnet/ac...rectoryuse.asp
>>
>>
>>
>>
>>
>> Juan T. Llibre
>> ASP.NET MVP
>> ===========
>> "JIM.H." <JI**@discussio ns.microsoft.co m> wrote in message
>> news:66******** *************** ***********@mic rosoft.com...
>> > yes but it requires a server name, which server I need to give?
>> >
>> > "David Jessee" wrote:
>> >
>> >> Shouldn't your DirectoryEntry Constructor start with LDAP:// ?
>> >>
>> >> "JIM.H." <JI**@discussio ns.microsoft.co m> wrote in message
>> >> news:61******** *************** ***********@mic rosoft.com...
>> >> > Hello,
>> >> > Here is my code that I got from internet and I am assuming this
>> >> > give
>> >> > me
>> >> > e-mail address of the people in the active directory.
>> >> >
>> >> > Private Sub Page_Load(ByVal sender As System.Object, ByVal e
>> >> > As
>> >> > System.EventArg s) Handles MyBase.Load
>> >> > 'Put user code to initialize the page here
>> >> > Dim rootEntry As New
>> >> > DirectoryEntry( "GC://dc=oecc,dc=net" )
>> >> > Dim searcher As New DirectorySearch er(rootEntry)
>> >> > searcher.Proper tiesToLoad.Add( "mail")
>> >> >
>> >> > Dim results As SearchResultCol lection
>> >> > results = searcher.FindAl l()
>> >> >
>> >> > Dim result As SearchResult
>> >> >
>> >> > For Each result In results
>> >> > Response.Write( result.Properti es("mail")(0))
>> >> > Next
>> >> >
>> >> > End Sub
>> >> >
>> >> > I got "Object reference not set to an instance of an object" at
>> >> > line
>> >> > Response.Write( result.Properti es("mail")(0)) , what am I missing?
>> >> > Thanks,
>> >> > Jim.
>> >> >
>> >> >
>> >> >
>> >>
>> >>
>> >>
>>
>>
>>

[Juan T. Llibre]

OK...

You should check for null values,
and replace the null value with a space " ".

Sorry, I don't have time for real code right now.

pseudo code :

If IsNull(result.P roperties("mail ")(0)) Then
result.Properti es("mail")(0) = " "
else
Response.Write( result.Properti es("mail")(0))
End if

You might have to do some syntax-checking.
I'm on the run to the movies...


Juan T. Llibre
ASP.NET MVP
===========
"JIM.H." <JI**@discussio ns.microsoft.co m> wrote in message
news:2C******** *************** ***********@mic rosoft.com...

Juan,
I use this at the filter
searcher.Filter = "(&(anr=myUser) (objectCategory =person))"
and this to see the result,
Response.Write( result.Properti es("mail")(0))
It seems I am getting active directory E-mail information for myUser.
Problem is when user does not have anything defined in the e-mail field,
response.write fails. How should I prevent from that?
Thanks,
Jim.
"JIM.H." wrote:

Juan,
Thanks for your help. your are very helpful. when I did,
searcher.Filter = "(&(anr=myUser) (objectCategory =mail))"
this did not give anything. I am using
Response.Write( result.GetDirec toryEntry.Name) to display result, is this
correct?
"Juan T. Llibre" wrote:

> You'd need to modify the Filter.
>
> searcher.Filter = "(&(anr=myUser) (objectCategory =person))"
>
> Changing the objectCategory to the
> category for "mail" should do it.
>
> See a complete listing for LDAP objectCategorie s at:
> http://dotnetjunkies.com/WebLog/bria.../31/40012.aspx
>
>
>
>
> Juan T. Llibre
> ASP.NET MVP
> ===========
> "JIM.H." <JI**@discussio ns.microsoft.co m> wrote in message
> news:D5******** *************** ***********@mic rosoft.com...
> > Thanks Juan,
> > It hellped well. I still have a problem though. This code gives me
> > the
> > display name from active directory for myUser, I was trying to achive
> > e-mail
> > of the user, how should I get it?
> >
> >
> > Private Sub Page_Load(ByVal sender As System.Object, ByVal e As
> > System.EventArg s) Handles MyBase.Load
> > 'Put user code to initialize the page here
> > Dim rootEntry As New
> > DirectoryEntry( "LDAP://DC=MYDOMAIN,DC= net",
> > "MYDOMAIN\Admin ", "myPassword ")
> >
> > Dim searcher As New DirectorySearch er(rootEntry)
> > searcher.Proper tiesToLoad.Add( "cn")
> > searcher.Proper tiesToLoad.Add( "mail")
> >
> > searcher.Filter = "(&(anr=myUser) (objectCategory =person))"
> >
> > Dim results As SearchResultCol lection
> > results = searcher.FindAl l()
> >
> > Dim result As SearchResult
> >
> > For Each result In results
> > Response.Write( result.GetDirec toryEntry.Name)
> > Next
> >
> > End Sub
> > Thanks,
> > Jim.
> >
> >
> > "Juan T. Llibre" wrote:
> >
> >> The server which is managing the
> >> Active Directory you want to search.
> >>
> >> You'll also need to feed the name and password
> >> of a user authorized to access the LDAP server.
> >>
> >> C#
> >> DirectoryEntry rootentry = new DirectoryEntry( LDAP://ADservername,
> >> "username","pas sword");
> >>
> >> VB.NET
> >> Dim rootEntry As New DirectoryEntry( LDAP://ADservername,
> >> "username","pas sword")
> >>
> >> See:
> >> http://www.codeproject.com/aspnet/ac...rectoryuse.asp
> >>
> >>
> >>
> >>
> >>
> >> Juan T. Llibre
> >> ASP.NET MVP
> >> ===========
> >> "JIM.H." <JI**@discussio ns.microsoft.co m> wrote in message
> >> news:66******** *************** ***********@mic rosoft.com...
> >> > yes but it requires a server name, which server I need to give?
> >> >
> >> > "David Jessee" wrote:
> >> >
> >> >> Shouldn't your DirectoryEntry Constructor start with LDAP:// ?
> >> >>
> >> >> "JIM.H." <JI**@discussio ns.microsoft.co m> wrote in message
> >> >> news:61******** *************** ***********@mic rosoft.com...
> >> >> > Hello,
> >> >> > Here is my code that I got from internet and I am assuming this
> >> >> > give
> >> >> > me
> >> >> > e-mail address of the people in the active directory.
> >> >> >
> >> >> > Private Sub Page_Load(ByVal sender As System.Object, ByVal e
> >> >> > As
> >> >> > System.EventArg s) Handles MyBase.Load
> >> >> > 'Put user code to initialize the page here
> >> >> > Dim rootEntry As New
> >> >> > DirectoryEntry( "GC://dc=oecc,dc=net" )
> >> >> > Dim searcher As New DirectorySearch er(rootEntry)
> >> >> > searcher.Proper tiesToLoad.Add( "mail")
> >> >> >
> >> >> > Dim results As SearchResultCol lection
> >> >> > results = searcher.FindAl l()
> >> >> >
> >> >> > Dim result As SearchResult
> >> >> >
> >> >> > For Each result In results
> >> >> > Response.Write( result.Properti es("mail")(0))
> >> >> > Next
> >> >> >
> >> >> > End Sub
> >> >> >
> >> >> > I got "Object reference not set to an instance of an object" at
> >> >> > line
> >> >> > Response.Write( result.Properti es("mail")(0)) , what am I
> >> >> > missing?
> >> >> > Thanks,
> >> >> > Jim.
> >> >> >
> >> >> >
> >> >> >
> >> >>
> >> >>
> >> >>
> >>
> >>
> >>
>
>
>