?Windows IP测试小脚本

在数组中添加名字和IP

双击运行后选择需要Ping的IP

::IP测试脚本
@ECHO OFF
REM
:: UTF-8执行
chcp 65001

:: IP地址数组声明
set ArrayLength=3
set ArrayIndex=0
set chooseReturn=0
set Array[0].name=新庄路  
set Array[0].ip=192/168/1/1
set Array[1].name=天津路  
set Array[1].ip=192/168/1/1
set Array[2].name=石桥路  
set Array[2].ip=192/168/1/1


:: 脚本程序开始
echo 泵站IP测试
:: 打印
echo   序号   名字         IP
call:printfArray
:: 选择泵站
call:choose

call Ping脚本.bat
pause


:: IP地址数组函数
:printfArray
    if %ArrayIndex% equ %ArrayLength% goto printfArrayEnd

    set ArrayCurrent.name=0
    set ArrayCurrent.ip=0

    for /f "usebackq delims==. tokens=1-3" %%i in (`set Array[%ArrayIndex%]`) do (
        set ArrayCurrent.%%j=%%k
    )

    if %ArrayIndex% LSS 10 (
        echo    %ArrayIndex%    %ArrayCurrent.name%  %ArrayCurrent.ip:/=.%
    ) else (
        echo    %ArrayIndex%   %ArrayCurrent.name%  %ArrayCurrent.ip:/=.%
    )

    set /a ArrayIndex=%ArrayIndex% + 1

    goto printfArray

    :printfArrayEnd
    goto:eof

:: 选择
:choose 
    set /p chooseIndex=请填写序号:
    set chooseReturn=%chooseIndex%

    set chooseCurrent.name=0
    set chooseCurrent.ip=0

    for /f "usebackq delims==. tokens=1-3" %%i in (`set Array[%chooseIndex%]`) do (
        set chooseCurrent.%%j=%%k
    )

    echo 序号 %chooseIndex% 名字 %chooseCurrent.name% IP %chooseCurrent.ip:/=.%

    ping %chooseCurrent.ip:/=.% -t

    goto:eof