FileOpenダイアログ：複数ファイルの取得方法：VBS

質問

HTAにVBSを組み込んだ管理アプリを作成しています。
FileOpenダイアログで複数のファイルを一度に読み込みたいのですが、方法/オプションが分からないので、どなたか知識のある方、助けて頂けないでしょうか。(動作環境WinXPのみでOKです。)

今まで試したFileOpenダイアログ：
SAFRCFileDlg
openfiledlg
UserAccounts.CommonDialog

唯一UserAccountsは下記の方法で複数選択が出来ました。
Set objDialog = CreateObject("UserAccounts.CommonDialog")
objDialog.Filter = "VBScript Scripts|*.vbs|All Files|*.*"
objDialog.Flags = &H0200
objDialog.FilterIndex = 1
intResult = objDialog.ShowOpen

ただし、実行しているdllが半角スペースをセパレーターとして使用しているため、ディレクトリー名とファイル名が8.3形式になり非常に醜い。
また、8文字目以降の文字列が識別に必要な場合は分かりにくいためSAFRCFileDlgもしくはopenfiledlgのFileOpenダイアログの複数ファイル選択を許可するオプションを探しています。
どなたか設定/オプションを教えて下さい。
nde7

回答No.1

1050 円（@1050YEN）

>objDialog.Flags = &H0200
を
objDialog.Flags = &H80200
にしてみては？