При запуске скрипта на экран выводится текущий 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 "
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
Set colItems = objWMIService.ExecQuery ("Select * from Win32_NetworkAdapterConfiguration where IPEnabled=TRUE")
For Each objItem in colItems
Wscript.Echo "ВашIP-адрес: "& objItem.IPAddress(0)
Next
Решение предложено моим коллегой Д.В.Олейниковым
