Компьютерный форум OSzone.net  

Компьютерный форум OSzone.net (http://forum.oszone.net/index.php)
-   Скриптовые языки администрирования Windows (http://forum.oszone.net/forumdisplay.php?f=102)
-   -   выделить IP (http://forum.oszone.net/showthread.php?t=152217)

FreeOw1 03-10-2009 17:56 1233697

выделить IP
 
Приветствую вас, знатоки!

Помогите написать батничек, который выдаст сообщение типа:

Цитата:

наберите в браузере 192.168.1.23:118
где:
192.168.1.23 - будет текущей айпишкой
118 - "мой" порт

если возможно, то проверить присваивается адрес по DHCP, и если это так то вывести текст типа:
Цитата:

IP адрес должен быть постоянным!
Необходимую информацию, может предоставить команда ipconfig. но как выделить только необходимую мне информацию и воспользоваться ею, я не знаю. Посему прошу помощи/совета.

Спасибо!

amel27 03-10-2009 18:42 1233752

Цитата:

Цитата 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 03-10-2009 18:51 1233767

Цитата:

Цитата 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


FreeOwl 05-10-2009 20:17 1235153

огромнейшее спасибо!

не подскажешь литературку, где об этом подробненько пишут?

Цитата:

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

небольшая корректировка:

Find "IPv4"

а в целом смысл понятен. Ещё раз сенкс

FreeOw1 05-10-2009 21:15 1235202

с DHCP не получилось, там в выводе есть:
Цитата:

DUID клиента DHCPv6 . . . . . . . : 00-01-00-01-11-A6-08-BC-00-1D-60-2A-46-E4
и это портит всю "малину"...

amel27 06-10-2009 01:29 1235476

Цитата:

Цитата FreeOwl
не подскажешь литературку, где об этом подробненько пишут? »

Полезные ресурсы по скриптовым языкам администрирования + HELP + форум
Цитата:

Цитата FreeOw1
с DHCP не получилось »

подправил для IPv4


Время: 23:08.

Время: 23:08.
© OSzone.net 2001-