При запуске скрипта на экран выводится текущий IP-адрес.

Реализация CMD:

CHCP 1251 > nul
for /F "tokens=1,14,15" %%a in ('ipconfig ^| find /i "IP-" ') do msg /time:0 %username% "Ваш%%a %%b %%c "


РеализацияVBS&WMI:

Set objWMIService = GetObject("winmgmts:\\.\root\CIMV2")
Set colItems = objWMIService.ExecQuery ("Select * from Win32_NetworkAdapterConfiguration where IPEnabled=TRUE")
For Each objItem in colItems
    Wscript.Echo "ВашIP-адрес: "& objItem.IPAddress(0)
Next

  Решение предложено моим коллегой Д.В.Олейниковым

Add comment


Security code
Refresh