返回列表 发帖

[文本处理] [已解决]求助坛友:批处理删除文本重复行,区分字符大小写

本帖最后由 881966 于 2023-2-18 17:00 编辑

pfxk&*^wcp
eee?==?fff
eeee#########
h20132052@%
fdsg@$
i-ab.co

ga||game
-u0!JI.h9
""_St.w
//SeM***BW\
g272"|":|":l@785&^&&FG
c")
TheCollector"28hxmf62
7EJbfkctl40UTcbEsD5fyfPSZllW1kAsx7Qp5aN9pnsj2hbSRA4HR1NUVjSd8aYZqUfSkmeVZmR1P4SH07TsRj3LMkgrlC6dphIa4uCeRK8LGNNAwK0SIPVYK2FluEPbUV63GIc3sHS5f93oLumxgn2BRAFZJjz0QH5YbXmSNullvCDosW1aO64GBjyd4iMowzyPfsT3UAVzpo10ruNnWSno9zxoEhQHbBs7FLDIrvRhmbCY7sSaB8VYhyWxCfnuMdHI8r0eXC08BpbKXhRvyFBqk99PXjhKcdVPluCHo9FulP9SLlc9lO1nvzMBkq5oHoiPt5bPESlsT0JlICVzcI964Y2W0F8wP2lsj2vdZj5IA4dpUyJ4JkQEZ
[閾炬帴鐧诲綍鍚庡彲瑙乚
@銆佹彁鐞村瘎
ACG娓告垙寮
垙寮
acg鍜岃皭鍖?
鐪熻悵鑾夛紝鍌插▏鏁戜笘鐣?
e_e鈥樻鐏?
E涔﹀洯
垙寮
1

评分人数

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

@echo off
powershell "$Hash = @{};(GC '.\a.txt').Where({if (!$Hash.Contains($_)){$Hash.Add($_,++$i)}});($Hash.GetEnumerator()| Sort Value).Key"
pauseCOPY
1

评分人数

TOP

回复 25# WHY


    谢谢坛友的帮助

TOP

回复 24# 77七


    再次感谢 ,让你费心了,

TOP

@if(0)==(0) echo off
cd /d "%~dp0"
type a.txt | cscript //nologo //e:jscript "%~f0" > b.txt
pause & exit
@end
var map = {}
while(!WSH.StdIn.AtEndOfStream){
    var s = WSH.StdIn.ReadLine();
    if(s == ''){
        WSH.Echo(s);
    } else if(!map.hasOwnProperty(s)){
        map[s] = true;
        WSH.Echo(s);
    }
}COPY
1

评分人数

TOP

@echo off
cd.>b.txt
for /f "delims=" %%i in ('type "a.txt" ^| findstr /n .*') do (
        set "str=%%i"
        setlocal enabledelayedexpansion
        set "str=!str:*:=!"
        if "!str!" equ "" (
                >>b.txt echo,!str!
        )
        if not "!str!" equ "" (
                set n=
                for /f "delims=" %%c in ("!str!") do (
                        set "str3=%%c"
                )
                for /f "delims=" %%b in ('type "b.txt"') do (
                        if "!str3!" equ "%%b" (
                                set n=1
                        )
                )
                if not defined n (
                        >>b.txt echo,!str!
                )
        )
        endlocal
)
pauseCOPY

水平有限,想不出完美办法,只能折中,使用前手动替换全文中的"!"为其它字符,使用此代码后替换回"!",方可基本解决你的问题。
或者直接使用代码,特殊情况下会出错。
1

评分人数

bat小白,请多指教!谢谢!

TOP

回复 22# Batcher


    谢谢管理

今天好像异常,上传百度盘了


麻烦大家了:handshake

TOP

回复 13# 881966


如果需要上传文件,可以用阿里云盘或百度网盘。

如果需要上传截图,可以找个图床,例如:
http://bbs.bathome.net/thread-60985-1-1.html
我帮忙写的代码不需要付钱。如果一定要给,请在微信群或QQ群发给大家吧。
【微信公众号、微信群、QQ群】http://bbs.bathome.net/thread-3473-1-1.html
【支持批处理之家,加入VIP会员!】http://bbs.bathome.net/thread-67716-1-1.html

TOP

链接:https://pan.baidu.com/s/1ED_7kc5ASOuj8PLNoo0TaQ
提取码:1234

这是4楼代码

TOP

链接:https://pan.baidu.com/s/1LWaWO1WtfaI9uOSMhprHng
提取码:1234

这是3楼代码

TOP

链接:https://pan.baidu.com/s/1GMbCqSYFM6KcCXfJQO47Pw
提取码:1234

这是10楼代码

TOP

链接:https://pan.baidu.com/s/1W2FliVB36ZhutCqVA56G0g
提取码:1234

这是5楼代码

TOP

本帖最后由 881966 于 2023-2-18 20:04 编辑

回复 16# 77七


    链接:https://pan.baidu.com/s/1hBw23ogZBNkwqplvrWr60g
提取码:1234

用14楼的代码

TOP

回复 15# 881966

不提供出错信息,又不提供样本,让大家怎么帮你解决问题?你认为的“复制文本”就行,根本不是你想的那样,我既然发出来代码,能测试的我都测试过了,使用正常的
bat小白,请多指教!谢谢!

TOP

回复 14# 77七


    楼上所有的代码都试了,把我贴出的文本复制保存就可以,出错信息很难描述

谢谢你,麻烦了

TOP

返回列表