77七

回复 15# 881966

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

881966

回复 16# 77七


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

用14楼的代码

881966

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

这是5楼代码

881966

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

这是10楼代码

881966

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

这是3楼代码

881966

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

这是4楼代码

Batcher

回复 13# 881966


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

如果需要上传截图，可以找个图床，例如：
http://bbs.bathome.net/thread-60985-1-1.html

881966

回复 22# Batcher


    谢谢管理 ，

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


麻烦大家了:handshake

77七

@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
)
pause
复制代码

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

WHY

@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);
    }
}
复制代码

881966

回复 24# 77七


    再次感谢 ，让你费心了，

881966

回复 25# WHY


    谢谢坛友的帮助

terse

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