RE: Creating AD account and Exchange Account

Yea, I haven't gotten that far yet, I'll let you know what we discover.

> -----Original Message-----
> From: Yash Vartak [mailto:[email protected]]
> Sent: Monday, January 11, 2010 9:34 AM
> To: Young, Darren; Sheahan, John; [email protected]
> Subject: Re: Creating AD account and Exchange Account
> 
> You wont face a problem if you are connecting on Outlook over IMAP or
> SMTP\POP3, how ever exchange 2007 mailboxes created by setting few
> attributes won't be usable using Outlook Web Access or from mobile
> device.
> 
> That's what I observed, in case you are able to get beyond this issue
> do let
> me know, I have already spent many hours struggling get those mail
> boxes
> work with OWA \ Mobile device.
> 
> Regards,
> Yash
> 
> 
> On 1/11/10 11:24 PM, "Young, Darren" <[email protected]>
> wrote:
> 
> > I've been testing our scripts against 2007 and so far, so good. All
> we do is
> > write homeMDB and a few other attributes to the user objects and when
> the
> > first message is received by the mailbox host it initializes the
> mailbox. At
> > the same time attributes such as homeMTA and mailNickName are written
> to the
> > AD object as well.
> >
> >> -----Original Message-----
> >> From: Yash Vartak [mailto:[email protected]]
> >> Sent: Monday, January 11, 2010 8:25 AM
> >> To: Sheahan, John; '[email protected]'
> >> Subject: Re: Creating AD account and Exchange Account
> >>
> >> Yes that¹s right setting attributes works fine for AD\Exchange 2003,
> >> but
> >> this method fails when you upgrade the setup to Exchange 2007.
> >>
> >> ADSI\COM , and LDAP are not supported by Exchange 2007, Exchange
> 2007
> >> is not
> >> as tightly integrated with AD as Exchange 2003, (as in Exchange 2007
> >> you
> >> can¹t right click on a AD user and select create mailbox), you need
> to
> >> do it
> >> through a different Exchange 2007 console to create a mailbox for a
> AD
> >> user.)
> >>
> >> Regards,
> >> Yash
> >>
> >>
> >> On 1/11/10 8:56 PM, "Sheahan, John" <[email protected]>
> wrote:
> >>
> >>> Thanks a lot Yash.
> >>>
> >>> I was able to create both the AD and Exchange 2003 account from my
> >> Perl script
> >>> using Net Ldap.
> >>>
> >>> Are you saying that you think this won¹t work once I eventually go
> to
> >> Exchange
> >>> 2007?
> >>>
> >>> Thanks
> >>>
> >>> john
> >>>
> >>>
> >>>
> >>>
> >>> From: Vartak, Yash V [mailto:[email protected]]
> >>> Sent: Sunday, January 10, 2010 2:10 AM
> >>> To: Sheahan, John; '[email protected]'
> >>> Subject: RE: Creating AD account and Exchange Account
> >>>
> >>> John,
> >>>
> >>> Sorry for replying this mail so late, I saw it just a day back.
> >>> I guess you have had trouble while creating a exchange 2007 mailbox
> >> with AD
> >>> using perl
> >>>
> >>> Below is a sample code, this would create a AD active user UAC 512
> >>>
> >>> $ADS_UF_NORMAL_ACCOUNT=512
> >>>
> >>> sub Make_User {
> >>>      my ($objConn, $emplid, $ntID, $cn, $dn, $displayName,
> >>>            $m_server, $s_grp, $g_name, $sn, $grp, $ou,
> >>>            $dn, $company, $type, $mail, $pwd, $success) = @_;
> >>>      my ($ADS_UF_NORMAL_ACCOUNT, $objParent, $objUser);
> >>>      print LOG "make_user starting Success = $success\n" if
> ($debug);
> >>>      use Win32::OLE;
> >>>      Win32::OLE->Option(Warn => 2);
> >>>
> >>>       # Taken from $ADS_USER_FLAG_ENUM
> >>>
> >>>      print "DN = $dn\n CN = $cn\n" if($debug);
> >>>       $ADS_UF_NORMAL_ACCOUNT = 512;
> >>>       # Create base user account
> >>>      $objParent = Win32::OLE->GetObject("LDAP://".$dn);
> >>>      $objUser   = $objParent->Create("user", $cn); # e.g. joes
> >>>      $objUser->Put('sAMAccountName' , $ntID);   # e.g. joes
> >>>      $objUser->Put('userPrincipalName' , $ntID. "\@ad.xyz.com"); #
> >> e.g.
> >>> [email protected]
> >>>      if (($g_name) && ($g_name ne $sn)) {
> >>>         $objUser->Put('givenName', $g_name);   # e.g. Joe
> >>>       }
> >>>      $objUser->Put("sn", $sn);           # e.g. Smith
> >>>      $objUser->Put("displayName", $displayName); # e.g. Joe
> >>>      $objUser->SetInfo;
> >>>      if (Win32::OLE->LastError) {
> >>>         $success = 0;
> >>>       }
> >>>       # set the password, enable the account & set VPN access
> >>>      $objUser->SetPassword($pwd);
> >>>      $objUser->Put("userAccountControl", $ADS_UF_NORMAL_ACCOUNT);
> >>>      $objUser->Put("pwdLastSet", '0');
> >>>      $objUser->Put("company", $company);
> >>>      #set dial access
> >>>      if (($grp) and ($grp ne "512")) {
> >>>         $objUser->Put('msNPAllowDialin', "TRUE");
> >>>       }
> >>>      $objUser->SetInfo;
> >>>      if (Win32::OLE->LastError) {
> >>>         $success = 0;
> >>>       }
> >>>    } # end Make_User
> >>>
> >>> Once you are done with creating a active user .. use external
> >> powershell to
> >>> create a mail box, I know this is cumbersome but only reliable way
> to
> >> create a
> >>> mail box on Exchange 2007.
> >>>
> >>> enable_nt_mb.ps1  is a external power shell script to mail enable
> and
> >> existing
> >>> nt id it take ntid , mailserver, storagegrp as command line
> >> paramenters
> >>>
> >>>       my $yCmd="powershell -command \"& {d:\\enable_nt_mb.ps1 $ntID
> >> $m_server
> >>> $s_grp}\"";
> >>>        my $opCmd=`$yCmd`;
> >>>
> >>> Something on these lines.
> >>>
> >>> Regards,
> >>> Yash Vartak
> >>>
> >>>
> >>> -----Original Message-----
> >>> From: Sheahan, John [mailto:[email protected]]
> >>> Sent: Wednesday, December 30, 2009 2:07 AM
> >>> To: '[email protected]'
> >>> Subject: Creating AD account and Exchange Account
> >>>
> >>> Has anyone been able to create the AD and Exchange Account from a
> >> perl script?
> >>>
> >>> john
> >>>
> >>
> >> Regards
> >>
> >> Yash
> >>
> >> ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
> >> Ph +65 9456 8179 | http://www.vartakinc.com
> >>
> >>
> >>
> >>
> >>
> >
> 
> Regards
> 
> Yash
> 
> ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
> Ph +65 9456 8179 | http://www.vartakinc.com
> 
> 
> 
> 
> 
>