思路比较简单:使用start命令在新窗口执行telnet -e 和 exit命令,如果端口畅通,那么新开的窗口将会立即关闭,而不通的窗口则会保持近半分钟左右,且窗口名称类似 telnet 192.168.1.1,这半分钟时间足够脚本来判断通还是不通了。
于是将上面check部分修改如下:
::使用telnet命令检测的代码
@echo off & setlocal enabledelayedexpansion
rem 要检测的IP和端口
set server_ip='192.168.1.1,192.168.1.2,192.168.1.3'
set serverport='9922'
rem 模块化调用
call :check_port
::****其他代码略****
:check_port
rem ※探测端口模块--telnet方案※
for /f "tokens=1,* delims=," %%i in ("!server_ip!") do (
echo [No.!check_num!]:正在检测 %%i 的 !serverport! 端口...
rem 新窗口打开telnet,如果端口畅通会立即退出,脚本会在3秒后查看telnet窗口是否退出,如果没有退出表示端口不通!
start /min cmd.exe /k "echo q|telnet -e 'q' %%i !serverport! & exit"
ping -n 3 127.1>nul
rem 查找窗口名为“Telnet ${ip}”的cmd窗口,如果存在则表示此IP不通
tasklist /fi "windowtitle eq Telnet %%i" | find "cmd.exe" >nul && (
echo 【失败】:无法连通 %%i:!serverport!
) || (
echo 【成功】:可以连接到 %%i:!serverport!
)
echo=
set server_ip=%%j
goto check_port
)
goto :eof
::其他代码略...
这样就解决了Windows下telnet探测远程端口的问题了,而且检测速度比微软哪个portqry快多了,果然思路比技术更重要,只要有想法,任何技术都不应该成为瓶颈!
②、进程判断【最新补充】
当使用窗口判断的方案下发各大机房实施的时候,又一个问题出现了!窗口判断在某些版本的Windows下是行不通的,比如英文版下的命令提示符窗口名称和中文版的就不一样,所以这个方案也是不完善的!
于是,继续抓耳挠腮,想出了第二个方案:通过判断telnet进程数量来判断网络是否畅通。
方案思路:
a. 先判断脚本执行之前是否存在 telnet.exe 的进程,如果存在则统计数量
b. 和窗口判断一样,利用start命令在新的cmd命令提示符中执行 telnet 命令
c. 延迟几秒后统计系统中存在的telnet.exe进程数(存在的telnet表示是不通的)
d. 和最开始统计的 telnet 进程数比对计算,就知道有几个IP是不通的了
示例代码:
::使用telnet命令检测的代码
@echo off & setlocal enabledelayedexpansion
rem 要检测的IP和端口
set server_ip='192.168.1.1,192.168.1.2,192.168.1.3'
set serverport='9922'
::****其他代码略****
rem 刚开始先计算telnet.exe的进程数量,避免脚本执行之前就已经存在telnet.exe
call :telnet_num conf
rem 模块化调用
call :check_port
:check_port
set /a check_num+=1
rem ※探测端口模块※
for /f "tokens=1,* delims=," %%i in ("!server_ip!") do (
echo [No.!check_num!]:正在检测 %%i 的 !serverport! 端口...
::call :set_iPSec %%i
rem 使用telnet组合命令进行测试,如果端口畅通会立即退出,脚本会在3秒后查看telnet窗口是否退出,如果没有退出表示端口不通!
start /min cmd.exe /k "echo q|telnet -e 'q' %%i !serverport! & exit"
echo=
set server_ip=%%j
set total_num=!check_num!
goto check_port
)
ping -n 3 127.1>nul
#再次计算telnet进程数量,而且已经排除执行之前就有的telnet数量
call :telnet_num
echo 可用数量为:!telnet_num!
goto :eof
:telnet_num
rem 检测telnet进程数量,已排除脚本之前存在telnet
set conf=0
for /f "delims=*" %%i in ('tasklist ^| findstr "telnet.exe"') do (
if "%1"=="conf" (
set /a conf+=1
) else (
set /a telnet_num+=1
)
)
set /a telnet_num=!telnet_num!-!conf!
goto :eof









