[新手上路]批处理新手入门导读[视频教程]批处理基础视频教程[视频教程]VBS基础视频教程[批处理精品]批处理版照片整理器
[批处理精品]纯批处理备份&还原驱动[批处理精品]CMD命令50条不能说的秘密[在线下载]第三方命令行工具[在线帮助]VBScript / JScript 在线参考
返回列表 发帖
本帖最后由 ivor 于 2019-11-2 22:06 编辑
  1. <# :
  2. @Powershell "& {[ScriptBlock]::Create((gc '%~f0' -raw)).Invoke()}" & pause & goto :eof
  3. #>
  4. $cust = "自定义"
  5. dir -Recurse -File| %{
  6. $fileArray = ($_.FullName.TrimStart("$pwd")).Split('\')
  7. if($fileArray.Count -ge 2){
  8. $par=[System.IO.Path]::GetDirectoryName($_.FullName)
  9. if($par -eq $parent){
  10. $num += 1
  11. }
  12. else{
  13. $num = 1
  14. }
  15. $newName=($fileArray[0],$cust,$fileArray[-2],("{0:d4}" -f $num) -join '+')+$_.Extension
  16. ren $_.FullName -NewName ($par+"\\"+$newName) -verbose
  17. }
  18. $parent=[System.IO.Path]::GetDirectoryName($_.FullName)
  19. }
复制代码
#&cls&@powershell "Invoke-Expression ([Io.File]::ReadAllText('%~0',[Text.Encoding]::UTF8))" &pause&exit

TOP

返回列表