批处理系列(12) -合并文本（交叉合并/除重复除空行/行首行尾加特定字符）

Posted 2020-10-27 大象

结合本系列文章第一篇，看本文。

交叉合并两个文本文件的内容。

@Echo Off
title 交叉合并文本内容  by：小可([e-mail])

:GTBegin
@echo 默认合并目录下 a.txt 和 b.txt 两个文本文件到 c.txt，确定继续？(y/n)
set /p GTConfirm=
if "%GTConfirm%"=="y" goto GTYES
if "%GTConfirm%"=="Y" goto GTYES
if "%GTConfirm%"=="n" goto GTNO
if "%GTConfirm%"=="N" goto GTNO
echo 请输入正确的指令
pause >nul
goto GTBegin

:GTYES
pushd %cd%
for /f "delims=" %%a in (\'dir /a-d /b *.txt\') do (
findstr /r /c:"[^ ]" "%%a">#
move # "%%a"
)
popd
For /F "tokens=1* delims=:" %%i In (\'Findstr /n .* b.txt\') Do Set "_%%i=%%j"
(For /F "delims=" %%i In (\'Findstr /n .* a.txt\') Do (
  Set "Str=%%i"& Set /A Count+=1
  SetLocal EnableDelayedExpansion
  For %%j In (!Count!) Do (
    Echo,!Str:*:=!
    Echo,!_%%j!
    )
  EndLocal
))>c.txt
Start c.txt
echo. :) 搞定
pause >nul
exit

:GTNO
exit

---

合并所有文本内容，并去除重复内容行和空行

@echo off
title 合并文本删除重复行  by：小可([e-mail])

:GTBegin
@echo 默认合并目录下所有文本文件到 all.txt，确定继续？(y/n)
set /p GTConfirm=
if "%GTConfirm%"=="y" goto GTYES
if "%GTConfirm%"=="Y" goto GTYES
if "%GTConfirm%"=="n" goto GTNO
if "%GTConfirm%"=="N" goto GTNO
echo 请输入正确的指令
pause >nul
goto GTBegin

:GTYES
for /f "delims=" %%a in (\'dir /a-d /b /on *.txt\') do (
  for /f "delims=" %%b in (\'type "%%a"\') do (
    if not defined %%b set %%b=Def & >>$ echo,%%b
  )
)
move $ "all.txt"
echo. :) 搞定
pause >nul
exit

:GTNO
exit

---

行首行尾加特定字符，预置好字符，拖入要处理的文本到该批处理文件图标上。
这里加<p></p>

@echo off
@REM @Author: [e-mail]
@REM @Date:   2016-04-06 11:22:44
title 文本行首尾加字符  by：小可([e-mail])
:GTCONTINUE
cls
for /f "delims=" %%a in (\'type "%~1"\') do echo ^<p^>%%~a^</p^>>>"%~dp1%~n1-temp%~x1"
goto GTCONTINUE

---

将大批量图片放置在服务器，要组成图片html代码标签。
拖入要处理的文本到该批处理文件图标上

@echo off
@REM @Author: [e-mail]
title 文本内容行首尾加字符  by：小可([e-mail])
SETLOCAL ENABLEDELAYEDEXPANSION
for /f "delims=" %%a in (\'type "%~1"\') do set FilePath="%~dp1%~n1-done%~x1"
if exist "%FilePath%" DEL/q "%FilePath%"
cd.>%FilePath%
for /f "delims=" %%a in (\'type "%~1"\') do echo ^<img src=^"%%~a^" /^> >> "%FilePath%"
set "FilePath=%FilePath:"=%"
start %FilePath%
exit

---

转载保留原文地址和作者名，只为错误勘正和信息补充。
版权声明：自由转载-非商用-非衍生-保持署名（创意共享3.0许可证）