Move & Disable computers from csv

#Script to move computers in a CSV to a OU, adding a comment on where the object is located & disable the object

#Importing AD Module

Write-Host " Importing AD Module….. "

import-module ActiveDirectory

Write-Host " Importing Move List….. "

# Reading list of computers from csv and loading into variable

$MoveList = Import-Csv -Path "%Path%\MoveComputer.csv"

# defining Target Path

$TargetOU = ‘OU=,OU=,DC=,DC=,DC=’

$countPC = ($movelist).count

$Date = Get-Date

$ShortDate = $Date.ToShortDateString()

$ShortTime = $Date.ToShortTimeString()

$Description = "Moved: $ShortDate"

Write-Host " Starting import computers …"

foreach ($Computer in $MoveList){

Write-Host " Setting Description on $Name"

$OU = (Get-ADComputer $Computer.CN).DistinguishedName

$Name = (Get-ADComputer $Computer.CN).Name

Get-ADComputer $Computer.CN | Set-ADComputer -Description "$Description from $OU"

}

foreach ($Computer in $MoveList){

Write-Host " Moving $Name"

$Name = (Get-ADComputer $Computer.CN).Name

Get-ADComputer $Computer.CN | Move-ADObject -TargetPath $TargetOU

}

foreach ($Computer in $MoveList){

Write-Host " Disable $Name"

$Name = (Get-ADComputer $Computer.CN).Name

Get-ADComputer $Computer.CN | Disable-ADAccount

}

Write-Host " Completed Move List "

Write-Host " $countPC Computers has been moved "

MoveComputer.csv

CN