[网络连接] 更加详细的获取IPMAC外网IP和归属地批处理

459500160

如题吧，是小弟搜网上的代码自己整合出来的一个网管维护工具，因为新注册无法在分享区发帖，就发这里了，在分享区也有跟帖的，如果有影响到，请版主帮忙移动下哈
特点是获取电脑上所有本地连接的IP和MAC地址，外网IP和对应的归属地，并把获取的信息添加进IP信息.txt，按任意键退出后自动删除TXT文件，脚本用到了curl工具，win10以下的系统请自行安装

@echo off
title 内外网IP查看工具-By NT
@echo.
mode con cols=38 lines=15
color F0
for /F "tokens=1,2 delims=#" %%a in ('"prompt #$H#$E# & echo on & for %%b in (1) do rem"') do (
set "DEL=%%a")

@echo            请将以下内容截图或
@echo            本工具生成在桌面的
call :ColorText Fc "            IP信息"
@echo 发送给网管
@echo ════════════════════════════════════
for /f "delims=: tokens=2" %%i in ('ipconfig^|findstr "IPv4 地址"') do echo      内网IP为:%%i        &echo 内网IP为:%%i >>IP信息.txt
for /f "delims=: tokens=2" %%m in ('ipconfig -all^|findstr "物理地址"') do echo      网卡地址:%%m    &echo 网卡地址:%%m >>IP信息.txt
for /f "delims=: tokens=2" %%o in ('curl -s cip.cc^|findstr "IP"') do set ip=%%o&echo 外网IP为:%%o >>IP信息.txt
for /f "delims=: tokens=2" %%l in ('curl -s ipinfo.io^|findstr ""region""') do set ad=%%l&echo 所在地区:%%l >>IP信息.txt
@echo      外网IP为:%ip%      
@echo      所在地为:%ad%      
@echo ════════════════════════════════════
set /p="   按任意键退出并删除"<nul
call :ColorText Fc "IP信息"
@echo 文档
pause>nul
for /r %%f in (IP信息.txt) do del %%f
goto :eof
:ColorText
echo off
<nul set /p ".=%DEL%" > "%~2"
findstr /v /a:%1 /R "^$" "%~2" nul
del "%~2" > nul 2>&1
goto :eof
复制代码

459500160

因为能力有限，还有不够完美的地方，如何实现一个内网IP对应一个MAC而不是列表形式显示出来，而且感觉这批处理有点太多了，也不知道从哪里入手可以再精简

Batcher

回复 1# 459500160


    建议注明需要调用第三方命令行工具 curl.exe 否则不熟悉的人使用这个代码会出错

459500160

回复 3# Batcher


    谢谢版主提醒，一会改上去，不过win10系统不是已经集成了吗？