Inicio MS / Office VBScript – Crear inventario de red local automático con Nombre de Equipo,...

VBScript – Crear inventario de red local automático con Nombre de Equipo, Dirección IP y Dirección MAC

COMPARTIR


Cuando administramos una red y no llevamos un control o un inventario de equipos, IPs, etc. Para crear uno puede llegar a resultar un poco tedioso y llevarnos bastante tiempo de labor crear un inventario ya sea estación por estación o con los comandos básicos en el Command Prompt, en los cuales pueden ser, Net view, nbtstat, ping, etc. e ir relacionándolos manualmente para crear nuestro documento, el cual si puede resultar buena opción cuando son pocos equipos.

Código VBScript

Con el siguiente código podremos crear un inventario automático de los equipos de Red con los campos: Nombre de Equipo, Direccion IP y Direccion MAC, el cual nos lo guardara en una Hoja de Excel.

Crear el Archivo Inventario de Red

[notification type=”info”]Importante! Los equipos deben estar prendidos (Puede ser sin iniciar sesión) si los Switch que utilizamos no guardan la información de los equipos que se conectan a estos.[/notification]

  1. Abrimos un editor de texto como Notepad (recomendado Notepad++) copiamos el código del Script anterior y lo pegamos.VB-Notepad++
  2. Guardamos el archivo con un nombre que deseemos puede ser InventarioDeRed y con extensión .vbsVB-Guardar Notepad++
  3. Nos aparecerá un archivo como el siguiente el cual dando doble clic.VB-Icono
  4. En un principio veremos un cuadro de dialogo que indica que el proceso esta comenzando.VB-Comienza
  5. Nos ejecutara Excel y una ventana de Command Prompt automáticamente donde comenzara a llenar con la información (Nombre del Equipo, Dirección IP y Dirección MAC).VB-Proceso
  6. El proceso puede tardar algunos minutos dependiendo la cantidad de equipos existentes en la Red.
  7. Al finalizar el proceso nos va a aparecer la ventana Guardar Como (Save As).VB-Termina
[notification type=”info”]Información: Vamos a percatarnos que existen algunos equipos que en los campos Direccion IP y Direccion MAC nos aparece el nombre del equipo en todos los campos o nos aparece la IP del equipo donde estamos ejecutando el script. Esto se debe a que el equipo se encuentra apagado o no se encuentra conectado a la red en ese momento[/notification]

13 Comentarios

    • Buen dia Pablo

      No, nada automático, lo único que tengo por el momento es obtener los datos del equipo desde consola con:
      1.- systeminfo – ejecutándolo con psexec
      2.- wmic /NODE: “PC o IP” bios get serialnumber

      Saludos.

  1. Buenas Fernandoy gracias por el aporte, estoy intentando hacer el inventario, pero me da error “Permiso denegado” codigo 800A0046, la linea del script que da error es
    “FileSystem.DeleteFile(“C:\Windows\Temp\NBTList.txt”)”

      • Buen dia Sergio

        No deberías tener problema ya que es local en tu equipo donde marca el error, el script crea 3 archivos donde obtiene la informacion uno para las IPs otro Nombre de Equipo y un ultimo para las MAC Address, lo raro que si accede al primero sin problema y se trunca en el segundo archivo..

        Que sistema operativo estas utilizando?

Deja un comentario...