[SOLVED] Find text in a string

[rootx]

#include <Array.au3>
#include <File.au3>
#include <MsgBoxConstants.au3>

Local $path="C:\Users\rootx\Desktop\Nuova cartella",$mask = "*.jpg;*.png;*.ico",$Pos

$FileArr = _FileListToArrayRec($path,$mask,1,1,1,2)
For $x = 1 to UBound($FileArr)-1

    If $Pos = StringInStr($FileArr[$x],"-") Then
        ConsoleWrite("------"&$FileArr[$x]&@CRLF)
    Else
        ConsoleWrite($FileArr[$x]&@CRLF)
        FileDelete($FileArr[$x])
    EndIf
        ConsoleWrite($x&@CRLF)
Next
    ConsoleWrite($x-1&@CRLF)

I would write a loop that individuals and delete files that contain this feature....

File name-150x100.jpg, or other -SizexSize

But in this case how can I filter properly?

File name 150x100-150x100.jpg

File name -100-150x100.jpg

 

Edited July 14, 2016 by rootx

[Melba23]

rootx,

Time for you to enter the world of "regular expressions"!

Just look for the filenames that hold a "digits x digits" string:

Global $aList[] = ["File name-keep.jpg", "File name-delete-150x100.jpg", "File name-also keep.jpg", "File name-delete-150x100-150x100.jpg"]

For $i = 0 To UBound($aList) - 1
    If StringRegExp($aList[$i], "\d+x\d+") Then
        ConsoleWrite("To delete: " & $aList[$i] & @CRLF)
    Else
        ConsoleWrite("To keep:   " & $aList[$i] & @CRLF)
    EndIf
Next

Please ask if you have any questions.

M23

[rootx]

THX Melba23