Active Directory/Search for a user: Difference between revisions
Content added Content deleted
Line 94: | Line 94: | ||
Example uses the [https://hackage.haskell.org/package/ldap-client <tt>ldap-client</tt>] package: |
Example uses the [https://hackage.haskell.org/package/ldap-client <tt>ldap-client</tt>] package: |
||
<lang haskell> |
<lang haskell>{-# LANGUAGE OverloadedStrings #-} |
||
{-# LANGUAGE OverloadedStrings #-} |
|||
module Main (main) where |
module Main (main) where |
||
Line 109: | Line 108: | ||
Ldap.search ldap (Ldap.Dn "o=example.com") (Ldap.typesOnly True) (Attr "uid" := Text.encodeUtf8 "user") [] |
Ldap.search ldap (Ldap.Dn "o=example.com") (Ldap.typesOnly True) (Attr "uid" := Text.encodeUtf8 "user") [] |
||
for_ entries $ \entry -> |
for_ entries $ \entry -> |
||
print entry |
print entry</lang> |
||
</lang> |
|||
=={{header|Java}}== |
=={{header|Java}}== |