For $m = 1 To $k
If StringRegExp($FileList[$m], "(.*jpg)|(.*JPG)") Then
While $flag
$check = _ArrayBinarySearch($FileList,$picname & $i &".jpg",$m)
If $check > $m Then
_ArrayDelete($avArray, $check)
$j -= 1
$i += 1
Else
$flag = False
FileMove(@ScriptDir & "\" & $FileList[$j], @ScriptDir & "\" & $picname & $i & ".jpg", 1)
_ArrayDelete($avArray, $m)
$j -= 1
$i += 1
EndIf
WEnd
EndIf
WEnd
If StringRegExp($FileList[$m], "(.*jpg)|(.*JPG)") Then
While $flag
$check = _ArrayBinarySearch($FileList,$picname & $i &".jpg",$m)
If $check > $m Then
_ArrayDelete($avArray, $check)
$j -= 1
$i += 1
Else
$flag = False
FileMove(@ScriptDir & "\" & $FileList[$j], @ScriptDir & "\" & $picname & $i & ".jpg", 1)
_ArrayDelete($avArray, $m)
$j -= 1
$i += 1
EndIf
WEnd
EndIf
WEnd
本文介绍了一个批处理脚本,用于查找并移动特定类型的图片文件,同时删除已处理的文件列表。
1万+

被折叠的 条评论
为什么被折叠?



