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

Rank: 2

帖子
110 
积分
167 
技术
0  
捐助
0  
注册时间
2012-2-23 
1楼 跳转到 » 倒序看帖
打印
tT
发表于 2012-12-4 19:57 | 只看该作者

[文本处理] 批处理如何根据文本前8个字母 删除重复项？

4f044489-----G:\JBS\今天\1000000.pdf
ccbee259-----G:\JBS\今天\1000001.pdf
5f7babd1-----G:\JBS\今天\1000002.pdf
592858e0-----G:\JBS\今天\1000003.pdf
0bdbf2f0-----G:\JBS\今天\1000004.pdf
0bdbf2f0-----G:\JBS\今天\1000009.pdf
81142b94-----G:\JBS\今天\1000005.pdf
144be708-----G:\JBS\今天\1000006.pdf

前8个字母是固定的  -----后面是文件的路径和文件名
前8个字母里有些是重复 请把重复的剔除  保留一组
例如
0bdbf2f0-----G:\JBS\今天\1000004.pdf
0bdbf2f0-----G:\JBS\今天\1000009.pdf

0bdbf2f0出现2次 删除其中一组 保留一组
收藏 分享

weichenxiehou

Rank: 5Rank: 5

帖子
430 
积分
1298 
技术
83  
捐助
0  
注册时间
2010-10-24 
2楼
发表于 2012-12-4 20:13 | 只看该作者
本帖最后由 weichenxiehou 于 2012-12-4 20:47 编辑

如果要删除实际的文件：
  1. @echo off&setlocal enabledelayedexpansion

  2. md backup 2>nul

  3. ::将下一行的a.txt替换为实际文本名

  4. for /f "tokens=1* delims=-" %%a in ('sort a.txt') do (

  5.   if "!str!"=="%%a" move "%%b" backup\

  6.   set "str=%%b"

  7. )
复制代码
如果只是修改文本：
  1. gawk -F- "{arr[$1]++;if(arr[$1]==1)print}"a.txt>result.txt
复制代码
看得多说得多，远比不上写得多。

TOP

necnec1

Rank: 2

帖子
110 
积分
167 
技术
0  
捐助
0  
注册时间
2012-2-23 
3楼
发表于 2012-12-4 21:00 | 只看该作者
weichenxiehou
gawk -F- "{arr[$1]++;if(arr[$1]==1)print}"a.txt>result.txt  
这段代码在CMD里运行失败


C:\Documents and Settings\Administrator>cd c:\

C:\>gawk -F- "{arr[$1]++;if(arr[$1]==1)print}"a.txt>result.txt
gawk: {arr[$1]++;if(arr[$1]==1)print}a.txt
gawk:                                 ^ syntax error

TOP

weichenxiehou

Rank: 5Rank: 5

帖子
430 
积分
1298 
技术
83  
捐助
0  
注册时间
2010-10-24 
4楼
发表于 2012-12-4 21:21 | 只看该作者
回复 3# necnec1
a.txt前面少了一个空格，加上试试吧。
看得多说得多，远比不上写得多。

TOP

necnec1

Rank: 2

帖子
110 
积分
167 
技术
0  
捐助
0  
注册时间
2012-2-23 
5楼
发表于 2012-12-4 21:50 | 只看该作者
非常好使 已完美解决 谢谢weichenxiehou

TOP

BAT-VBS

Rank: 8Rank: 8

帖子
888 
积分
6682 
技术
88  
捐助
0  
注册时间
2012-10-27 
6楼
发表于 2012-12-5 11:04 | 只看该作者
回复 2# weichenxiehou


简化一下：
  1. gawk -F- "!a[$1]++" a.txt >b.txt
复制代码
1

评分人数

TOP

返回列表