[新手上路]批处理新手入门导读[视频教程]批处理基础视频教程[视频教程]VBS基础视频教程[批处理精品]批处理版照片整理器
[批处理精品]纯批处理备份&还原驱动[批处理精品]CMD命令50条不能说的秘密[在线下载]第三方命令行工具[在线帮助]VBScript / JScript 在线参考
返回列表 发帖
本帖最后由 ivor 于 2017-7-20 21:02 编辑
  1. @echo off&setlocal ENABLEDELAYEDEXPANSION
  2. for /f "tokens=1,2 delims=," %%a in (new.csv) do (
  3. :one
  4. for /f "tokens=1,2 delims=," %%i in ('findstr /E "%%b" old.csv ^|^| echo false') do (
  5. if "%%i" equ "false" (
  6. for /f %%x in ('type old.csv ^| find /i "," /c') do (
  7. set /a ranking=%%x-%%a
  8. echo !ranking!,%%b
  9. rem >>rank.csv echo !ranking!,%%b
  10. )
  11. ) else (
  12. set /a ranking=%%i-%%a
  13. echo !ranking!,%%b
  14. rem >>rank.csv echo !ranking!,%%b
  15. )
  16. )
  17. )
  18. pause
复制代码
2

评分人数

#&cls&@powershell "Invoke-Expression ([Io.File]::ReadAllText('%~0',[Text.Encoding]::UTF8))" &pause&exit

TOP

  1. for /f "tokens=1,2 delims=," %%i in ('findstr /E ",%%b" old.csv ^|^| echo false') do (
复制代码
关于二级域名的问题,这一行%%b前面加个,就能解决

没生成文件是因为我注释了两行,前面带有REM
1

评分人数

#&cls&@powershell "Invoke-Expression ([Io.File]::ReadAllText('%~0',[Text.Encoding]::UTF8))" &pause&exit

TOP

返回列表