zaqmlp

@echo off
mode con lines=2000
set info=互助互利,代码可用,支付宝扫码头像,感谢赞助
rem 有问题,加QQ956535081及时沟通
title %info%
start mshta VBScript:Execute("msgbox(""%info%""):close")
cd /d "%~dp0"
powershell ^
    dir . *.txt^|?{$_ -is [System.IO.FileInfo]}^|%%{^
        $text=@(gc $_.FullName);^
        $fname=$text[0].trim() -replace '[/:\""\t*?^|^<^>\\]','';^
        $newname=$fname+$_.Extension;^
        if((-not (test-path -liter ($newname))) -and ($fname -ne '')){^
            write-host ($_.Name+' --^> '+$newname);^
            move -liter $_.Name $newname -force;^
        };^
    }
pause
复制代码

zaqmlp

回复 3# cpc19960
存为bat文件，跟你的txt放一起运行

zaqmlp

回复 5# cpc19960

丢失的字符的文本打包上传发出来