VB6 - Enumerated SpecialFolders - for Intellisense

Not sure if this has been done already...

A .BAS module to help ease the use of the SpecialFolders API. Hand-typed, please check for any errors or typos. If incomplete, please post additions.

Dave

It appears to have a problem if your "MyDocuments" Folder is moved... Seems other have had similar problems with the API.

Why do both:

vb Code:

Private Sub Form_Load()
Debug.Print (GetSpecialfolder(SpecialFolders.appdata))
Debug.Print (GetSpecialfolder(SpecialFolders.Local_AppData))
End Sub

print the "Roaming" folder when I need the "Local" folder location?

Because there's a mistake in the SpecialFolders Enum:

Local_AppData = CSIDL_APPDATA


Should be:

Local_AppData = CSIDL_LOCAL_APPDATA

Quote:

---

Originally Posted by jpbro

Because there's a mistake in the SpecialFolders Enum:

Local_AppData = CSIDL_APPDATA


Should be:

Local_AppData = CSIDL_LOCAL_APPDATA

---

Ah ok thanks! + REP.