vbscript içinde CommonAppData

Question

Bir müşterinin uygulaması "AppName", CommonAppData'da depolanan yapılandırma dosyalarına sahiptir. Ben VBScript ile doğru klasöradı nasıl alabilirim C:\ProgramData\AppName

olduğunu Windows Vista altında C:\Documents and Settings\All Users\Application Data\AppName

olduğunu

• Windows XP Altında?

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, diğer Shell Special Folder Constants listeleyen bir sayfa tutar.

Bu sayfa çok güzel: Microsoft Windows 2000 Scripting Guide programının bir parçası olan Enumerating Special Folders.