あと同じ拡張子選択なら

Script:JScript
WScript.Open('select:*.'+new ActiveXObject("Scripting.FileSystemObject").GetExtensionName(WScript.Env('Focused')));

こうするといいんじゃないかな