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

重写csv部分,楼主自己将替换和这段合起来吧:
  1. @echo off
  2. for /r e:\测试 %%a in (*.csv) do (
  3.      (for /f "usebackq tokens=1* delims=," %%b in ("%%a") do echo %%b,%%b,%%c)>"%%~dpatem"
  4.      del /q "%%a"&ren "%%~dpatem" "%%~nxa"
  5. )
复制代码
***共同提高***

TOP

本帖最后由 batman 于 2011-4-1 16:42 编辑
  1. @echo off&setlocal enabledelayedexpansion
  2. for /r e:\测试 %%a in (*.csv) do (
  3.      (for /f "usebackq delims=" %%b in ("%%a") do (
  4.           set "var="&call :lp "%%b"
  5.           for /f "tokens=1* delims=," %%b in ("!var!") do echo %%b,%%b,%%c
  6.       ))>"%%~dpatem"
  7.       del /q "%%a"&ren "%%~dpatem" "%%~nxa"
  8. )
  9. goto :eof
  10. :lp
  11. if not defined str set "str=%~1"
  12. for /f "tokens=1* delims=*" %%a in ("%str%") do (
  13.      set "var=!var!;%%a"
  14.      if "%%b" neq "" set "str=%%b"&goto lp
  15. )
  16. set "var=!var:~1!"&set "str="         
复制代码
1

评分人数

***共同提高***

TOP

返回列表