批量测试IP和域名联通性2

在前面批量测试IP和域名联通性-CSDN博客的基础上，由于IP和域名多样性，比如带端口号的192.168.1.17:17，实际上应该ping 192.168.1.17。如果封禁http://www.abc.com/a.exe，实际可ping www.abc.com。所以又完善了代码。

@echo off
setlocal enabledelayedexpansion
chcp 936
for /F  %%A in (E:\封禁IP\ipall.txt) do (set "filename=%%A":: 核心逻辑：将目标字符替换为空，若结果与原字符串不同则说明包含if not "!filename!" =="!filename:http=!" (echo %%A http类型url测试联通性for /F "tokens=2* delims=/" %%B in ("%%A") do (echo %%B 实际测试http子域名连通性ping -n 1 %%B | findstr /I "时间= TTL= Time=" > nulif errorlevel 1 (echo %%A 不可联通>>E:\封禁IP\不通IP和域名.txt) else (echo %%A 可联通>>E:\封禁IP\联通IP和域名.txt))) else ( if not "!filename!" =="!filename::=!" (for /F "delims=:" %%C in ("%%A") do (echo %%A 端口类型测试联通性echo %%C 实际测试主机联通性ping -n 1 %%C | findstr /I "时间= TTL= Time=" > nulif errorlevel 1 (echo %%A 不可联通>>E:\封禁IP\不通IP和域名.txt) else (echo %%A 可联通>>E:\封禁IP\联通IP和域名.txt))) else (echo %%A 测试联通性ping -n 1 %%A | findstr /I "时间= TTL= Time=" > nulif errorlevel 1 (echo %%A 不可联通>>E:\封禁IP\不通IP和域名.txt) else (echo %%A 可联通>>E:\封禁IP\联通IP和域名.txt)))
)
pause