|
|
发表于 2019-4-2 14:44:45
|
显示全部楼层
本帖最后由 zaqmlp 于 2019-4-2 19:15 编辑
- @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
复制代码 |
|