FileSearch не ищет ф-лы с кириллицей

[maximusu]

Добрый день!

Уперся с задачкой
Нужно найти файлы в которых содержится некий текст
на кириллице.

With Application.FileSearch
        .NewSearch
        .LookIn = "c:\"
        .SearchSubFolders = false
        .TextOrProperty = "Иван Пупкин"
        .MatchTextExactly = False
        .FileName = "*.txt"
        .Execute
    End With

Не ищет зараза. Вот дай ему
.TextOrProperty = "Ivan Pupkin" и все ОК

Как быть-то? Хелп.