.版本 2

.支持库 spec

.子程序 _启动子程序, 整数型, , 本子程序在程序启动后最先执行

调试输出 (取特殊文件夹 (#CSIDL_DESKTOPDIRECTORY))

返回 (0)  ' 可以根据您的需要返回任意数值

.子程序 取特殊文件夹, 文本型, 公开

.参数 参数_CSIDL, 整数型, , CSIDL_ 开头的常量

.局部变量 局部_pidl, 整数型

.局部变量 局部_文本, 文本型

SHGetSpecialFolderLocation (0, 参数_CSIDL, 局部_pidl)

局部_文本 ＝ 取空白文本 (32768)

SHGetPathFromIDList (局部_pidl, 局部_文本)

返回 (局部_文本)

' CSIDL详解: http://msdn.microsoft.com/en-us/library/windows/desktop/bb762494(v=vs.85).aspx