求写个Ping的批处理或Vbs

Question

最最近感觉网络不太好，所以想用ping命令来写个批。参考网上众多帖子，最终也没能写成。
求坛内高手帮写下。

要求：

1.一直ping某个地址，如果命令能执行，就一直ping。如果ping不了，就把ping不了的结果输出到文本，并且加上时间戳。

2.当ping命令不能执行的时候，尝试2到3个不同地址，所有不能执行ping命令的结果加上时间戳输出到文本。

3.除非手动结束批运行，否则批一直运行下去。

Answer 1

下面是一个简单的批处理脚本，它能够执行Ping操作并将结果输出到文本文件中：

@echo off
setlocal enabledelayedexpansion

REM 设置要ping的地址列表
set "addresses=www.google.com www.example.com www.bing.com"

REM 设置输出文件名
set "output_file=ping_results.txt"

REM 循环ping地址列表
:ping_loop
for %%a in (%addresses%) do (
    ping %%a >nul 2>&1
    if errorlevel 1 (
        REM 输出不能ping通的地址到文本文件
        echo [!date! !time!] Cannot ping %%a >> %output_file%
    ) else (
        REM 输出ping通的地址到控制台
        echo [!date! !time!] Ping successful: %%a
    )
)

REM 延迟一段时间后重新开始ping
timeout /t 10 /nobreak >nul
goto ping_loop

这个批处理脚本会不断地Ping指定的地址列表，如果Ping成功，则在控制台显示成功的消息，如果Ping失败，则将失败的消息输出到指定的文本文件中，并在每条消息前加上时间戳。然后，它会延迟一段时间后重新开始Ping。

请注意，这只是一个简单的示例脚本，如果你需要更复杂的功能或者错误处理，可能需要对脚本进行进一步修改。