Присваивает переменной окружения IP айпишник хоста без всяких лишних телодвижений, а я уже пытался этого vbs-ом добиваться ...

ipconfig | find "IP-" >ip.txt
set /p ip= < ip.txt
set ip=%ip:~-11%
set ip=%ip::=%
set ip=%ip: =%