不知你要关闭的登录用户还是公用的图片文件夹，提供两个常数给你选择
程序代码：
#define CSIDL_MYPICTURES 0x0027 && 我的图片文件夹
#define CSIDL_COMMON_PICTURES 0x0036 && 公用图片文件夹
Declare Long SHGetSpecialFolderPath in shell32 Long, String @, Long, Long
cPath = Replicate(Chr(0), 260)
SHGetSpecialFolderPath(0, @ cPath, CSIDL_MYPICTURES, 0)
cPath = Rtrim(cPath, Chr(0))
oShell = NewObject('Shell.Application')
For each ow in oShell.Windows
If ('explorer.exe' $ Lower(ow.FullName)) ;
and (ow.Document.folder.self.path == m.cPath)
ow.Quit
Exit
EndIf
EndFor
