CMD/BAT

amel27 · Отправлено: **18:42, 03-10-2009** | #2

Цитата FreeOw1:

который выдаст сообщение типа: »

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

Код:

For /F "Tokens=2 Delims=={}" %%i In ('WMIC NICCONFIG Where IPEnabled^=TRUE Get IPAddress /Value') Do Set IP=%%~i
Msg 0 "наберите в браузере %IP%:118"

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

Код:

For /F "Tokens=2 Delims=={}" %%i In ('WMIC NICCONFIG Where IPEnabled^=TRUE Get IPAddress /Value') Do Set IP=%%~i
Net Send %ComputerName% "наберите в браузере %IP%:118"

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

Код:

@Echo Off

For /F "Tokens=2 Delims=:" %%i In ('IPConfig^|Find "IP"') Do Set IP=%%~i
Echo Наберите в браузере%IP%:118
Pause >Nul

amel27 · Отправлено: **18:51, 03-10-2009** | #3

Цитата FreeOw1:

проверить присваивается адрес по 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