' Enum SHCONTF
Const SHCONTF_FOLDERS             = &H0020 ' only want folders enumerated (SFGAO_FOLDER)
Const SHCONTF_NONFOLDERS          = &H0040 ' include non folders
Const SHCONTF_INCLUDEHIDDEN       = &H0080 ' show items normally hidden
Const SHCONTF_INIT_ON_FIRST_NEXT  = &H0100 ' allow EnumObject() to return before validating enum
Const SHCONTF_NETPRINTERSRCH      = &H0200 ' hint that client is looking for printers
Const SHCONTF_SHAREABLE           = &H0400 ' hint that client is looking sharable resources (remote shares)
Const SHCONTF_STORAGE             = &H0800 ' include all items with accessible storage and their ancestors

Другие константы доступны в Vista и/или выше: SHCONTF Enumeration (Windows)

set shell=createobject("shell.Application")
set f=shell.NameSpace("c:\")
set i=f.items
i.Filter 192,"*.txt"
for each c in i
    with new RegExp
        .pattern=".*\\my_file([0-9]{2})\.txt$"
        if .test(c.path) then
            msgbox c.path
            exit for
        end if
    end with
next