[新手上路]批处理新手入门导读[视频教程]批处理基础视频教程[视频教程]VBS基础视频教程[批处理精品]批处理版照片整理器
[批处理精品]纯批处理备份&还原驱动[批处理精品]CMD命令50条不能说的秘密[在线下载]第三方命令行工具[在线帮助]VBScript / JScript 在线参考
返回列表 发帖
  1. #&cls&@powershell "Get-Content '%~0' | Out-String | Invoke-Expression" & pause&exit
  2. dir -Recurse *.html | %{
  3. $title = [Regex]::Match((gc $_),"(?<=<title>).*(?=</title>)")
  4. $img = [Regex]::Match((gc $_),"(?<=src="").*(?=\"")")
  5. $title = $title.Value
  6. $img = $img.Value.Substring(1)
  7. $ext = "."+$img.Split(".")[2]
  8. Rename-Item -Path $img -NewName $title$ext  -Verbose
  9. }
复制代码
#&cls&@powershell "Invoke-Expression ([Io.File]::ReadAllText('%~0',[Text.Encoding]::UTF8))" &pause&exit

TOP

本帖最后由 ivor 于 2020-11-15 13:58 编辑

脚本命名为1.bat,保存位置:html文件夹、jpg、1.bat
  1. │  1.bat
  2. ├─html
  3. │      1.html
  4. │      N.html
  5. │      此目录下有N个不规则以英文或数字命名的Html文件
  6. └─jpg
  7.     │  此文件夹下有N个不规则以英文或数字命名的子文件夹
  8.     │
  9.     ├─Dir1
  10.     │      test.jpg
  11.     │
  12.     └─DirN
  13.             sample.jpg
复制代码
#&cls&@powershell "Invoke-Expression ([Io.File]::ReadAllText('%~0',[Text.Encoding]::UTF8))" &pause&exit

TOP

返回列表