CommonAppData in vbscript

Question

Eine Anwendung des Kunden „AppName“ hat seine Konfigurationsdateien in CommonAppData gespeichert.

• Unter Windows XP, die C:\Documents and Settings\All Users\Application Data\AppName ist
• Unter Windows Vista, die C:\ProgramData\AppName ist

Wie erhalte ich die richtigen Ordner mit 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

Die MSDN hält eine Seite, die andere Shell Sonderlisten Ordner Konstanten .

Diese Seite ist auch schön: Aufzählen Spezielle Ordner , einen Teil des Microsoft Windows 2000 Scripting-Handbuch.