CommonAppData in vbscript

Question

Applicazione del cliente "AppName" ha i suoi file di configurazione memorizzati in CommonAppData.

• In Windows XP, ovvero C: \ Documents and Settings \ All Users \ Dati applicazioni \ NomeApp
• In Windows Vista, ovvero C:\ProgramData\AppName

Come posso ottenere il foldername corretto con 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 contiene una pagina in cui sono elencati gli altri Speciale Shell Costanti di cartelle .

Anche questa pagina è carina: Elenco delle cartelle speciali , parte della Guida agli script di Microsoft Windows 2000.