Powershell Script to move an AD user account to another OU

Question

Hi Everyone
I have been searching for this script a long while so if you are having the same problem here is the solution:
Given only a samaccount name/username, ths script will find the location of the user account and move it to the OU that you want:
# Given just the username/samaccountname (Andre), the location of the user object is found
# and the account is then moved to the NewOU
$UserName = "Andre"
# Finding the location of the user account Andre:
$Root = [ADSI]''
$searcher = new-object System.DirectoryServices.DirectorySearcher($root)
$searcher.filter = "(&(objectClass=user)(DisplayName= $UserName))"
$User = $searcher.findone()
# Binding the user account to $AUser and the OU to move to to $MovetoOU
$ADSPath = $User.Properties.adspath
$MoveToOU = [ADSI]("LDAP://OU=NewOU,DC=mydomain,DC=com")
$AUser = [ADSI]("$ADSPath")
# Command to Do the actual move
$AUser.PSBase.moveto($MoveToOU)
# Send me some comments.

Answer 1

I like a method like this...
Import-Module ActiveDirectory
get-aduser -filter {<What ever your search criteria is> } | %{move-ADObject $_.DistinguishedName -targetpath 'OU=NewOU,DC=Contoso,DC=Local'}
Works on Server 2008 R2 domain controllers, and RSAT tools on Windows 7 with SP1 when you have the AD powershell portion installed. Does not work with Server 2003 domain controllers or earlier.
I use that, but I don't care for having to type out the entire DN of the target OU if I'm working from the console.
I have this in my profile:
function Get-OU ($Name)
{ Get-ADOrganizationalUnit -filter "Name -like '*$Name*'" |
Out-GridView -OutputMode Single
So I can do this:
Import-Module ActiveDirectory
get-aduser -filter {<What ever your search criteria is> } |
%{ move-ADObject $_.DistinguishedName -targetpath (Get-OU Test).DistinguishedName }
And I'll get a grid view of all of the Test OUs, and I just pick the one I want from the gridview.
[string](0..33|%{[char][int](46+("686552495351636652556262185355647068516270555358646562655775 0645570").substring(($_*2),2))})-replace " "