Description:

Returns the path of one of the Windows special folders.

  Syntax:

FileViewer1.GetSpecialFolder(ByVal NewFolder As SHFolders)

  Adjustments:

NewFolder

one of the SHFolder values

  Remarks:

Returns the path of the special Folder or "" if the folder was not found.

  Example:

   

If FileV1.SetToSpecialFolder(CSIDL_DESKTOP) = False Then
'   MsgBox ("can't navigate to special folder")
Else
  'get special folder path
  Label2.Caption = FileV1.GetSpecialFolder(CSIDL_DESKTOP)
End If