vbscript

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«: A continuación nos mostrará el siguiente cuadro de diálogo. Nos posicionamos en el OU destino. En este caso «desarrollo«. Pulsamos

Leer más »

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() Comprobamos el cambio que hemos realizado: Bien. Ahora vamos a

Leer más »

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: Conectar con el contenedor (OU) donde vamos a crear el equipo: [ADSI]»LDAP://<DN del la OU>«. Utilizar el comando «create» de la OU para crear el equipo. Rellenar los diferentes atributos que queramos. 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»,

Leer más »

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: Determinar la ruta DS al miembro. Estas rutas son del tipo: LDAP://<DN del miembro>. Conectamos con el grupo con el que vamos a trabajar. 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

Leer más »

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: 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

Leer más »

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

Leer más »

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

Leer más »