Revision as of 16:45, 4 July 2011 (view source) rosettacode>Ttmrichter No edit summary ← Older edit		Revision as of 13:00, 5 July 2011 (view source) rosettacode>Abu (Added PicoLisp) Newer edit →
Line 17: $ldap = ldap_connect($hostname, $port); $success = ldap_bind($ldap, $username, $password);</lang> =={{header\|PicoLisp}}== <lang PicoLisp>(unless (=0 (setq Ldap (native "libldap.so" "ldap_open" 'N "example.com" 389))) (quit "Can't open LDAP") ) (native "libldap.so" "ldap_simple_bind_s" 'I Ldap "user" "password")</lang> =={{header\|Python}}==

Active Directory/Connect (view source)