close every open folder on the desktop

[sbrady]

I just want to close all open folder windows I see on the desktop. I dont need to close any apps. Below is the code from the Help file. If I have 6 folders open, how do I close just those 6 open folders or windows. thanks for any help.

#include <MsgBoxConstants.au3>

Example()

Func Example()
    ; Retrieve a list of window handles.
    Local $aList = WinList()

    ; Loop through the array displaying only visable windows with a title.
    For $i = 1 To $aList[0][0]
        If $aList[$i][0] <> "" And BitAND(WinGetState($aList[$i][1]), 2) Then
            MsgBox($MB_SYSTEMMODAL, "", "Title: " & $aList[$i][0] & @CRLF & "Handle: " & $aList[$i][1])
        EndIf
    Next
EndFunc   ;==>Example

[FireFox]

Hi,

If you use the AutoIt3Info tool, you can get the class of the explorer windows folders; and because it's a window class, all of those window have the same class.

#include <MsgBoxConstants.au3>

Example()

Func Example()
    ; Retrieve a list of window handles.
    Local $aList = WinList("[CLASS:CabinetWClass]")

    ; Loop through the array displaying only visable windows with a title.
    For $i = 1 To $aList[0][0]
        If $aList[$i][0] <> "" And BitAND(WinGetState($aList[$i][1]), 2) Then
            MsgBox($MB_SYSTEMMODAL, "", "Title: " & $aList[$i][0] & @CRLF & "Handle: " & $aList[$i][1])
            WinClose($aList[$i][1])
        EndIf
    Next
EndFunc   ;==>Example

Br, FireFox.