Hello!
I've got a perl script I use to create users. It works wonderfully EXCEPT it has trouble setting some extended attributes that we added to the Active Directory. Every attribute and the password sets fine, except for the Attributes that start with vscEduPerson .
Any thoughts ?
My code looks like this :
my $u = $handle->Create("user","cn=$key");
$u->{samAccountName} = "$webid";
$u->SetInfo();$u->{'Full Name'} = "$fname $mname $lname";
$u->{displayName} = "$lname, $fname $mname";
$u->{sn} = "$lname";
$u->{givenName} = "$fname";
if( $mname ne "" ){
$minitial = "";
$minitial = substr($mname, 0, 1);
$u->{initials} = "$minitial";
}
$u->{userPrincipalName} = "[EMAIL PROTECTED]";
$u->{AccountDisabled} = 0;
$u->{Description} = "$classification_desc";
$u->SetInfo();$u->{vscEduPersonMapleID} = "$webid";
$u->{vscEduPersonColleagueID} = "$at_id";
if( $classification eq "Student" ){
$u->{vscEduPersonMajor} = "$classification";
}
$u->{vscEduPersonPrimaryLocation} = "$school";
$u->{vscEduPersonClassification} = "$classification";
$u->{vscEduPersonClassificationDesc} = "$classification_desc";
$u->SetInfo();$u->SetPassword($init_pw); $u->SetInfo();
Michael
--
--------------------------------o--------------------------------- Michael H. Martel | Systems Administrator [EMAIL PROTECTED] | Vermont State Colleges http://probe.vsc.edu/~michael | PH:802-241-2544 FX:802-241-3363
_______________________________________________ Perl-Win32-Admin mailing list [EMAIL PROTECTED] To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs
