tutorial Batch script ver o Hostname e o Ip da maquina

[CronAsatruar]

Copie e cole o código abaixo em um arquivo de bloco de notas, depois salve com qualquer nome que quiser.bat

 

@ECHO OFF
Call :gg
REM Impedir de executar o arquivo gg.vbs duas vezes
Exit /b 0
:gg
REM  Criando um arquivo chamado gg.vbs em %~dp0
REM
REM  Tambem vai regravar o arquivo pre- existente chamado %~dp0\gg.vbs
echo.> "%~dp0\gg.vbs"
echo.dim NIC1, Nic, StrIP, CompName>> "%~dp0\gg.vbs"
echo.>> "%~dp0\gg.vbs"
echo.Set NIC1 =    GetObject("winmgmts:").InstancesOf("Win32_NetworkAdapterConfiguration")>> "%~dp0\gg.vbs"
echo.>> "%~dp0\gg.vbs"
echo.For Each Nic in NIC1>> "%~dp0\gg.vbs"
echo.>> "%~dp0\gg.vbs"
echo.    if Nic.IPEnabled then>> "%~dp0\gg.vbs"
echo.        StrIP = Nic.IPAddress(0)>> "%~dp0\gg.vbs"
echo.        Set WshNetwork = WScript.CreateObject("WScript.Network")>> "%~dp0\gg.vbs"
echo.        CompName= WshNetwork.Computername>> "%~dp0\gg.vbs"
echo.>> "%~dp0\gg.vbs"
echo.        MsgBox "IP:  "^&StrIP ^& vbNewLine _>> "%~dp0\gg.vbs"
echo.            ^& "Nome do Computador:  "^&CompName,4160,"IP e Nome do Computador">> "%~dp0\gg.vbs"
echo.>> "%~dp0\gg.vbs"
echo.        wscript.quit>> "%~dp0\gg.vbs"
echo.    End if>> "%~dp0\gg.vbs"
echo.Next>> "%~dp0\gg.vbs"
CSCRIPT //NOLOGO  "%~dp0\gg.vbs"
Exit /b 0