博客园  :: 首页  :: 新随笔  :: 联系 :: 订阅 订阅  :: 管理

2011年4月27日

摘要: Option Explicit'引用Microsoft Scripting RunTimeDim m_objFSO As New FileSystemObject '定义文件系统对象Private Declare Function SHGetSpecialFolderLocation Lib "Shell32" (ByVal hwndOwner As Long, ByVal nFolder As Integer, ppidl As Long) As LongPrivate Declare Function SHGetPathFromIDList Lib &q 阅读全文

posted @ 2011-04-27 18:35 随风飘零0 阅读(292) 评论(0) 推荐(0) 编辑