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

Rank: 5Rank: 5

帖子
639 
积分
1257 
技术
1  
捐助
0  
注册时间
2012-7-1 
1楼 跳转到 » 倒序看帖
打印
tT
发表于 2015-7-5 22:51 | 只看该作者

[文本处理] [已解决]BAT如何批量提取多个文本内的共有数？

D:/数据1/内有若干txt文本：
001_1.txt
001_2.txt

002_1.txt
002_2.txt
...
210_1.txt
210_2.txt
欲
提取001_1.txt  001_2.txt共有的数据，写入D:/数据2/001.txt
提取002_1.txt  002_2.txt共有的数据，写入D:/数据2/002.txt
...
提取210_1.txt  210_2.txt共有的数据，写入D:/数据2/210.txt

比如：
001_1.txt内有数据：
01
02
03
001_2.txt内有数据：
02
03
04
05
001_1.txt  001_2.txt共有的数据为：02 03
则将02 03写入D:/数据2/001.txt，数据格式为横排：02 03
收藏 分享

pcl_test

Rank: 8Rank: 8

帖子
3041 
积分
5333 
技术
685  
捐助
0  
注册时间
2014-10-19 
2楼
发表于 2015-7-5 23:23 | 只看该作者 
  1. @echo off & setlocal enabledelayedexpansion

  2. cd /d D:\数据1\

  3. for /l %%a in (1001 1 1210) do (

  4. set n=%%a

  5. set n=!n:~1!

  6. (for /f "delims=" %%b in ('findstr /G:"!n!_1.txt" "!n!_2.txt"') do set /p=%%b )<nul>D:\数据2\!n!.txt

  7. )

  8. pause
复制代码
1

评分人数

TOP

思想之翼

Rank: 5Rank: 5

帖子
639 
积分
1257 
技术
1  
捐助
0  
注册时间
2012-7-1 
3楼
发表于 2015-7-5 23:33 | 只看该作者
回复 2# pcl_test

感谢帮助！
经测试，运行正确、快速。
再请教个问题：若提取001_1.txt  001_2.txt  001_3.txt  三个文本的共有数，上述代码如何扩展？

TOP

pcl_test

Rank: 8Rank: 8

帖子
3041 
积分
5333 
技术
685  
捐助
0  
注册时间
2014-10-19 
4楼
发表于 2015-7-5 23:47 | 只看该作者
本帖最后由 pcl_test 于 2015-7-6 00:45 编辑

回复 3# 思想之翼 
  1. @echo off&setlocal enabledelayedexpansion

  2. cd /d D:\数据1\

  3. for /l %%a in (1001 1 1002) do (

  4. set n=%%a

  5. set n=!n:~1!

  6. (for /f "delims=" %%b in ('findstr /G:"!n!_1.txt" "!n!_2.txt"') do for /f "delims=" %%c in ('findstr "%%b" "!n!_3.txt"') do set /p=%%c )<nul>D:\数据2\!n!.txt

  7. echo;>>D:\数据2\!n!.txt

  8. )

  9. pause
复制代码
1

评分人数

TOP

思想之翼

Rank: 5Rank: 5

帖子
639 
积分
1257 
技术
1  
捐助
0  
注册时间
2012-7-1 
5楼
发表于 2015-7-5 23:57 | 只看该作者
本帖最后由 思想之翼 于 2015-7-6 00:00 编辑

回复 4# pcl_test

感谢！
发现一个问题：提取出的数据，最后需要添加回车键，能否烦请再帮下忙。

TOP

pcl_test

Rank: 8Rank: 8

帖子
3041 
积分
5333 
技术
685  
捐助
0  
注册时间
2014-10-19 
6楼
发表于 2015-7-6 00:00 | 只看该作者
回复 5# 思想之翼
此处添加
echo;>>D:\数据2\!n!.txt
)
pause
1

评分人数

TOP

思想之翼

Rank: 5Rank: 5

帖子
639 
积分
1257 
技术
1  
捐助
0  
注册时间
2012-7-1 
7楼
发表于 2015-7-6 00:16 | 只看该作者
本帖最后由 思想之翼 于 2015-7-6 00:29 编辑

回复 6# pcl_test

(for /f "delims=" %%b in ('findstr /G:"!n!_1.txt" "!n!_2.txt"') do set /p=%%b )<nul>echo;>>D:\数据2\!n!.txt

这样？问题没有解决，望指教。

TOP

pcl_test

Rank: 8Rank: 8

帖子
3041 
积分
5333 
技术
685  
捐助
0  
注册时间
2014-10-19 
8楼
发表于 2015-7-6 00:38 | 只看该作者
回复 7# 思想之翼
添加一行代码，而不是修改原有代码

TOP

思想之翼

Rank: 5Rank: 5

帖子
639 
积分
1257 
技术
1  
捐助
0  
注册时间
2012-7-1 
9楼
发表于 2015-7-6 00:59 | 只看该作者
回复 8# pcl_test

感谢！问题解决。

TOP

返回列表