本帖最后由 zaqmlp 于 2019-4-20 14:05 编辑
- @echo off
- set info=互助互利,支付宝扫码头像,感谢赞助
- rem 有问题,可加QQ956535081及时沟通
- title %info%
- start mshta VBScript:Execute("msgbox(""%info%""):close")
- cd /d "%~dp0"
- md "结果" 2>nul
- powershell ^
- dir *.txt^|?{$_ -is [System.IO.FileInfo]}^|%%{^
- write-host $_.FullName;^
- $text=[IO.File]::ReadAllText($_.FullName, [Text.Encoding]::Default) -replace '\s+';^
- out-file -file ('结果\'+$_.Name) -input $text -enc Default;^
- }
- pause
复制代码
|