1

Net::LDAP をインストールしましたが、AD サーバーに対して認証できません。 

#!/usr/bin/perl

use strict;
use Net::LDAP;

my $ldap = "";
$ldap = Net::LDAP->new("serv01.noboundaries.dyndns.org");
my $mesg = "";
$mesg = $ldap->bind("CN=sansken,OU=NB_Users,DC=noboundaries,DC=dyndns,DC=org", password => "XXXXXXX");

die $mesg->error() if $mesg->code();
$mesg = $ldap->unbind;

私が得ているエラーは次のとおりです。

80090308: LdapErr: DSID-0C0903A9、コメント: AcceptSecurityContext エラー、データ 52e、./ldap.pl 行 11、行 751 の v1db0。

4

1 に答える 1

1

完全な DN の代わりに DOMAIN\USER を使用してみてください。upn も使用できます ( user@my.domain.net )

このコードは私のために働いています:

my $ad_Obj = Net::LDAP->new('my.domain.net', port => 389) or die $!;
$ad_Obj->bind('MY\FooUser', password =>'MyReallySecurePassword')or die $!;

$Mesg = $ad_Obj->search(
    filter=>"(sAMAccountName=FooUser)",
    attrs => "['*']",
    base=>'DC=my,DC=domain,DC=net'
); 

foreach $ad_Object ($Mesg->entries) {
    print $ad_Object->dn() . "\n";
}

$ad_Obj->unbind;
$ad_Obj->disconnect;
于 2014-03-24T19:07:42.010 に答える