[VelDmi]

Creat0R
Уфф, мне не дано такое понять...
Написал сам через попу, но работает вроде:

Код:

RunWait (@COMSPEC & ' /c fsum.exe -r -d".\CutDir" *.* > sums.md5', @ScriptDir, @SW_HIDE)
;через эту прогу создается список файлов
$filesums = FileOpen(@ScriptDir& '\sums.md5', 0)
If $filesums = -1 Then
     MsgBox(0, "Ошибка.", "Не могу открыть файл sums.md5")
     Exit
 EndIf
$filesums2 = FileOpen(@ScriptDir& '\sums2.md5', 0)
If $filesums2 = -1 Then
     MsgBox(0, "Ошибка.", "Не могу открыть файл sums2.md5")
     Exit
 EndIf

While 1
	$i = FileReadLine($filesums2)
	If @error = -1 Then ExitLoop
	$Count2 = $Count2 + 1
WEnd
FileClose($filesums2)

While 1
     $line = FileReadLine($filesums)
	 If @error = -1 Then ExitLoop
     If StringLeft ($line, 1) = ';' Then ContinueLoop
		 $filesums2 = FileOpen(@ScriptDir& '\sums2.md5', 0)
		 $Del = 1
		For $i = 1 To $Count2
			If $line = FileReadLine($filesums2) Then 
				$Del = 0
				ExitLoop
			EndIf
		Next
		If $Del = 1 Then FileDelete ($CutDir & StringTrimLeft( $line, 34 ))
		FileClose($filesums2)
WEnd
FileClose($filesums)

теперь попробую твой способ.