| 关键词: nbsp echo findstr ip txt Tableecho Hostname Group nul Mac |
findstr命令应用 程序代码 @echo offfor /l %%i in (1,1,255) do ping 192.168.5.%%i -n 1 |findstr "192.168" >>s.txt整理ip 程序代码for /f "eol=- tokens=1 delims= " %%i in (result.txt) do echo %%i>>ip.txt意思是取文本中的每一行的第一个字符串 以空格为间隔标记把ip变成C段 程序代码for /f "eol=- tokens=1,2,3 delims=." %%i in (add1.txt) do echo %%i.%%j.%%k.1 %%i.%%j.%%k.255>>s1.txt取每行1,2,3字符,以.间隔标记一个还好的bat,内网信息大全来自网络 程序代码 @echo offsetlocal:menuclsmode con:cols=80 lines=25title 网络信息搜集(简易)color f2echo.echo. ***********************echo. 网络信息搜集(简易)echo. ***********************echo. 1.IP与Mac Address对应表echo.echo. 2.IP与Hostname对应表echo.echo. 3.IP与Workgroup对应表echo. =======================echo.echo. 4.查询WHO是主控域浏览器?echo.echo.echo. x.退出echo.------------------------------------------------------------------:inputset /p x=请选择项目号:if /i "%x%"=="x" goto :endecho.set /p y=请输入IP范围(例如:192.168.1.1-254):for /f "tokens=1-5 delims=.-" %%a in ("%y%") do ( set ip=%%a.%%b.%%c set n1=%%d set n2=%%e)if "%x%"=="1" goto :macif "%x%"=="2" goto :hostnameif "%x%"=="3" goto :groupif "%x%"=="4" goto :msbrowseendlocal::-----------------------------------------------------------------------------:macsetlocalclsmode con:cols=40 lines=40color f4title IP与Mac Address对应表echo.IP ^<=^> MAC Address's Tableecho.=============================(echo.IP ^<=^> MAC Address's Tableecho.=============================) >mac.txtfor /l %%i in (%n1%,1,%n2%) do ( ping -n 1 -w 1 %ip%.%%i |find "Reply" >nul 2>nul && ( for /f "tokens=2 delims==" %%a in ('nbtstat -a "%ip%"."%%i"^|findstr /c:"MAC Address"') do ( echo.%ip%.%%i %%a echo.%ip%.%%i %%a>>mac.txt ) ))findstr /n "." mac.txt |findstr /r "^3:" && start mac.txt endlocalgoto :menu::----------------------------------------------------------------------------:hostnamesetlocalclsmode con:cols=40 lines=40color f5title Ip与Hostname对应表echo.IP ^<=^> Host_name's Tableecho.==============================(echo.IP ^<=^> Host_name's Tableecho.==============================) >hostname.txtfor /l %%i in (%n1%,1,%n2%) do ( ping -n 1 -w 1 %ip%.%%i |find "Reply" >nul 2>nul && ( for /f %%b in ('nbtstat -a "%ip%"."%%i"^|findstr /r /c:"\<20\> UNIQUE"') do ( echo.%ip%.%%i %%b echo.%ip%.%%i %%b>>hostname.txt ) ))findstr /n "." hostname.txt |findstr /r "^3:" && start hostname.txt endlocalgoto :menu::------------------------------------------------------------------------------:groupsetlocalcls mode con:cols=40 lines=40color f1title IP与Workgroup对应表echo.IP ^<=^>Group Name's Tableecho.=============================(echo.IP ^<=^>Group Name's Tableecho.=============================) >group.txtfor /l %%i in (%n1%,1,%n2%) do ( ping -n 1 -w 1 %ip%.%%i |find "Reply" >nul 2>nul && ( for /f %%c in ('nbtstat -a "%ip%"."%%i"^|findstr /r /c:"\<00\> GROUP"') do ( echo.%ip%.%%i %%c echo.%ip%.%%i %%c>>group.txt ) ))findstr /n "." group.txt |findstr /r "^3:" && start group.txt endlocalgoto :menu:msbrowseclstitle 查询WHO是主控域浏览器?echo.查询中.........for /l %%i in (%n1%,1,%n2%) do ( ping -n 1 -w 1 %ip%.%%i |find "Reply" >nul 2>nul && ( nbtstat -a %ip%.%%i|findstr "__MSBROWSE__" 2>nul >nul && ( echo.主控域浏览器是:%ip%.%%i pause goto :menu ) ) )clsecho.未找到......汗 & pause & goto:menu:endclsecho.echo. written by hitme 2005.08.18pausegoto :eof |
|
声明:文章版权归原作者所有 部分文章转自互联网 如有侵权请联系
[邮箱地址] 删除
|