VBS（VBScript）によるフォルダが隠しフォルダかどうかを取得する方法を紹介
フォルダが隠しフォルダかどうかを取得する方法
サンプルソース
（入力）
Dim fs
Dim fn
Dim n
Set fs = WScript.CreateObject("Scripting.FileSystemObject")
Set fn = fs.GetFolder("e:\folder")
n = (fn.Attributes And 2) <> 0
WScript.Echo " 隠しフォルダ：" & n
（出力）
隠しフォルダ：False