[新手上路]批处理新手入门导读[视频教程]批处理基础视频教程[视频教程]VBS基础视频教程[批处理精品]批处理版照片整理器
[批处理精品]纯批处理备份&还原驱动[批处理精品]CMD命令50条不能说的秘密[在线下载]第三方命令行工具[在线帮助]VBScript / JScript 在线参考
返回列表 发帖
本帖最后由 bigjohn 于 2019-6-15 17:58 编辑
  1. @echo off
  2. setlocal enabledelayedexpansion
  3. set count=0
  4. set lost=0
  5. set totallost=10
  6. if exist temp.txt del temp.txt
  7. if exist temp1.txt del temp1.txt
  8. if exist lost.txt del lost.txt
  9. if exist offline.txt del offline.txt
  10. for /f "usebackq delims=" %%a in (ip.txt)  do (
  11.     echo %%a>temp.txt
  12.    
  13.     set /a count+=1
  14.     set /p = !count!.  
  15.     set /p = No.!count!  >>temp1.txt
  16.    
  17.     for /f "tokens= 1 delims= " %%i in (temp.txt)   do  set /p =  %%i
  18.     for /f "tokens= 1 delims= " %%i in (temp.txt)   do  set /p = "%%i  " >>temp1.txt
  19.     for /f "tokens= 2 delims= " %%i in (temp.txt)   do  set /p = "%%i  "
  20.     for /f "tokens= 2 delims= " %%i in (temp.txt)   do  set /p = "%%i  " >>temp1.txt
  21.    
  22.     set b = %%a
  23.         
  24.     for /f "tokens=3 delims=," %%i in ('ping -n 1 "%b%"^|findstr /i "数据包  平均"') do set /p = "%%i  "
  25.     for /f "tokens=3 delims=," %%i in ('ping -n 1 "%b”^|findstr /i "数据包  平均"') do set /p = "%%i  " >>temp1.txt  
  26.    
  27.     echo. >>temp1.txt
  28.     echo.
  29.     echo.
  30. )<nul
  31. for /f "usebackq delims=" %%a in (temp1.txt) do (
  32.       
  33.     for /f "tokens=6 delims= " %%i in ('echo %%a^|findstr /i "丢失"')  do (   
  34.     if %lost%==%%i  echo %%a >> lost.txt  rem 调试用,不正确
  35.     if %totallost%==%%i  echo %%a >> offline.txt rem 调试用,不正确
  36.     )
  37. )<nul
复制代码
以上是我的程序,不知道为什么有时temp1.txt结果正确,有时就不正确。
新手上路,不太会用变量,只好不停地打开文件得到变量,执行效率非常低。
见笑了。
nice to meet u

TOP

返回列表