批处理之家 » BAT求助&讨论 » （已解决）批处理如何将N个TXT文档中数列连续排列？

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

返回列表发帖

Rank: 1

帖子: 9
积分: 29
技术: 0
捐助: 0
注册时间: 2015-4-19

1楼 跳转到 » 倒序看帖

字体大小: tT

发表于 2015-4-19 20:57 | 只看该作者

[文本处理] （已解决）批处理如何将N个TXT文档中数列连续排列？

如何将多个TXT中|Adr 1|中的数字往下依次排列，数字只能占空格位，一直排列到每个文本的末尾。求高手指教，写个bat！谢谢

1 评分人数

Batcher: 感谢给帖子标题标注[已解决]字样PB + 2

Rank: 8 Rank: 8

帖子: 3041
积分: 5333
技术: 685
捐助: 0
注册时间: 2014-10-19

2楼

发表于 2015-4-19 21:01 | 只看该作者

回复 1# zhouyigenii

打包一份样文上传附件

Rank: 8 Rank: 8

帖子: 3041
积分: 5333
技术: 685
捐助: 0
注册时间: 2014-10-19

3楼

发表于 2015-4-19 21:43 | 只看该作者

本帖最后由 pcl_test 于 2015-4-20 11:15 编辑

@echo off &setlocal enabledelayedexpansion
set "folder=处理结果"
md "%folder%\" 2>nul
for /f "delims=" %%z in ('dir /b *.txt') do (
set n=0
(for /f "tokens=1,2* delims=|" %%a in ('type "%%z"') do (
if "%%c" neq "" (
for /f "tokens=1*" %%d in ("%%b") do (
set/a n+=1
set "str=￥     !n!"
echo,%%a^|%%d!str:~-6!^|%%c
))))>"%folder%\%%z"
)
pause
复制代码

Rank: 8 Rank: 8

帖子: 3041
积分: 5333
技术: 685
捐助: 0
注册时间: 2014-10-19

4楼

发表于 2015-4-19 21:44 | 只看该作者

问题得到解决后请在标题最前面注明[已解决]
http://www.bathome.net/thread-3473-1-1.html

Rank: 3 Rank: 3

帖子: 81
积分: 208
技术: 33
捐助: 0
注册时间: 2015-1-8

5楼

发表于 2015-4-19 22:00 | 只看该作者

本帖最后由 cobat 于 2015-4-19 22:20 编辑

@echo off
for /f "delims=" %%a in ('dir/b *.txt') do (
    set n=0
    (for /f "usebackq delims=" %%b in ("%%a") do (
        set "$=%%b"
        set/a n+=1
        setlocal enabledelayedexpansion
        set "#=     !n!"
        echo !$:~,10!!#:~-6!!$:~16!
        endlocal
    ))>"_%%a"
)
pause
复制代码

Rank: 8 Rank: 8

帖子: 3041
积分: 5333
技术: 685
捐助: 0
注册时间: 2014-10-19

6楼

发表于 2015-4-19 22:31 | 只看该作者

回复 6# zhouyigenii

已在3楼修改

1 评分人数

zhouyigenii: 感谢分享技术 + 1

Rank: 1

帖子: 9
积分: 29
技术: 0
捐助: 0
注册时间: 2015-4-19

7楼

发表于 2015-4-19 22:55 | 只看该作者

回复 7# pcl_test

啊啊啊。点错地方了，真不好意思！怎么改过来？

Rank: 8 Rank: 8

帖子: 3041
积分: 5333
技术: 685
捐助: 0
注册时间: 2014-10-19

8楼

发表于 2015-4-19 23:00 | 只看该作者

回复 7# zhouyigenii
没关系，评分改不了的

Rank: 1

帖子: 9
积分: 29
技术: 0
捐助: 0
注册时间: 2015-4-19

9楼

发表于 2015-4-20 10:47 | 只看该作者

回复 8# pcl_test

Adr 这里全变成%d了

Rank: 8 Rank: 8

帖子: 3041
积分: 5333
技术: 685
捐助: 0
注册时间: 2014-10-19

10楼

发表于 2015-4-20 11:15 | 只看该作者

回复 9# zhouyigenii
已更正

1 评分人数

zhouyigenii: 乐于助人技术 + 1