Temas de Ms-Dos - Descripción PC remoto con lista txt

<<>>
Imágen de perfil
Val: 13
Ha disminuido 1 puesto en Ms-Dos (en relación al último mes)
Gráfica de Ms-Dos

Contenido en LWPDescripción PC remoto con lista txtgráfica de visualizaciones


Ms-Dos

estrellaestrellaestrellaestrellaestrella
estrellaestrellaestrellaestrella
estrellaestrellaestrella
estrellaestrella
estrella
Publicado el 20 de Febrero del 2020 por Edward
362 visualizaciones desde el 20 de Febrero del 2020
Iniciando debemos tener una carpeta donde trabajar y de alli realizar las referencia de los comandos y localizaciones de archivos necesarios.
1. creamos una carpeta en desde el cmd ejecutamos mkdir c:\descripcion o si deseas desde el explorardor

2. abrimos la la carpeta c:\descripcion y creamos dos archivos un llamado listado.txt desde cmd seria echo > c:\descripcion\listado.txt, este contendrá todos los nombres de los equipos de nuestra red y el otro archivo es el bacth lo creamos con cmd con echo > c:\descripcion\desc.bat
3.con el archivo c:\descripcion\desc.bat damos clic derecho y damos editar
si tiene algún contenido lo borramos.

colocamos el siguiente código en archivo batch:

@echo off cls REM iniciamos eliminando conexiones de red establecidas para que esten duplicadas y envie error, REM si tu red o computadoras no tienen restriccciones puedes eliminar este paso de validar un usuario. NET USE * /delete set /p USUARIO="USUARIO--->" SetLocal EnableExtensions EnableDelayedExpansion Set /P "=CLAVE:" < Nul Call :PasswordInput set PASS= !Line! goto :inicio CLS PAUSE :PasswordInput For /F skip^=1^ delims^=^ eol^= %%# in ( '"Echo(|REPLACE.EXE "%~f0" . /U /W"') Do Set "CR=%%#" For /F %%# In ( '"Prompt $H &For %%_ In (_) Do Rem"') Do Set "BS=%%#" Set "Line=" :_PasswordInput_Kbd Set "CHR=" & For /F skip^=1^ delims^=^ eol^= %%# in ( 'REPLACE.EXE "%~f0" . /U /W') Do Set "CHR=%%#" If !CHR!==!CR! Echo(&Goto :Eof If !CHR!==!BS! (If Defined Line (Set /P "=!BS! !BS!" <Nul Set "Line=!Line:~0,-1!" ) ) Else (Set /P "=*" <Nul If !CHR!==! (Set "Line=!Line!^!" ) Else Set "Line=!Line!!CHR!" ) Goto :_PasswordInput_Kbd REM Hasta aqui solo hemos validado el password o clave del usuario que sea administrador en todas REM las computadoras en red. :INICIO REM Con este for verificamos las computadoras listadas en el TXT listado for /f "TOKENS=*" %%a in (C:\descripcion\listado.txt) do call :revisar %%a ECHO VERIFIQUE EN C:\DESCRIPCION LOS RESULTADOS NET USE * /delete Rem finaliza el proceso de recoleccion de datos y sale. pause goto :fin :revisar REM asigna el valor a computadora SET computadora=%1 net use \\%computadora%\C$ %PASS% /u:%USUARIO% if %errorlevel% GTR 0 ECHO %computadora% NO ENCONTRADA & >>Sin_Verificar.TXT ECHO %1 & GOTO FIN REM si la encuentra la anexa a esta lista verificadas.txt >>Verificadas.TXT ECHO %1 %TIME%, %DATE% REM verificamos el tipo de sistema operativo FOR /F "tokens=2 delims='='" %%A in ('wmic /node:%computadora% os get Name /value') do SET osname=%%A REM buscamos el version de Service Pack Instalado FOR /F "tokens=2 delims='='" %%A in ('wmic /node:%computadora% os get ServicePackMajorVersion /value') do SET sp=%%A REm fabricante de la computadoras FOR /F "tokens=2 delims='='" %%A in ('wmic /node:%computadora% ComputerSystem Get Manufacturer /value') do SET manufacturer=%%A REM modelo de computadora FOR /F "tokens=2 delims='='" %%A in ('wmic /node:%computadora% ComputerSystem Get Model /value') do SET model=%%A REM nombre o el procesador instalado FOR /F "tokens=2 delims='='" %%A in ('wmic /node:%computadora% /Output:STDOUT CPU get name /value') do SET NameProcess=%%A REM el key o licencia de windows installada FOR /F "tokens=2 delims='='" %%A in ('wmic /node:%computadora% path softwarelicensingservice get OA3xOriginalProductKey /value') do SET KEYBIOS=%%A REM el tamaño del disco duro FOR /F "tokens=2 delims='='" %%A in ('wmic /NODE:%computadora% LOGICALDISK C: GET SIZE /VALUE') do SET DISCO=%%A REM el espacio de disco libre FOR /F "tokens=2 delims='='" %%A in ('wmic /NODE:%computadora% LOGICALDISK C: GET FREESPACE /VALUE') do SET LIBRE=%%A >c:\descripcion\%computadora%.txt echo EQUIPO: %computadora% >>c:\descripcion\%computadora%.txt echo MARCA: %manufacturer% >>c:\descripcion\%computadora%.txt echo MODELO: %model% >>c:\descripcion\%computadora%.txt echo SERIE: %serialnumber% >>c:\descripcion\%computadora%.txt echo PROCESADOR: %NameProcess% systeminfo /S %system% | findstr /C:"total" >> c:\descripcion\%computadora%.txt >>c:\descripcion\%computadora%.txt echo HD: %DISCO:~0,-10% GB >>c:\descripcion\%computadora%.txt echo ESPACIO_DISPONIBLE: %LIBRE:~0,-10% MB >>c:\descripcion\%computadora%.txt echo Sistema Operativo: %osname% >>c:\descripcion\%computadora%.txt echo SERVICEPACK: %sp% >>c:\descripcion\%computadora%.txt echo LICENCIA_WINDOWS_BIOS(OEM): %KEYBIOS% >>c:\descripcion\%computadora%.txt echo OEM EDICIÓN: %KEYBIOSEDICION% :fin rem HASTA LA LINEA SUPERIOR LLEGA EL CODIGO.
Guardamos el documento y vamos y abrimos el txt c:\descripcion\listado.txt
en este TXT vamos a colocar los nombre de los equipos en red uno debajo de otro asi

computador1 computador2 computador3
Se guarda.

Ya esta todo listo ahora ejecutamos el batch que esta en c:\descripcion\desc.bat

En espera de sus comentarios......
A.V:T.



Comentarios... (0)


No hay comentarios
 

Comentar

Nombre
Correo (no se visualiza en la web)
Valoración
Comentarios
Es necesario revisar y aceptar las políticas de privacidad

http://lwp-l.com/t10501