Powershell Script to Add ActiveDirectory (AD) Users

Been a while since I blogged on SharePoint. For the past year I have been more involved in DBA work, and have been more active in my other blog (http://sqlmusings.wordpress.com)

Anyway, here is an old script I have been meaning to post:

#* FileName:  PowerShellTemplate.ps1

#*=============================================================================

#* Created:     [11 December 2007]

#* Author:      Donabel Santos

#* Reqrmnts:   

#* Keywords:   

#*=============================================================================

#* Purpose:    

#*             

#* This Powershell script queries ActiveDirectory for OU-specific

#* users and inserts those users as new records in a Sharepoint

#* out-of-the-box Contact List

#*=============================================================================

#*=============================================================================

#* SCRIPT BODY

#*=============================================================================

#Powershell Script that queries a specific OU in AD,

#and populates the Contact List

#based on the members that are queried

#IMPORTANT NOTE:

#This needs to be run on the MOSS Server because the

#SP Object Model cannot be invoked remotely

#Step 1: Install Powershell RC2

#http://support.microsoft.com/kb/925228

#Step 2: Set Execution Policy to RemoteSigned (uncomment below)

#Set-ExecutionPolicy RemoteSigned

#Step 3: Set the following variables

$siteUrl = "http://moss/sites/test" 

$ou = "LDAP://OU=My Group,OU=Guest Users,DC=domain,DC=ca"

#Step 4: Run this script on Powershell on the Sharepoint Server

#Rest of code follows

#Load Sharepoint DLL

[System.Reflection.Assembly]::LoadWithPartialName("Microsoft.SharePoint") 

#we want to query just the top web of the "test" site collection

$webName = ""  

#create a site object

$spSite = new-object Microsoft.SharePoint.SPSite($siteurl) 

#the following just displays URL, ID, Name and Users in a table format

$spSite.AllWebs | format-table Url, ID, Name, AllUsers

#open web

$spWeb = $spSite.OpenWeb($webName) 

#we want to get a handle on contacts

$listName = "Contacts"

#get a handle to the Contacts list

$spList = $spWeb.lists[$listName] 

#Create an AD DirectorySearcher object

$searcher = new-object DirectoryServices.DirectorySearcher([ADSI]"$ou")

#sample filter below, if you need to filter further

#$searcher.filter = "(&(objectClass=user)(givenName=Belle))"

#find all that matches

$groups = $searcher.findall()

#the following for loop just displays

@(foreach($group in $groups)

{

    [string]$firstname = $group.properties.givenname

    [string]$lastname = $group.properties.sn

    if (($firstname.length -gt 0) -and ($lastname.length -gt 0))

    {

       "Given Name:{0} {1}" -f  $firstname, $firstname.length

    }

}

)

#this code block inserts the AD user as a new user 

#into the Sharepoint Contact list

@(foreach($group in $groups)

{

    #extract all properties we need first

    #add fields here if necessary

    [string]$name = $group.properties.name

    [string]$firstname = $group.properties.givenname

    [string]$lastname = $group.properties.sn

    [string]$company = $group.properties.company

    [string]$email = $group.properties.mail

    [string]$objectclass = $group.properties.objectclass

    [string]$distinguishedname = $group.properties.distinguishedname

    #now add this to the sharepoint list only if first name 

    #and last name are not empty

    #add fields here if necessary

    if (($firstname.length -gt 0) -and ($lastname.length -gt 0))

    {

       $spitem = $spList.Items.Add() 

       $spitem["Last Name"] = $lastname

       $spitem["First Name"] = $firstname

       $spitem["Company"] = $company

       $spitem["E-mail Address"] = $email

       $spitem.Update() 

    }

}

)

#voila! we're done!

#*=============================================================================

#* END OF SCRIPT: 

#*=============================================================================