[新手上路]批处理新手入门导读[视频教程]批处理基础视频教程[视频教程]VBS基础视频教程[批处理精品]批处理版照片整理器
[批处理精品]纯批处理备份&还原驱动[批处理精品]CMD命令50条不能说的秘密[在线下载]第三方命令行工具[在线帮助]VBScript / JScript 在线参考
返回列表 发帖

[网络连接] [分享]批处理ping域名发现IP变了就写到文本里

【问题】
我想ping一个域名发现ip变了就写到文本里,变的时间同时输出。

【代码】
Step1.bat
  1. @echo off
  2. set "URL=www.baidu.com"
  3. for /f "tokens=2 delims=[]" %%i in ('ping -n 1 %URL% ^| findstr "\[.*\]"') do (
  4.     set IP=%%i
  5. )
  6. echo,%IP%
  7. pause
复制代码
Step2.bat
  1. @echo off
  2. set "URL=bbs.csdn.net"
  3. set "FileIP=IP.txt"
  4. set "FileLog=URL_IP.log"
  5. if not exist "%FileIP%" (
  6.     >"%FileIP%" echo 0.0.0.0
  7. )
  8. if not exist "%FileLog%" (
  9.     >"%FileLog%" type nul
  10. )
  11. :Monitor
  12. for /f "tokens=2 delims=[]" %%a in ('ping -n 1 %URL% ^| findstr "\[.*\]"') do (
  13.     set IP_Current=%%a
  14. )
  15. set /p IP_Previous=<"%FileIP%"
  16. echo %IP_Previous% -- %IP_Current%
  17. if "%IP_Previous%" neq "%IP_Current%" (
  18.     >"%FileIP%" echo %IP_Current%
  19.     >>"%FileLog%" echo [%date% %time%] %IP_Current%
  20. )
  21. timeout /nobreak /t 3 >nul
  22. goto :Monitor
复制代码
我帮忙写的代码不需要付钱。如果一定要给,请在微信群或QQ群发给大家吧。
【微信公众号、微信群、QQ群】http://bbs.bathome.net/thread-3473-1-1.html
【支持批处理之家,加入VIP会员!】http://bbs.bathome.net/thread-67716-1-1.html

回复 2# xuxianking


请参考Q-01观察一下哪行代码在报错:
https://mp.weixin.qq.com/s/6lbb97qUOs1sTyKJfN0ZEQ
我帮忙写的代码不需要付钱。如果一定要给,请在微信群或QQ群发给大家吧。
【微信公众号、微信群、QQ群】http://bbs.bathome.net/thread-3473-1-1.html
【支持批处理之家,加入VIP会员!】http://bbs.bathome.net/thread-67716-1-1.html

TOP

返回列表