VBS（VBScript）によるファイルのファイルタイプを取得する方法を紹介
ファイルのファイルタイプを取得する方法
サンプルソース
（入力）
Dim fs
Dim fn
Set fs = WScript.CreateObject("Scripting.FileSystemObject")
Set fn = fs.GetFile("e:\test.txt")
WScript.Echo "ファイルタイプ：" & fn.Type
（出力）
ファイルタイプ：テキスト ドキュメント