Как исправить этот код, чтобы выбирать только текстовые файлы?

Question

Я запускаю пакетную программу для выбора текстовых файлов из диалогового окна, но вместо этого она выбирает все типы файлов.

Пакетный файл, который я запускаю:

    set dialog="about:<input type=file id=FILE><script>FILE.click();new ActiveXObject
    set dialog=%dialog%('Scripting.FileSystemObject').GetStandardStream(1).WriteLine(FILE.value);
    set dialog=%dialog%close();resizeTo(0,0);</script>"

    for /f "tokens=* delims=" %%p in ('mshta.exe %dialog%') do set "file=%%p"
    echo selected  file is : "%file%"
    pause

Ожидаемый результат:

Всплывающий файловый браузер должен выбирать только текстовые файлы, *.txtа не все файлы.*.*