blue_dvd 发表于 2016-3-22 20:26:19

当前目录中的文件后缀名.zip全部去掉,或者增加后缀.mkv?【已解决】

本帖最后由 blue_dvd 于 2016-3-23 11:14 编辑

最近下载一些电视剧,都是后缀名.zip,要自己一个个去掉,或者加上后缀名.mkv,请教高手可否有简单的文件操作方法,给个实例?万分感谢!

afan 发表于 2016-3-22 21:11:48

Local $sDir = @ScriptDir
Local $hSearch = FileFindFirstFile($sDir & '\*.zip')
If $hSearch = -1 Then Exit
Local $sFileName
While 1
        $sFileName = $sDir & '\' & FileFindNextFile($hSearch)
        If @error Then ExitLoop
        FileMove($sFileName, StringRegExpReplace($sFileName, '(?i)\.zip$', '.mkv'))
WEnd

zghwelcome 发表于 2016-3-23 09:49:24

配合批,只用一行代码RunWait(@ComSpec & ' /c for /r %a in (.) do ren "%a\*.zip" *.mkv',@ScriptDir,@SW_HIDE)

blue_dvd 发表于 2016-3-23 10:36:11

回复 2# afan
非常感谢A大!正在研究中!
页: [1]
查看完整版本: 当前目录中的文件后缀名.zip全部去掉,或者增加后缀.mkv?【已解决】