批处理怎样提取一个文本内容里的不重复行并输出？

wh1234567

13# chenqldiy

你这是干啥的批处理？我有点看不懂

wh1234567

请高手帮我优化一下，我弄得这个批处理太慢
@echo off
setlocal enabledelayedexpansion
set a=0
echo                   过滤文本重复行只提取不相同行
echo.
set /p wb=输入要处理的文件名：
set /p wb1=输入要保存的文件名：
set wb=%wb:"=%
set wb1=%wb1:"=%

for /f "delims=" %%i in ('type "%wb%"') do (
set a=0
for /f "delims=" %%j in ('type "%wb%"') do if "%%i" == "%%j" (set /a a+=1)
if "!a!" leq "1" echo %%i>>"%wb1%".txt
)
echo                     处理完成
ping /n 2 127.0.1 >nul
goto :eof

Batcher

17# wh1234567


能否学习一下怎样使用code标签？
http://bbs.bathome.net/thread-3473-1-1.html

batman

楼主自己对着改：

1. 
   
2. @echo off
   
3. (for /f "delims=" %%a in (a.txt) do if not defined "%%a" echo %%a&set ""%%a"=a")>b.txt
   
4. start b.txt
   

复制代码

wh1234567

19# batman

回复版主，不是去除重复行，而是要提取不同的行，也就是将包含有重复的行全部去掉，剩下的就是没有重复过的行了，希望帮忙

例如：原文本1：
12
13
22
你好3？
13
12
处理后并输出的文本内容就是：
22
你好3？

batman

还是一个不通用的解：

1. 
   
2. @echo off
   
3. for /f "delims=" %%a in (a.txt) do set /a "_%%a+=1"
   
4. (for /f "tokens=1,2 delims==_" %%a in ('set _') do if %%b equ 1 echo %%a)>b.txt
   
5. start b.txt
   
6. 
   

复制代码

batman

1. 
   
2. @echo off&setlocal enabledelayedexpansion
   
3. rem 每行字符间不能有空格,;><&tab以及成对的!字符
   
4. set "str= "
   
5. for /f "delims=" %%a in (a.txt) do (  
   
6.   if "!str: %%a =!" neq "!str!" (
   
7.     set "str=!str: %%a =!"
   
8.     ) else (
   
9.     set "str=!str! %%a "
   
10.   )
    
11. )   
    
12. (for %%a in (%str%) do echo %%a)>b.txt
    
13. start b.txt
    

复制代码

batman

vbs的，应该很通用了：

1. 
   
2. Set fso = CreateObject("scripting.filesystemobject")
   
3. vbstr = fso.OpenTextFile("a.txt").ReadAll()
   
4. arr = Split(vbstr, vbCrLf)
   
5. For Each str In arr
   
6.   If InStr(vbout, str) = 0 Then
   
7.     vbout = vbout & str & vbCrLf
   
8.     Else
   
9.     vbout = Replace(vbout, str, "$@#^&><")
   
10.   End If
    
11. Next
    
12. fso.OpenTextFile("b.txt", 2, True).Write Replace(vbout, "$@#^&><" & vbCrLf, "")
    
13. MsgBox "ok"
    

复制代码

abcdshenji

1. 
   
2. @echo off
   
3. (for /f "delims= eol=" %%i in ('"type 1.txt|findstr ".*""') do (
   
4.         if not defined %%i (echo;%%i) else call,set "#=%%#%%%%i "
   
5.         set "%%i=0"
   
6. ))>#
   
7. findstr /v /i "%#%" #>2.txt&del #
   

复制代码

wh1234567

23# batman

处理速度很快，但就是处理后多出了一行

ghl621

看看学习！学习！

ghl621

看看学习！学习！