vbscriptのCommonAppData

Question

顧客のアプリケーション＆quot; AppName＆quot;構成ファイルはCommonAppDataに保存されています。

• Windows XPでは C：\ Documents and Settings \ All Users \ Application Data \ AppName
• Windows Vistaでは C：\ ProgramData \ AppName
です

VBScriptで正しいフォルダー名を取得するにはどうすればよいですか

Answer 1

Const CommonAppData = &H23&  ' the second & denotes a long integer '

Set objShell  = CreateObject("Shell.Application")
Set objFolder = objShell.Namespace(CommonAppData)

Set objFolderItem = objFolder.Self

MsgBox objFolderItem.Name & ": " & objFolderItem.Path

MSDNは、他の Shell Specialをリストするページを保持しています。フォルダ定数。

このページも便利です。特別なフォルダーの列挙、Microsoft Windows 2000 Scripting Guideの一部。