El Blog de Gualtrysoft

Windows 2000/2003/2008, Active Directory, VBScript, Hyper-V, PowerShell y todo aquello interesante a la hora de usar, configurar y administrar Windows Server. También tenemos longanizas…

Archive for the ‘VBScript’ Category

VbScript: Script Para Obtener Un Listado HTML De Los Productos Instalados Con Windows Installer

Posted by urpiano en Jueves 24 \24\UTC noviembre \24\UTC 2011

Este script nos permite obtener un listado con los productos intalados con Windows Installer en el equipo (son aquellos que fueron instalados con un fichero MSI), es decir, las instancias de la clase Win32_Product de WMI que tengamos en el equipo donde ejecutemos este script. El listado que obtenemos es guardado en un fichero HTML como tabla, en la que podremos ver el producto y las propiedades que tengamos del mismo.

Leer el resto de esta entrada »

Posted in Informatica, Scripting, VBScript | 2 Comments »

Script VbScript para obtener la configuración de Proxy de IE del usuario que lo ejecuta

Posted by urpiano en Jueves 25 \25\UTC agosto \25\UTC 2011

Desarrollado para dar respuesta en el foro de scripting de Technet, este script permite averiguar la configuración de proxy en Internet Exporer del usuario que lo lanza.

Leer el resto de esta entrada »

Posted in Informatica, Scripting, VBScript | 2 Comments »

Script VbScript para obtener información de un bosque de Active Directory (2)

Posted by urpiano en Jueves 28 \28\UTC abril \28\UTC 2011

Este script genera una serie de ficheros de valores separados por tabulador (ideales para ser abiertos por Excel o importarlos a una base de datos), con información del bosque de Active Directory al que pertenece el equipo desde el que se lanza, así como información de Exchange. Obviamente, la cuenta con la que se ejecute debe tener permisos de lectura de AD en los diferentes dominios que conformen el bosque. Se trata de una actualización de este otro script, y añade la información de equipos y usuarios, que en el anterior no era obtenida. El script crea los ficheros:

Leer el resto de esta entrada »

Posted in Informatica, Scripting, VBScript | 2 Comments »

Script VbScript Para Crear Un Acceso Directo

Posted by urpiano en Martes 23 \23\UTC noviembre \23\UTC 2010

Este script permite crear un acceso directo, ya sea de aplicación (fichero de extensión .lnk) como de URL (fichero de extensión .url, que contiene una URL y se abre con el navegador de internet predeterminado), en una carpeta especial (el escritorio del usuario, por ejemplo). El script está pensado para ser puesto como script de inicio de máquina (debería apuntar a carpetas especiales de todos los usuarios, como AllUsersDesktop) o inicio de sesión (en el caso de apuntar a carpetas de usuario). Permite establecer el icono del acceso directo de forma personalizada, con ejecutables, DLLs o fichero ICO, así como establecer si será sobrescrito en el caso de que ya exista.

Leer el resto de esta entrada »

Posted in Informatica, Scripting, VBScript | 2 Comments »

Script VbScript para obtener los grupos a los que pertenecen todos los usuarios de un dominio

Posted by urpiano en Miércoles 17 \17\UTC noviembre \17\UTC 2010

Script que devuelve las membresías, el tipo de las mismas (directa cuando el grupo aparece en la propiedad MemberOf o heredada cuando la pertenencia al grupo es debida a pertenecer a un grupo que pertenece al listado), si tienen permiso de acceso remoto o VPN y la OU a la que pertenecen todos los usuarios del dominio. La salida a pantalla o fichero se produce en formato de valores separados por tabuladores, lo que hace que al abrir el fichero en Excel tengamos los datos perfectamente separados por columnas.

Leer el resto de esta entrada »

Posted in Informatica, Scripting, VBScript | 5 Comments »

Script VbScript para añadir una carpeta a la variable de entorno Path

Posted by urpiano en Lunes 18 \18\UTC octubre \18\UTC 2010

Este script recibe como parámetro una ruta de carpeta (si contiene espacios deberá estar encerrada entre comillas) y la añade a la variable de entorno Path del sistema.

Leer el resto de esta entrada »

Posted in Informatica, Scripting, VBScript | Leave a Comment »

Script VbScript Para Listar Los Usuarios Miembros De Un Grupo

Posted by urpiano en Jueves 18 \18\UTC marzo \18\UTC 2010

Este script nos permite listar los usuarios que peretenecen a un grupo que se recibe como parámetro, ya sea en su nombre NT como en su nombre distinguido. Recibe también un nombre de carpeta en la que creará un fichero de valores separados por tabuladores con la lista de usuarios

Leer el resto de esta entrada »

Posted in Informatica, Scripting, VBScript | 4 Comments »

Script VbScript para obtener información de un bosque de Active Directory

Posted by urpiano en Viernes 15 \15\UTC enero \15\UTC 2010

Este script genera una serie de ficheros de valores separados por tabulador (ideales paa ser abiertos por Excel o importarlos a una base de datos), con información del bosque de Active Directory al que pertenece el equipo desde el que se lanza, así como información de Exchange. Obviamente, la cuenta con la que se ejecute debe tener permisos de lectura de AD en los diferentes dominios que conformen el bosque. El script crea los ficheros:

Leer el resto de esta entrada »

Posted in Informatica, Scripting, VBScript | 4 Comments »

Usuarios de Active Directory con Formato “Apellidos, Nombre”

Posted by urpiano en Lunes 30 \30\UTC marzo \30\UTC 2009

Cuando damos de alta un usuario con Usuarios y equipos de Active Directory el campo Nombre para mostrar (displayName) se rellena de forma automática siguiendo el patrón Nombre Inicial Apellidos. La inicial es típica de los anglosajones, que siempre tienen un segundo nombre propio del cuál sólo escriben la inicial; en España este campo de inicial no lo rellenamos, con lo que el patrón que realmente observamos que es utilizado para rellenar Nombre para mostrar es en realidad Nombre Apellidos. Sin embargo, en muchas organizaciones, se quiere que el patrón a seguir sea Apellidos, Nombre lo cuál hace que en muchas de estas organizaciones sea necesario construir "a mano" este Nombre para mostrar, lo que lleva a errores y olvidos de hacerlo. ¿Hay alguna forma de evitar este problema y automatizar el formato de Nombre para mostrar a Apellidos, Nombre en la creación de los usuarios? Veremos como sí es posible automatizarlo y también veremos un script que nos permita convertir los ya existentes de un plumazo.

Leer el resto de esta entrada »

Posted in Tips, VBScript | 3 Comments »

Script VBScript Para Establecer El Perfil De Terminal Services A Uno O Varios Usuarios De Active Directory

Posted by urpiano en Martes 3 \03\UTC marzo \03\UTC 2009

Este script permite establecer la ruta del perfil de Terminal Services a uno o más usuarios de Active Directory. El script recibe una determinada ruta y establece el perfil en una subcarpeta de la la ruta de nombre igual a atributo sAMAccoutName de cada usuario (el mismo efecto que cuando se establece \servidorcarpeta%USERNAME%).

Leer el resto de esta entrada »

Posted in VBScript | Etiquetado: | 1 Comment »

Script VbScript Para Cambiar La Configuración De Cuentas IMAP En Outlook

Posted by urpiano en Jueves 26 \26\UTC febrero \26\UTC 2009

Script VBScript que permite cambiar en Outlook el servidor de una cuenta IMAP y el dominio del usuario que conecta al servidor IMAP. El script busca todas aquellas cuentas IMAP que tengan configuradas el servidor que recibe como servidor viejo y establece el servidor que recibe como servidor nuevo. Permite también cambiar la parte del nombre de usuario correspondiente al dominio, de forma que apunte el mismo usuario a otro dominio (de DOMINIOVIEJO\usuario a DOMINIONUEVO\usuario). Es imprescindible que la contraseña del nuevo usuario sea igual a la del viejo, pues la contraseña está cifrada en el registro y para poder entrarla nueva sería necesario hacerlo de forma interactiva.

Leer el resto de esta entrada »

Posted in VBScript | 4 Comments »

Script VBScript Para Obtener Un Listado De Usuarios Y Todas Sus Direcciones De Correo De Exchange

Posted by urpiano en Jueves 12 \12\UTC febrero \12\UTC 2009

Este script vuelca en un fichero XML los datos de las cuentas de correo de Exchange de los usuarios del dominio en el que se lanza. El listado se basa en mirar el atributo del usuario proxyAddresses y en el listado se muestra por tipos de cuentas (SMTP,cc:Mail, Microsoft Mail, X400, X500 y Otros)

Leer el resto de esta entrada »

Posted in VBScript | 4 Comments »

Script VBScript Para Enviar Correos De Aviso De Cambio De Dirección (disclaimer)

Posted by urpiano en Miércoles 11 \11\UTC febrero \11\UTC 2009

Escenario:

Por cambios en la organización, se requiere que las cuentas de correo de determinados usuarios pasen a ser cuentas de otro dominio de internet distinto al de las cuentas que tenían. Obviamente, durante un tiempo, ambas direcciones de correo, vieja y nueva, serán válidas, pero se quiere acabar suprimiendo la dirección vieja. Por ello se quiere poder enviar un correo, a cada remitente de los correos enviados a estos destinatarios, que avise del cambio de la cuenta de correo a la que se envió el correo y les solicite que actualicen su libreta de direcciones.

Leer el resto de esta entrada »

Posted in VBScript | 2 Comments »

Script VBScript Para Listar El Estado De Los Usuarios Del Dominio

Posted by urpiano en Lunes 26 \26\UTC enero \26\UTC 2009

Este script muestra el estado de las cuentas de usuario del dominio, si están habilitadas o no. La salida del script puede ser por pantalla o a un fichero de valores separados por tabuladores. Se puede presentar un resumen, en el cual se muestran el número total de cuentas, el número de cuentas deshabilitadas y el número de cuentas habilitadas

Leer el resto de esta entrada »

Posted in VBScript | 4 Comments »

Script VBScript Para Borrar O Deshabilitar Usuarios De Active Directory

Posted by urpiano en Viernes 16 \16\UTC enero \16\UTC 2009

Este script permite eliminar del directorio activo una o más cuentas de usuario. Debe ser lanzado por un usuario con los privilegios suficientes para borrar las cuentas. Su uso es indicado, por ejemplo, cuando se desea borrar de forma masiva cuentas de usuario. Está basado en este script anteriormente publicado.

Leer el resto de esta entrada »

Posted in VBScript | Etiquetado: | 1 Comment »

VBScript Para Listar Los Servicios Lanzados Por Usuarios No Del Sistema

Posted by urpiano en Martes 13 \13\UTC enero \13\UTC 2009

Este script lista los servicios y usuarios que los lanzan, cuando estos usuarios no son LocalSystem, ni NT AUTHORITY\NetworkService ni NT AUTHORITY\LocalService. Permite hacer esto en el equipo desde el que se lanza y en equipos remotos.

Leer el resto de esta entrada »

Posted in VBScript | Etiquetado: | 2 Comments »

Script VBScript Para Generar Un Fichero De Inclusión De Usuarios De ADMT v3.0

Posted by urpiano en Jueves 18 \18\UTC diciembre \18\UTC 2008

Este script crea un fichero de valores separados por comas destinado ser utilizado como fichero de objetos de usuario a migrar con ADMT v3.0. En el fichero va el nombre sAMAccountName, del usuario del dominio de origen, como SourceName, el RDN del usuario de origen como TargetRDN de destino, la parte de usuario del UPN de origen + arroba + sufijo recibido como parámetro como TargetUPN y la ruta y nombre del fichero de valores separados por comas en el que se vuelca la información.

Leer el resto de esta entrada »

Posted in VBScript | Etiquetado: | Leave a Comment »

Script VBScript Para Crear Un Fichero BAT Para La Migración De Grupos Con ADMT v3.0

Posted by urpiano en Lunes 15 \15\UTC diciembre \15\UTC 2008

Este script se encarga de generar un fichero BAT que, cuando se ejecute, realizará la migración de los grupos contenidos en el fichero recibido como parámetro /F. En ese BAT habrá una línea de llamada a ADMT por cada OU que contenga alguno de los grupos. Se pueden migrar también los SIDs de los grupos, lo que permitirá acceder a los recursos del dominio de origen desde el de destino gracias a tener en el SIDHistory del nuevo objeto el SID que tenía en el dominio de origen. El script BAT deberá ser lanzado desde el equipo que tiene instalado ADMT v3.0 y las rutas que se especifican en los comandos del BAT deberán existir en ese equipo (si es que son rutas locales) y ser accesibles desde ese equipo por el usuario que lanza el script (en el caso de rutas UNC)

Leer el resto de esta entrada »

Posted in VBScript | Etiquetado: | Leave a Comment »

Script VBScript Para Desinstalar Aplicaciones MSI En Uno O Varios Equipos

Posted by urpiano en Jueves 30 \30\UTC octubre \30\UTC 2008

Este script permite desinstalar una aplicación instalada con un paquete MSI en uno o más equipos. Utiliza WMI para poder conectarse como otro usuario y así tener los privilegios necesario para poder desinstalar aplicaciones.

Leer el resto de esta entrada »

Posted in VBScript | Etiquetado: | 13 Comments »

Script VBScript Para Agregar Una Carpeta A La Variable De Entorno PATH

Posted by urpiano en Miércoles 13 \13\UTC agosto \13\UTC 2008

Este script recibe como parámetro una ruta de carpeta (si contiene espacios deberá estar encerrada entre comillas) y la añade a la variable de entorno Path.

Leer el resto de esta entrada »

Posted in VBScript | Etiquetado: | Leave a Comment »

Script VBScript Para Borrar Usuarios De Active Directory

Posted by urpiano en Jueves 31 \31\UTC julio \31\UTC 2008

Este script permite eliminar del directorio activo una o más cuentas de usuario. Debe ser lanzado por un usuario con los privilegios suficientes para borrar las cuentas. Su uso es indicado, por ejemplo, cuando se desea borrar de forma masiva cuentas de usuario.

Leer el resto de esta entrada »

Posted in VBScript | Etiquetado: | 5 Comments »

Script VBScript Para Cambiar La Contraseña A Un Usuario Local En Uno O Varios Equipos

Posted by urpiano en Viernes 25 \25\UTC julio \25\UTC 2008

Es conveniente cambiar la contraseña del administrador local de los equipos de vez en cuando, de forma que no se "enrancie". Hacer esto en un solo equipo es algo que no es laborioso, pero hacerlo en muchos equipos es otra cosa. Cuando se está en un entorno de dominio, se suele hacer por medio de un script VBScript que se asigna en una GPO como script de inicio de equipo; una forma cómoda de hacer esta tarea. Si embargo tiene dos principales debilidades: si el equipo no es reiniciado en algún momento (pensemos en un servidor por ejemplo, o en ese usuario que nunca apaga su equipo), no recibirá la nueva contraseña, por otra parte, el script deberá estar situado en un recurso de red y tendrá que tener la nueva contraseña escrita en él, con lo que se convierte en fácil capturar esa contraseña para un usuario medinamente "espabiladillo"; se puede encriptar el script con SCRENC.EXE pero eso no es, ni mucho menos algo demasiado seguro, pues es muy fácil saltarse esa encriptación, como se ve aquí. Otra estrategia es el hacerlo de forma interactiva, desde un equipo en el que lanzamos el script desde una ventana de comandos que hemos abierto con RunAs como administrador del dominio; de esta manera, el script no está a disposición de todo el mundo, con lo que nadie se entera de cuál es la nueva contraseña. La pega de esta otra estrategia es que se debe ir haciendo un recuento de los equipos a los que se ha podido o no cambiar la contraseña, pues si un equipo está apagado, la contraseña no se le cambiará, mientras que con la estrategia de la GPO eso no importa, pues en el momento en que sea iniciado el equipo, se le cambiará la contraseña. Por ello, cuando no se opta por la estrategia de ejecutar el script desde una GPO, es conveniente saber a qué equipos no se les pudo cambiar la contraseña y reintentarlo más adelante, e ir así reduciendo la lista de equipos a los que no se aplicó. En esta estrategia de no usar la GPO está basado el presente script.

Leer el resto de esta entrada »

Posted in Informatica, Tips, VBScript | Etiquetado: | 43 Comments »

Script VBScript Para Copiar Estructuras De OUs De Un Dominio En Otro

Posted by urpiano en Martes 17 \17\UTC junio \17\UTC 2008

Este script copia las OUs (son OUs a nivel raíz del dominio de origen) y todo el árbol de OUs del que son raíz, que están en el fichero de OUs a copiar, en el dominio de destino. Si no se pasa el fichero de OUs a copiar, el script lista las OUs que existen en el dominio que recibe como parámetro de dominio de origen y copia la misma estructura de OUs en el dominio de destino. El resultado del proceso puede ser visto por pantalla o volcado a un fichero de valores separados por tabuladores, ideal para ser abierto por Excel. ‘¡¡OJO!!’, sólo copia las OUs, no los equipos, usuarios o contactos que contengan.

Leer el resto de esta entrada »

Posted in VBScript | Etiquetado: | 1 Comment »

Script VBScript Para Cambiar La Localización De Uno O Más Equipos En Active Directory

Posted by urpiano en Martes 10 \10\UTC junio \10\UTC 2008

Este script permite cambiar la propiedad localización de los equipos de Active Directory. Recibe una ruta más nombre de libro de Excel en el que tiene los datos del dominio al que pertenece el equipo, el nombre del equipo y la localización que se le debe establecer.

Leer el resto de esta entrada »

Posted in VBScript | Etiquetado: | 2 Comments »

Script VBScript Para Listar Los Servidores De Cada Sitio De Un Dominio De Active Directory

Posted by urpiano en Jueves 5 \05\UTC junio \05\UTC 2008

Este script permite listar los sitios de Active Directory y los servidores que están en cada sitio.

Leer el resto de esta entrada »

Posted in VBScript | Etiquetado: | Leave a Comment »

Script VBScript Para Cambiar La Configuración DNS De Varios Equipos (2)

Posted by urpiano en Sábado 17 \17\UTC mayo \17\UTC 2008

Basado en mi anterior script cambiar-dns.vbs, este script permite eliminar los servidores DNS y establecer otros nuevos en varios equipos de forma remota. Utiliza WMI para realizar esta tarea. Se diferencia de cambiar-dns.vbs en que en este script se debe especificar el nombre de la conexión de red a la que se cambiará la configuración de DNS (el anterior lo hacía para toda conexión que tuviese habilitada la configuración IP). Dado que se utiliza el operador LIKE en la consulta WQL, y que se controla que la conexión tenga nombre, se podría hacer para toda conexión pasando como nombre el tanto por ciento (%)

Leer el resto de esta entrada »

Posted in VBScript | Etiquetado: | 10 Comments »

Script VBScript Para Borrar Ficheros Viejos (2)

Posted by urpiano en Lunes 12 \12\UTC mayo \12\UTC 2008

Basado en un script mío anterior, este script sirve para borrar ficheros cuya fecha de última modificación sea igual o anterior a una fecha pasada como parámetro. Permite también que el borrado sea recursivo (no sólo se borran los ficheros de la carpeta pasada como parámetro, si no tambien todos aquellos que estén en el árbol cuya raíz es esa misma carpeta). Por último, permite especificar que sólo se borren aquellos ficheros con determinadas extensiones o sólo aquellos que no tienen determinadas extensiones.

Leer el resto de esta entrada »

Posted in VBScript | Etiquetado: | 10 Comments »

Script VBScript Para Averiguar Si Existen Nombres De Equipos En Un Dominio

Posted by urpiano en Domingo 11 \11\UTC mayo \11\UTC 2008

Este script permite saber si existen una o más cuentas de equipo en Active Directory.

Leer el resto de esta entrada »

Posted in VBScript | Etiquetado: | 2 Comments »

Script VBScript Para Registrar Los Inicios Y Cierres De Sesión De Los Usuarios

Posted by urpiano en Viernes 25 \25\UTC abril \25\UTC 2008

Este script está ideado para registrar los inicios y cierres de sesión de los usuarios. A pesar de que se puede obtener los inicios de sesión por medio de una GPO, utilizando la auditoría de inicio de sesión de cuenta, esto no permite registrar el cierre de sesión y además es bastante incómodo el mirar estos datos en el visor de sucesos, si bien se pueden filtrar y exportar a un fichero CSV para después trabajar en Excel con ellos. Por ello, este script es interesante para obtener los datos ya filtrados y reunidos en un fichero.

Leer el resto de esta entrada »

Posted in VBScript | Etiquetado: | 52 Comments »

Script VBScript Para Copiar Una Carpeta En Uno O Más Equipos

Posted by urpiano en Martes 15 \15\UTC abril \15\UTC 2008

Este script permite copiar en uno o más equipos, de forma remota, una carpeta. La copia se realiza de toda la carpeta y sus subcarpetas, con todose sus ficheros. Debe ser lanzado por un usuario que tenga permiso de lectura en la carpeta a copiar y que sea administrador en el de destino, pues usa los recursos compartidos administrativos para realizar la copia (c$, d$, etc.).

Leer el resto de esta entrada »

Posted in VBScript | Etiquetado: | 20 Comments »