![]() ![]() ![]() Private Declare Function SHGetPathFromIDList Lib "shell32" (Pidl As Long, ByVal FolderPath As String) As LongĬSIDL_APPDATA = &H1A 'Current User\Application DataĬSIDL_COMMON_DESKTOPDIRECTORY = &H19 'All Users\DesktopĬSIDL_COMMON_FAVORITES = &H1F 'All Users\FavoritesĬSIDL_COMMON_PROGRAMS = &H17 'All Users\Start Menu\ProgramsĬSIDL_COMMON_STARTMENU = &H16 'All Users\Start MenuĬSIDL_COMMON_STARTUP = &H18 'All Users\Start Menu\Programs\StartupĬSIDL_COOKIES = &H21 'Current User\CookiesĬSIDL_DESKTOP = &H0 'Current User\DesktopĬSIDL_FAVORITES = &H6 'Current User\FavoritesĬSIDL_FONTS = &H14 'Winodows\Fonts - folder on pcĬSIDL_HISTORY = &H22 'Current User\Local Settings\HistoryĬSIDL_INTERNET_CACHE = &H20 'Current User\Local Settings\Temporary Internet FilesĬSIDL_NETHOOD = &H13 'Current User\NetHoodĬSIDL_PERSONAL = &H5 'Current User\My DocumentsĬSIDL_PRINTHOOD = &H1B 'Current User\PrintHoodĬSIDL_PROGRAMS = &H2 'Current User\Start Menu\ProgramsĬSIDL_STARTMENU = &HB 'Current User\Start MenuĬSIDL_STARTUP = &H7 'Current User\Start Menu\Programs\StartUpĬSIDL_TEMPLATES = &H15 'Current User\Templates ![]() Code: Private Declare Function SHGetSpecialFolderLocation Lib "shell32" (ByVal hWnd As Long, ByVal nFolder As Long, Pidl As Long) As Long ![]()
0 Comments
Leave a Reply. |
AuthorWrite something about yourself. No need to be fancy, just an overview. ArchivesCategories |