@echo off & setlocal enabledelayedexpansion
set /a check_num=0
for /f "tokens=1,2 delims= " %%i in (Ip_list.txt) do (call :check_port %%i %%j)
pause
exit
:check_port
set server_ip=%1
if not defined server_ip goto :eof
set serverport=%2
if not defined serverport goto :eof
set /a check_num+=1
if !check_num! equ 1 (echo.运行结果:>Record.txt)
echo [No.!check_num!]:正在检测 !server_ip! 的 !serverport! 端口...
(ping -n 2 !server_ip!|find "ms TTL=" >nul)&&(set /a isPing=1)||(set /a isPing=2&(echo !server_ip!/ping不通/!serverport!端口不通)&(echo !server_ip!/ping不通/!serverport!端口不通>>Record.txt)&(echo.))
if !isPing! equ 2 (goto :eof)
start /min cmd.exe /k "(telnet -e 'q' !server_ip! !serverport!)&exit"
ping -n 5 127.0.0.1>nul
(taskkill /fi "windowtitle eq Telnet !server_ip!"|find " PID " >nul)&&((echo !server_ip!/ping通/!serverport!端口通)&(echo !server_ip!/ping通/!serverport!端口通>>Record.txt))||((echo !server_ip!/ping通/!serverport!端口不通)&(echo !server_ip!/ping通/!serverport!端口不通>>Record.txt))
echo.
goto :eof
复制代码