Aprende Informatica Conmigo

Por Deja un comentario

Windows Server 2008 – Mover cuentas de equipo

Es imprescindible para el trabajo diario, saber realizar una serie de tareas como mover una cuenta de equipo de una OU a otra.

En este tutorial vamos a ver cómo hacer esto de diferentes maneras.

La primera y mas sencilla es a través del «snap-in» de «Active Directory Users and Computers«.

Pongamos que queremos mover el equipo «sobremesa11» que está en la OU «informatica» de «equipos» a la OU «desarrollo«.

Abrimos «Active Directory Users and Computers» y nos posicionamos en la OU «informatica» de «equipos«.

Seleccionamos la cuenta de equipo «sobremesa11«. Pulsamos el botón derecho del ratón y seleccionamos «Move«:

movequi-01

A continuación nos mostrará el siguiente cuadro de diálogo.

Nos posicionamos en el OU destino. En este caso «desarrollo«.

Pulsamos «OK»

movequi-02

Comprobamos que el equipo «sobremesa11» ya no está en la OU «informatica«:

movequi-03

Y que está en la OU «desarrollo«:

movequi-04

Bien, ahora vamos a intentar mover equipos con otras herramientas.

Dsmove

Sintaxis:

dsmove DNEquipo [-newname nombre] [-newparent OUdestino]

Moveremos la cuenta de equipo «sobremesa10» a la OU «desarrollo«:

dsmove «CN=sobremesa10,OU=informatica,OU=equipos,DC=aic,DC=local» -newparent «OU=desarrollo,OU=equipos,DC=aic,DC=local»

movequi-05

Windows Powershell

En este caso utilizaremos el método «psbase.MoveTo» de la siguiente forma para mover el equipo «sobremesa09» a la OU «desarrollo«:

$objEquipo=[ADSI]»LDAP://CN=sobremesa09,OU=informatica,OU=equipos,DC=aic,DC=local»

$objEquipo.psbase.MoveTo(«LDAP://OU=desarrollo,OU=equipos,DC=aic,DC=local»)

movequi-06

De momento, esto va bien.

Seguimos:

Visual Basic Script

El método a utilizar mediante Visual Basic Script es «MoveHere» del objeto equipo.

Set objOU = GetObject(«LDAP://OU=informatica,OU=equipos,DC=aic,DC=local»)
objOU.MoveHere «LDAP://CN=sobremesa08,OU=desarrollo,OU=equipos,DC=aic,DC=local», vbNullString

Bueno, como ya sabemos, creamos un fichero de texto y metemos las dos líneas anteriores:

movequi-07

Lo ejecutamos:

movequi-08

Bueno, pues ya hemos visto varias formas de mover un objeto equipo entre OUs.

Esto lo podemos aplicar, como he comentado antes, con otros objetos del Directorio Activo.

Hemos movido 4 equipos de la OU «informatica» a la OU «desarrollo«. Vamos a comprobarlo:

movequi-09

movequi-10

Ya veis que si, que los movimientos se han hecho bien.

Bueno, aqui finalizamos este tutorial.

Saludos.

—–

Oscar Abad

http://www.xulak.com – Consultoría informática

Por Deja un comentario

Windows Server 2008 – Configurar atributos de equipo con Powershell y VBScript

Para modificar o configurar uno o varios atributos de las cuentas de equipo mediantte Powershell o Visual Basic Script, debemos seguir tres pasos:

1-. Conectar a la cuenta de equipo de la forma: «LDAP://DNEquipo».

2-. Utilizar el método «Put» del equipo para modificar un atributo.

3-. Utilizar el comando SetInfo() para que se lleven a cabo las modificaciones.

Vamos a verlo ahora por separado:

Windows Powershell

Los comandos que debemos utilizar son:

$objEquipo = [ADSI]»LDAP://DNEqupio»
$objEquipo.Put(«propiedad», valor)
$objEquipo.SetInfo()

Bien, ahora vamos a realizar un ejemplo. Vamos a modificar la propiedad «description» del equipo «sobremesa08«.

Para ello, ejecutaremos los siguientes comandos:

$objEquipo = [ADSI]»LDAP://CN=sobremesa08,OU=informatica,OU=equipos,DC=aic,DC=local»
$objEquipo.Put(«description», «Equipo de sobremesa número 8»)
$objEquipo.SetInfo()

confatrequpowvbs-01

Comprobamos el cambio que hemos realizado:

confatrequpowvbs-02

Bien.

Ahora vamos a hacerlo con Visual Basic Script.

Visual Basic Script

Los comandos a utilizar en este caso seguiran el siguiente patrón:

Set objEquipo = GetObject(«LDAP://DNEquipo»)
objEquipo.Put(«propiedad», valor)
objEqupio.SetInfo

Ya veis que es muy parecido a Powershell.

Vamos a cambiar la propiedad «description» del equipo «sobremesa09«:

Set objEquipo = GetObject(«LDAP://CN=sobremesa09,OU=informatica,OU=equipos,DC=aic,DC=local»)
objEquipo.Put(«description», «Equipo de sobremesa número 9»)
objEquipo.SetInfo

Ahora, escribimos estas últimas líneas en un fichero con extensión .vbs (c:\vbscript\modifatrequipo.vbs).

confatrequpowvbs-03

Ejecutamos el script:

confatrequpowvbs-04

Y lo comprobamos:

confatrequpowvbs-05

Perfecto.

Podemos modificar una cantidad tremenda de atributos mediante Windows Powershell o Visual Basic Script. Y no sólo de los objetos del tipo «computer«, sino de muchos otros, como «usuarios«, «grupos«, etc..

Por ejemplo, para conocer las propiedades disponibles y sus nombres en las cuentas de equipo, podemos echarle un vistazo a las propiedades de un equipo  y posicionarnos en la pestaña «Atibute Editor«.

confatrequpowvbs-06

Como se puede observar en la captura anterior, hay un montón de atributos que podemos modificar.

Bueno, hasta aquí llega este tutorial.

Saludos.

—–

Oscar Abad

http://www.xulak.com – Consultoría informática

Por 1 comentario

Windows Server 2008 – Crear cuentas de equipo con Powershell y VBScript

Llega el momento de utilizar a nuestro querido amigo «Windows Powershell«.

Si nos acordamos, el los tutoriales sobre grupos, comentaba los tres pasos que hay que seguir para poder crear un objeto con Widnows Powershell y Visual Basic Script.

A continuación indico los pasos a seguir en el caso de crer cuentas de equipo:

  1. Conectar con el contenedor (OU) donde vamos a crear el equipo: [ADSI]»LDAP://<DN del la OU>«.
  2. Utilizar el comando «create» de la OU para crear el equipo.
  3. Rellenar los diferentes atributos que queramos.
  4. Hacer efectivos los cambios.

Vamos a empezar con Powershell:

Windows Powershell

1-. Conectar con la unidad organizativa «informatica» de «equipos«:

$objOU = [ADSI]»LDAP://OU=informatica,OU=equipos,DC=aic,DC=local»

2-. Utilizar el comando «create» de la OU:

$objEquipo = $objOU.Create(«computer», «CN=sobremesa10»)

3-. Rellenar las propiedades que queramos. En este caso las necesarias:

$objEquipo.Put(«sAMAccountName», «sobremesa10$»)

$objEquipo.Put(«userAccountControl», 4096)

4-. Hacer efectivos los cambios:

$objEquipo.SetInfo()

Con estos comandos podemos hacer un script.

Incluímos las líneas en un fichero de texto con extensión «ps1». Por ejemplo: «c:\power\scripts\crearequipo.ps1» y lo ejecutamos.

creqpowvbs-02

creqpowvbs-01

Lo comprobamos:

creqpowvbs-03

Perfecto, ha funcionado.

Ahora vamos hacerlo con Visual Basic Script:

Visual Basic Script

Al igual que con Windows Powershell, vamos a intentar seguir los pasos:

1-. Conectar con la unidad organizativa «informatica» de «equipos«:

Set objOU = GetObject(«LDAP://OU=informatica,OU=equipos,DC=aic,DC=local»)

2-. Utilizar el comando «create» de la OU:

Set objEquipo = objOU.Create(«computer», «CN=sobremesa11»)

3-. Rellenar las propiedades que queramos. En este caso las necesarias:

objEquipo.Put «sAMAccountName», «sobremesa11$»

objEquipo.Put «userAccountControl», 4096

4-. Hacer efectivos los cambios:

objEquipo.SetInfo()

Ahora recopilamos los comandos en un fichero de texto con la extensión .vbs. Por ejemplo: «c:\vbscript\crearequipo.vbs«.

creqpowvbs-04

Ejecutamos el script:

creqpowvbs-05

Y comprobamos:

creqpowvbs-06

Nos ha salido todo muy bien.

De momento lo dejamos aqui por hoy.

Saludos.

—–

Oscar Abad

http://www.xulak.com – Consultoría informática

Por Deja un comentario

Windows Server 2008 – Gestionar miembros de grupos con Powershell y VBScript

Cuando en el título indico «gestionar«, me refieros a eliminar o añadir miembros a los grupos.

Para realizar un script que elimine o añada un miembro a un grupo, en cualquiera de los dos lenguajes de scripting, tendremos que seguir unos pasos que, además nos servirán para entender mejor el funcionamiento.

Los pasos a seguir son tres:

  1. Determinar la ruta DS al miembro. Estas rutas son del tipo: LDAP://<DN del miembro>.
  2. Conectamos con el grupo con el que vamos a trabajar.
  3. Utilizar el método Add (añadir) o Remove (eliminar) del objeto grupo, especificando la ruta DS al miembro.

WINDOWS POWERSHELL

Para añadir un usuario como miembro de un grupo con Windows Powershell realizaremos los pasos anteriores.

Pongamos el ejemplo de que necesitamos añadir al usuario «desarrollo01» como miembro del grupo «ACL_informatica_modificar«.

En primer lugar, guardamos en una variable el DN del usuario (u otro tipo de objeto) que queremos añadir.

$MiembroADSruta = «LDAP://CN=desarrollo01,OU=desarrollo,OU=usuarios,DC=aic,DC=local»

Ahora guardamos en otra varible la conexión con el grupo «ACL_informatica_modificar«, que es el grupo al que le vamos a añadir un miembro.

$objGrupo = [ADSI]»LDAP://CN=ACL_informatica_modificar,OU=grupos,DC=aic,DC=local»

En este momento sólo nos queda invocar al grupo «Add» del objeto «objGrupo» con el parámetro del objeto que queremos añadir. Veámoslo:

$objGrupo.Add ($MiembroADSruta)

Con hemos añadido el usuario «desarrollo01» como miembro del grupo «ACL_informatica_modificar«.

Vemos lo que hemos hecho:

gestgrppowvbs-01

Lo comprobamos en la pestaña «Members» del grupo «ACL_informatica_modificar»:

gestgrppowvbs-02

En efecto, ahí está en usuario «desarrollo01».

Visual Basic Script

Ahora, para realizar un ejemplo con un script de VBScript, vamos a intentar eliminar el usuario «desarrollo01» como miembro del grupo «ACL_informatica_modificar«. Es decir, deshacer el cambio que realizamos antes con Powershell.

Por supuesto, en esta ocasión utilizaremos el método «remove» en lugar de «add«.

El primer paso, como antes, es guardar en una variable el camino al objeto usuario que queremos quitar del grupo.

MiembroADSruta = «LDAP://CN=desarrollo01,OU=desarrollo,OU=usuarios,DC=aic,DC=local»

Ahora, guardamos en otra variable la conexión con el grupo «ACL_informatica_modificar«, pero en esta ocasión utilizaremos el método o función GetObject().

Set objGrupo = GetObject(«LDAP://CN=ACL_informatica_modificar,OU=grupos,DC=aic,DC=local»)

Y por último, ejecutamos el método «Remove» de la varible que contiene la conexión al grupo.

objGrupo.Remove MiembroADSruta

Creamos un fichero de texto con extensión .vbs y guardamos estas tres líneas de código en el.

gestgrppowvbs-03

Comprobamos:

gestgrppowvbs-04

Ya no está el usuario «desarrollo01» como miembro de este grupo.

En este tutorial sólo he realizado unos ejemplos sencillos pero que nos pueden dar una idea de las posibilidades de estas dos herramientas.

Lo dejamos por hoy.

Saludos.

—–

Oscar Abad

http://www.xulak.com – Consultoría informática

Por 8 comentarios

Windows Server 2008 – Crear usuarios con Visual Basic Script

Otra forma de crear objetos en el Directorio Activo es hacerlo mediante un script de Visual Basic Script.

En el ejemplo que vamos a ver, crearemos el usuario «Ricardo Mendoza«.

Cremos un nuevo fichero de texto vacío. Podemos utilizar el «block de notas» y en este fichero escribimos las siguientes líneas:

Crusvbs01

Aunque no hace falta desgranar por completo el programa puesto que ya hemos visto formatos parecidos cuando lo hacíamos desde Windows Powershell, indicar que el dominio es aic.local, el usuario «Ricardo Mendoza» y el Logon Name «rmendoza«.

Con esta información creo que es suficiente para entender el script.

Por supuesto, podemos añadir muchas mas opciones de configuración del nuevo usuario.

Para ejecutar éste script, podemos hacerlo desde el entorno gráfico de Windows o hacerlo desde la consola de comandos.

Para realizar esto último lo haremos de la siguiente forma, tendiendo en cuenta que el script es: «crearusuario.vbs» y está alojado en nuestro «c:\vbscript«.

Desde una consola de comandos o desde el mismo Powershell escribid lo siguiente:

cscript.exe c:\vbscrpt\crearusuario.vbs

Y listo.

Posteriormente podemos comprobar que se ha realizado correctamente desde «Usuarios y Equipos del Directorio Activo«.

Por ahora lo dejamos aquí, pero mas adelante ampliaremos las posiblidades de Visual Basic Script para crear y/o modificar otro tipo de objetos en el Directorio Activo.

Saludos.

—–

Oscar Abad

http://www.xulak.com – Consultoría informática

Por 1 comentario

Windows Server 2008 – Crear usuarios con un script de Windows Powershell

En el tutorial anterior sobre Windows Server 2008 ( ——- ) vimos cómo crear un usuario nuevo ejecutando una serie de comandos de Windows Powershell. Pues bien, en esta ocasión vamos a resumir cómo hacerlo mediante un script para que nos sea menos tedioso el trabajo de crear nuevos usuarios.

Os recuerdo que si queréis profundizar un poco en Windows Powershell, podéis revisar los tutoriales que hay en este blog sobre Powershell. Para hacerlo mas rápido, pinchad en este enlace.

También tengo que recordar que, por defecto, Windows Powershell previene la ejecución de scripts. Para ejecutar un script de Windows Powershell que hemos creado, tenemos que modificar la política de ejecución de Windows Powershell de la siguiente manera:

set-executionpolicy remotesigned

Mediante este comando para poder ejecutar scripts locales pero no nos permitirá ejecutar script de ubicaciones remotas.

Una vez que hemos configurado esta parte, vamos a crear el script.

Agrupamos todos los comandos que ejecutamos en el tutorial anterior uno a uno para crear un fichero. El fichero lo podemos crear con el notepad. Como ya sabréis, los script de Powershell tienen la extension «ps1«.

Entonces, abrimos un fichero nuevo y copiamos en el lo siguiente:

$objOU=[ADSI]»LDAP://OU=gente,DC=aic,DC=local»

$objUser=$objOU.Create(«user»,»CN=Alberto Gutierrez»)

$objUser.Put(«sAMAccountName», «agutierrez»)

$objUser.Put(«userPrincipalName», «agutierrez»)

$objUser.Put(«email», «agutierrez@aic.com»)

$objUser.SetInfo()

Ahora guardamos el fichero como «crearusuario.ps1«. Yo lo he guardado en la carpeta «c:\power» que he creado para estos menesteres pero podéis crearlo donde mejor os convenga.

Para ejecutar el script, abrimos Windows Powershell, nos posicionamos en el directorio en el que tenemos guardado nuestro script y escribimos:

./crearusuario.ps1

Como podéis ver, he utilizado «./« antes del nombre del script. Es una medida de seguridad, simplemente.

Ahora comprobamos, mediante Powershell, que se ha creado correctamente el usuario. Escribimos el siguiente comando:

$objUser.ditingushedName

Nos debe mostrar el «distinguishedname» del usuario que acabamos de crear.

Y para examinar los atributos que Active Directory ha configurado automáticamente pondremos:

$objUser | get-member

Hasta aquí hemos llegado con este tutorial.

Ya veis que es bien sencillo, lo único que hace falta es un poco de práctica.

Venga, hasta la próxima.

—–

Oscar Abad

http://www.xulak.com – Consultoría informática

Por 1 comentario

VBScript: Modificar el valor de "MI PC" en Windows XP

Este es el primer script en VBScript que voy a publicar.

Se trata de modificar el texto de «MI PC» que aparece en el icono correspondiente del escritorio.

Nos puede ser de mas utilidad que nos muestre el nombre del equipo y el nombre del usuario con el que nos hemos logeado. Pues, bien, este script hace eso: Modifica el valo de registro conrrespondiente a ese valor.

Vamos alla:

————————————————-

REM Script que establece el valor «LocalizedString» y le asigna: «%COPUTERNAME% / %username%».

REM Realizado el 31-7-09 por Oscar Abad  (https://www.aprendeinformaticaconmigo.com
Option Explicit
Dim objReg
Dim strCaminoClave
Dim strNombreValor
Dim strValor
Dim equipo
Const HKLM = &H80000002

equipo = «.»
Set objReg=GetObject(«winmgmts:{impersonationLevel=impersonate}!\\» & equipo & «\root\default:StdRegProv»)
strCaminoClave = «SOFTWARE\Classes\CLSID\{20D04FE0-3AEA-1069-A2D8-08002B30309D}»
strNombreValor = «LocalizedString»
objReg.DeleteValue HKLM,strCaminoClave,strNombreValor
strValor = «%COMPUTERNAME% / %username%»
objReg.SetExpandedStringValue HKLM,strCaminoClave,strNombreValor,strValor

——————————————————–

No soy ningun experto en VBScript, es mas, tengo muy poca idea, pero como todos se parecen, es mas sencillo volcarse con ello y hacer algunas modificaciones de algun script que encontremos googleando.

A modo de resumen, os dire para los que no sepais muy bien de que va, que lo qu e hace exactamente es eliminar el valor «LocalizedString» que podemos encontrar en «HKLM\SOFTWARE\Classes\CLSID\{20D04FE0-3AEA-1069-A2D8-08002B30309D}«. Posteriormente crea de nuevo ese mismo valor per con el contenido: «%COMPUTERNAME% / %username%«.

Cuando reiniciemos o hagamos F5 en el escritorio, veremos el resultado.

Este script esta preparado para Windows XP y desconozco si funciona en otras versiones de Windows.

Los script en VBScript los podemos escribir con el notepad y guardarlos con extension «vbs«. No nos hace falta nada mas.

Lo mas interesante es que podemos utilizar nuestros VBScripts junto con las GPOs que tengamos establecidas para que se ejecuten en el inicio de los equipos.

Venga, espero que os sirva…

A pasarlo bien!!

—–
Oscar Abad
http://www.xulak.com – Consultoría informática