Каталог Application Data на VB

[broodling]

Как программно узнать каталог Application Data в WinXP для текущего залогиненного пользователя.

[broodling]

Собственно вот решение

в реестре читаем ключ:



HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Explorer\Shell Folders

"AppData"="D:\Documents and Settings\User_name\Application Data"



Можно еще через переменную %appdata%, но это несколько проблематично т.к. переменная консольная и как получить ее значение в прогу на VB я не знаю.



Может какая нибудь стандартная функция есть для этого, а то я тут велосипеды изобретаю

[broodling]

broodling

%userprofile%\Application Data