Single Post - Выделить файлы по созданному списку

Total Commander
Форум поддержки пользователей Total Commander
Сайты: Все о Total Commander | Totalcmd.net | Ghisler.com | RU.TCKB

Rules

Search

FAQ

Usergroups

Single Post

Author

Message

Posted: Tue May 28, 2013 20:23 Post subject:

Slamzor wrote:

Если грубо: маска_имя_дата.*

Если грубо, то вместо If InStr … EndIf для поиска подстроки _имя_ (в любом месте строки) можно записать

Code:

For Each S In Split(List, vbNewLine)
If InStr(1, FSO.GetBaseName(filename), "_" & S & "_", vbTextCompare) > 0 Then
Result = 1
End If
Next