Конфигурационные файлы клиентского приложения AppName хранятся в CommonAppData.
C:\Documents and Settings\All Users\Application Data\AppNameC:\ProgramData\AppNameКак мне получить правильное имя папки с помощью VBScript?





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 содержит страницу со списком других Константы специальных папок оболочки.
Эта страница тоже хороша: Перечисление специальных папок, часть Руководства по сценариям Microsoft Windows 2000. (Ссылка сейчас не работает, но в Интернет-архиве еще есть копия.)