SpecialFolders Property

Description

Returns a reference to an IWshCollection interface (a collection containing the entire set of Windows special folders, such as the Desktop folder, the Start Menu folder, and the Personal Documents folder).

PowerBASIC Syntax

Return Value

IDispatch. Reference to a IWshCollection interface.

Remarks

The following table lists special folders along with the version of Windows that supports them.

Example [PowerBASIC]

#INCLUDE "WSHOM.INC"

DIM pWsh AS IWshShell

DIM pSpecialFolders AS IWshCollection

DIM nCount AS LONG

DIM i AS LONG

DIM vItem AS VARIANT

DIM vValue AS VARIANT

pWsh = NEWCOM "WScript.Shell"

' Get a reference to the special folders collection

pSpecialFolders = pWsh.SpecialFolders

' Get the number of objects in the collection

nCount = pSpecialFolders.Count

' Enumerates the collection

FOR i = 0 TO nCount - 1

   vItem = i AS LONG

   vValue = pSpecialFolders.Item(vItem)

   IF OBJRESULT THEN EXIT FOR

   STDOUT VARIANT$(vValue)

NEXT