[bo]以下是引用 [un]hxfly[/un] 在 2008-4-27 22:41 的发言：[/bo]

建立文件夹
If Dir("c:\test", vbDirectory) = "" Then
                            MkDir "c:\test"
                      End If
删除文件夹
If Dir("c:\test", vbDirectory) = "" Then
                        ...