Hello list,

I try to connect to a CDOEXM-object, but I fail to do so.

My code looks like that:

use Win32::OLE

my $dn = <LDAP-String in the form of CN=..,CN=,DC=local,DC=root>;
my $ADserver = "ad.my.domain";

# this works and proofs that the LDAP-string is correct.
my $ldapobj = Win32::OLE->GetObject("LDAP://$ADserver/$dn";) or die;


my $SGobj = Win32::OLE->new('CDOEXM.StorageGroup') or die; #this works! 

# this fails 
$svobj->DataSource->Open("LDAP://$logonserver/$dn";)
        or die "could not connect: " . 
            Win32::OLE->LastError() ." ". 
            Win32::FormatMessage Win32::GetLastError();

Any help / pointer to documentation appreciated!!

Thank you very much!

Michael
_______________________________________________
Perl-Win32-Admin mailing list
[EMAIL PROTECTED]
To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs

Reply via email to