[amel27]

проверить присваивается адрес по DHCP, и если это так то вывести текст типа: »

Вариант 1. (служба терминалов должна работать)

Код:

For /F "UseBackQ Tokens=2 Delims=={}" %%i In (`WMIC NICCONFIG Where 'IPEnabled^=TRUE And DHCPEnabled^=TRUE' Get DHCPEnabled /Value`) Do Set DHCP=%%~i
If Defined DHCP Msg 0 "IP адрес должен быть постоянным!"

Вариант 2. (служба сообщений должна работать)

Код:

For /F "UseBackQ Tokens=2 Delims=={}" %%i In (`WMIC NICCONFIG Where 'IPEnabled^=TRUE And DHCPEnabled^=TRUE' Get DHCPEnabled /Value`) Do Set DHCP=%%~i
If Defined DHCP Net Send %ComputerName% "IP адрес должен быть постоянным!"

Вариант 3. (командная строка)

Код:

@Echo Off

For /F "Tokens=2 Delims=:" %%i In ('IPConfig /All^|FindStr /IRC:"DHCP[^:]*: *[0-9][0-9]*\."') Do Set DHCP=%%~i
IF Defined DHCP Echo IP адрес должен быть постоянным!& Pause >Nul