lizebin
发表于 2013-3-12 11:17:53
COLOR 0A
CLS
@ECHO Off
Title 查询局域网内在线电脑IP
:send
@ECHO off&setlocal enabledelayedexpansion
ECHO 正在获取本机的IP地址,请稍等...
for /f "tokens=3 skip=2 delims=: " %%i in ('nbtstat -n') do (
set "IP=%%i"
set IP=!IP:~1,-1!
ECHO 本机IP为:!IP!
goto :next
)
:next
for /f "delims=. tokens=1,2,3,4" %%i in ("%IP%") do set range=%%i.%%j.%%k
ECHO.&ECHO 正在获取本网段内的其它在线计算机名,请稍等...
ECHO 本网段【%range%.*】内的计算机有:
for /f "delims=" %%i in ('net view') do (
set "var=%%i"
::查询在线计算机名称
if "!var:~0,2!"=="\\" (
set "var=!var:~2!"
ECHO !var!
ping -n 1 !var!>nul
))
ECHO.
ECHO 正在获取本网段内的其它在线计算机IP,请稍等...
for /f "skip=3 tokens=1,* delims= " %%i in ('arp -a') do ECHO IP: %%i 正在使用
ECHO.
ECHO 查询完毕,按任意键退出...
pause>nul
zxinglin
发表于 2013-3-11 16:06:10
thanks your shareing
wdinyu
发表于 2013-3-11 16:07:14
{:6_265:}感谢楼主
netjixiang
发表于 2013-3-11 16:02:45
{:6_267:}{:6_267:}{:6_267:}
bawenxiang
发表于 2013-3-11 11:10:07
看帖看完了至少要顶一下,还可以加入到淘帖哦!
zergation
发表于 2013-3-18 16:35:41
看看
584349210
发表于 2013-3-18 17:35:46
dulian
发表于 2013-3-19 22:30:53
{:6_263:}
wyclag
发表于 2013-3-19 23:20:23
{:6_268:}
feiwazi2012
发表于 2013-3-20 02:19:00
来看看!
jianbaiju
发表于 2013-3-20 22:37:01
qq1051661362
发表于 2013-3-21 08:47:05
{:6_264:}
qqht444
发表于 2013-3-23 14:19:05
学习学习
oneleave
发表于 2013-3-26 11:23:56
哥顶的不是帖子,是寂寞!
cs001
发表于 2013-3-26 11:33:36
{:6_299:}下载来看看