|
|
发表于 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
复制代码 |
|