[已解决]求助：bat批量将目录下所有文本的第一行复制添加到最后一行

blueskyczg · 发表于 2015-4-16 11:11:37

本帖最后由 blueskyczg 于 2015-4-17 08:23 编辑

如题，一个目录下有很多这样的txt，需要把
1,490254.077,3406396.155
2,39490190.453,3406354.166
3,39490218.984,3406354.528
4,39490254.077,3406396.155
5,490263.399,3406395.618
这样内容的第一行复制添加到最后一行
1,490254.077,3406396.155
2,49090.453,3406354.166
3,390218.984,3406354.528
4,3949054.077,3406396.155
5,3949263.399,3406395.618
1,490254.077,3406396.155
变成这样子的，然后文件名不变。

pcl_test · 发表于 2015-4-16 11:35:28

@echo off & setlocal enabledelayedexpansion
for /f "delims=" %%a in ('dir /b *.txt') do (
set /p first=<"%%a"
>>"%%a" echo,!first!
)
echo 完成！2秒关闭
ping 0 -n 3 >nul

复制代码

xxrs · 发表于 2017-3-13 21:42:20

请教！怎么把这个代码改成复制30行复制添加到最后一行
谢谢~！

taofan712 · 发表于 2017-3-13 22:20:34

@echo off & setlocal enabledelayedexpansion
for /f "skip=29 delims=" %%a in ('dir /b *.txt') do (
set /p thirty=<"%%a"
>>"%%a" echo,!thirty!
)
echo 完成！2秒关闭
ping 0 -n 3 >nul

复制代码

试试？

xxrs · 发表于 2017-3-13 22:29:23

回复 4# taofan712

试了！只能复制第一行没实现复制30行数据！

pcl_test · 发表于 2017-3-13 23:07:30

回复 3# xxrs

@echo off
2>nul md result
for /f "delims=" %%a in ('dir /b *.txt') do call :loop "%%a"
pause&exit
:loop
setlocal enabledelayedexpansion
(type %1
for /f "tokens=1* delims=:" %%i in ('findstr /n .* %1') do (
set /a n+=1
echo;%%j
if !n! equ 30 goto :eof
))>"result\%~1"

复制代码

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

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

[文本处理] [已解决]求助：bat批量将目录下所有文本的第一行复制添加到最后一行

评分

评分

评分