求个批量合并文件夹下所有TXT的批处理

修修的想法 · 发表于 2018-8-10 15:51:17

回复 11# xczxczxcz

对了不知为何合并的衔接处第一行会有个乱码文字

xczxczxcz · 发表于 2018-8-10 16:12:54

回复 16# 修修的想法

乱码一般是你的TXT文件不是ANSI编码的。偶测试没问题，没有乱码。

现用版主优化的。用not defined 代替 for 遍列循环。

@echo off & setlocal EnableDelayedExpansion
for /f "delims=" %%a in ("%~1\..") do set "保存位置=%%~fa"
del /q "%保存位置%\合并.txt">nul 2>nul
cd.>"%temp%\合并.txt"
set /p 添加文字= 输入你要在每行末尾添加的字符并回车：
for /f "delims=" %%a in ('dir/b "%~1\*.txt"') do (
for /f "delims=" %%i in ('type "%~1\%%a"') do (
set/p=合并文本 → %%i <nul
if not defined %%i (echo.&echo %%i%添加文字%>>"%temp%\合并.txt") else echo ——重复
set "%%i=#"
)
)
echo.
move /y "%temp%\合并.txt" "%保存位置%"
set/p=文件保存在 [%保存位置%] 目录下<nul & pause & exit

复制代码

偶测试速度嗖嗖的。

xczxczxcz · 发表于 2018-8-10 16:15:54

回复 12# Batcher

用 defined 代替 loop那个 for 循环后，速度快了好多。

Batcher · 发表于 2018-8-10 16:55:35

回复 14# 修修的想法

我这边测试没有发现问题。把你的测试代码和测试结果发出来看看

修修的想法 · 发表于 2018-8-10 18:49:05

回复 19# Batcher

可以啦可以啦真是大神都是编码的问题不知为何TXT都是utf-8格式

能不能有个提前都把TXT调整成 ANSI格式的批处理

修修的想法 · 发表于 2018-8-10 18:49:41

回复 17# xczxczxcz

感谢感谢一个个测试了确实是格式的问题

xczxczxcz · 发表于 2018-8-11 15:27:42

回复 xczxczxcz

感谢感谢一个个测试了确实是格式的问题
修修的想法发表于 2018-8-10 18:49

@echo off
for /f "delims=" %%a in ("%~1\..") do set "保存位置=%%~fa"
cd.>"%保存位置%\合并.txt"
set /p 添加文字= 输入你要在每行末尾添加的字符并回车：
for /f "delims=" %%a in ('dir/b "%~1\*.txt"') do (
iconv -c -s -f utf-8 -t gbk "%~1\%%a">"%~1\%%a.tmp"
for /f "delims=" %%i in ('type "%~1\%%a.tmp"') do (
set/p=合并文本 → %%i <nul
if not defined %%i (echo.&echo %%i%添加文字%>>"%保存位置%\合并.txt") else echo ——重复
set "%%i=#"
)
)
echo.
del /q "%~1\*.tmp"
set/p=文件保存在 [%保存位置%] 目录下<nul & pause & exit

复制代码

这个带了转码的。到官网下载 iconv.exe 或在本坛下载 win_iconv.exe 放到系统 system32目录下。或与批处理放在一起。
。

修修的想法 · 发表于 2018-8-12 13:43:27

回复 22# xczxczxcz

@echo off

for /f "delims=" %%a in ("%~1\..") do set "保存位置=%%~fa"
cd.>"%保存位置%\合并.txt"
set /p 添加文字= 输入你要在每行末尾添加的字符并回车：
for /f "delims=" %%a in ('dir/b "%~1\*.txt"') do (
iconv -c -s -f utf-8 -t gbk "%~1\%%a">"%~1\%%a.tmp"
   for /f "delims=" %%i in ('type "%~1\%%a.tmp"') do (
      set/p=合并文本 → %%i <nul
   if not defined %%i (echo.&echo %%i%添加文字%>>"%保存位置%\合并.txt") else echo ——重复
   set "%%i=#"
)
)
echo.
del /q "%~1\*.tmp"
set/p=文件保存在 [%保存位置%] 目录下<nul & pause & exit

@echo off
setlocal enabledelayedexpansion
set filenames=0
set numbers=0
set 每个文件几个帐号=1000
set filename=1
for /f "delims=" %%a in (合并.txt) do (
      set /a numbers+=1
      set /a filenames+=1
      echo %%a>>!filename!.txt
      if !numbers! geq !每个文件几个帐号! (
            set /a filename+=1
            set numbers=0
            )
)

大神请教下如何把这两个合并一起使用啊我合并后没什么作用本意就是之前合并去重后再把这个文本按照每个1000行分成多个TXT  最好自定义命名

修修的想法 · 发表于 2018-8-12 13:44:09

回复 22# xczxczxcz

你说的那个编码问题都解决感谢

xczxczxcz · 发表于 2018-8-12 14:20:38

回复 24# 修修的想法

~~不要用于违法活动。虽然偶很少用 qq~~

@echo off
for /f "delims=" %%a in ("%~1\..") do set "保存位置=%%~fa"
cd.>"%保存位置%\合并.txt"
set /p 添加文字= 输入你要在每行末尾添加的字符并回车：
for /f "delims=" %%a in ('dir/b "%~1\*.txt"') do (
iconv -c -s -f utf-8 -t gbk "%~1\%%a">"%~1\%%a.tmp"
for /f "delims=" %%i in ('type "%~1\%%a.tmp"') do (
set/p=合并文本 → %%i <nul
if not defined %%i (echo.&echo %%i%添加文字%>>"%保存位置%\合并.txt") else echo ——重复
set "%%i=#"
)
)
echo.
del /q "%~1\*.tmp"
setlocal EnableDelayedExpansion
set/a file+=1
for /f "delims=" %%a in (%保存位置%\合并.txt) do (
set/a number+=1
if !number! LEQ 1 set/p var=请输入第 !file! 文本的名称，回车继续：
if !number! LEQ 1000 echo %%a>>!var!.txt
if !number! EQU 1000 (set/a number=0 & set/a file+=1)
)
Endlocal
pause & exit

复制代码

修修的想法 · 发表于 2018-8-12 15:39:06

回复 25# xczxczxcz

不违法哈哈运行后没有什么反应...

xczxczxcz · 发表于 2018-8-12 16:18:18

回复 26# 修修的想法

把你要处理的那个文件夹拖上来，是一起处理的。不是单个运行的。

		自动登录	找回密码
密码			注册

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

[文本处理] 求个批量合并文件夹下所有TXT的批处理

评分

评分