Con PowerShell sería algo así. Vamos primero a obtener los usuarios del dominio que no tienen carpeta personal (en el ejemplo pondremos como dominio tia.org).
Lo primero es conectar al dominio:
$Dominio = [ADSI] "LDAP://DC=tia,dc=org"
Una vez hemos conectado al dominio, creamos un objeto buscador conectado al dominio:
$Buscador = [System.DirectoryServices.DirectorySearcher]$Dominio
Una vez creado el buscador, especificamos el filtro LDAP para obtener objetos de tipo usuario y de categoría persona que no tengan nada establecido como carpeta personal:
$Filtro = "(&(objectClass=user)(objectCategory=person)(!(homeDirectory=*)))"
$Buscador.Filter = $Filtro
Ahora establecemos que la búsqueda sea en subárbol, es decir, que se busque en todo el dominio:
$Buscador.SearchScope = "Subtree"
Ya estamos preparados para ejecutar la búsqueda. Esto se hace con el método FindAll del objeto buscador. Lo que devuelve este método son objetods de tipo System.DirectoryServices.SearchResult, que tienen dos propiedades: Path y Properties.
La primera es la ruta LDAP del objeto devuelto y la segunda es un array con las propiedades del objeto. Usaremos la propiedad Path para obtener el objeto System.DirectoryServices.DirectoryEntry que nos permitirá establecer la ruta de la carpeta personal
y la letra de unidad personal. En este ejemplo estableceremos como carpeta personal \\bacterio-srv\usuarios$\<sAMAccountName> y como letra de unidad personal la P. Una vez establecidos los valores se graban usando el método SetInfo del objeto
DirectoryEntry:
$Buscador.FindAll() | ForEach{ `
$Usuario = [ADSI] $_.Path
$Usuario.homeDirectory = "\\bacterio-srv\Usuarios$\$($Usuario.sAMAccountName)"
$Usuario.homeDrive = "P:"
$Usuario.SetInfo()
}
Si ponemos todo junto:
# Conectamos al dominio
$Dominio = [ADSI] "LDAP://DC=tia,dc=org"
# Creamos el buscador de LDAP
$Buscador = [System.DirectoryServices.DirectorySearcher]$Dominio
# Establecemos el filtro para encontrar usuario de categoría persona que
# no tengan establecida carpeta personal
$Filtro = "(&(objectClass=user)(objectCategory=person)(!(homeDirectory=*)))"
$Buscador.Filter = $Filtro
# establecemos que se busqye en todo el dominio
$Buscador.SearchScope = "Subtree"
# Ejecutamos la búsqueda
$Buscador.FindAll() | ForEach{ `
# Obtenemos el objeto DirectoryEntry del usuario actual
$Usuario = [ADSI] $_.Path
# Establecemos su carpeta personal
$Usuario.homeDirectory = "\\bacterio-srv\Usuarios$\$($Usuario.sAMAccountName)"
# Establecemos la letra de la unidad personal
$Usuario.homeDrive = "P:"
# Guardamos los cambios
$Usuario.SetInfo()
}
Un saludo
Fernando Reyes [MS MVP]
MCSA 2000/2003
MCSE 2000/2003
MCITP EnterpriseAdministrator
Web:
http://freyes.svetlian.com
Blog:
http://urpiano.wordpress.com
RSS:
http://urpiano.wordpress.com/feed/
freyes.champú@champú.mvps.org
(Aclárate la cabeza si quieres escribirme)
