
请教高手,我电脑里面有下载了不少电影视频文件,能不能把每个视频批量放到同名(与视频名称)文件夹里面 35
我有几百部电影,可以话有什么软件来批量处理,如果自己每次新建个文件夹,再重命名,再把视频复制进去,会累死的...
我有几百部电影,可以话有什么软件来批量处理,如果自己每次新建个文件夹,再重命名,再把视频复制进去,会累死的
展开
展开全部
我给你写个autoit脚本吧
#include <File.au3>
$dir = FileSelectFolder("请选择电影文件所在文件夹", "")
If $dir = "" Then Exit
$file = _FileListToArray($dir, "*", 1)
ProgressOn("正在移动,请稍后...", "共需处理:" & $file[0] & "个文件","文件正在移动请耐性等待...")
For $i = 1 To $file[0]
$p = StringInStr($file[$i], ".", 0, -1)
$folder = StringLeft($file[$i], $p-1)
FileMove($dir & "\" & $file[$i], $dir & "\" & $folder & "\" & $file[$i], 9)
ProgressSet($i/$file[0]*100, $i & "/" & $file[0])
Next
ProgressSet(100, $i & "/" & $file[0], "完成")
ToolTip("谢谢使用!" & @CRLF & "write by veket_linux", @DesktopWidth/2, @DesktopHeight/2)
Sleep(3000)
#include <File.au3>
$dir = FileSelectFolder("请选择电影文件所在文件夹", "")
If $dir = "" Then Exit
$file = _FileListToArray($dir, "*", 1)
ProgressOn("正在移动,请稍后...", "共需处理:" & $file[0] & "个文件","文件正在移动请耐性等待...")
For $i = 1 To $file[0]
$p = StringInStr($file[$i], ".", 0, -1)
$folder = StringLeft($file[$i], $p-1)
FileMove($dir & "\" & $file[$i], $dir & "\" & $folder & "\" & $file[$i], 9)
ProgressSet($i/$file[0]*100, $i & "/" & $file[0])
Next
ProgressSet(100, $i & "/" & $file[0], "完成")
ToolTip("谢谢使用!" & @CRLF & "write by veket_linux", @DesktopWidth/2, @DesktopHeight/2)
Sleep(3000)
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询