我用的是rmdir语句.郁闷中.........

解决方案 »

  1.   

    '用RmDir应该是可以的,再用下面的方法试试Private Sub Command1_Click()
        On Error Resume Next
        Dim fs
        Set fs = CreateObject("Scripting.FileSystemObject")
        fs.deletefolder "c:\Test"
        Set fs = Nothing
    End Sub
      

  2.   

    RmDir 语句
          删除一个存在的目录或文件夹。语法RmDir path必要的 path 参数是一个字符串表达式,用来指定要删除的目录或文件夹。path 可以包含驱动器。如果没有指定驱动器,则 RmDir 会在当前驱动器上删除目录或文件夹。=====================================================
    说明如果想要使用 RmDir 来删除一个含有文件的目录或文件夹,则会发生错误。在试图删除目录或文件夹之前,先使用 Kill 语句来删除所有文件。==========================================Delete 方法
             描述删除一个指定的文件或文件夹。语法object.Delete forceDelete 方法语法有如下几部分:部分 描述 
    object 必需的。始终是一个 File 或 Folder 对象的名字。 
    force 可选的。Boolean 值,如果要删除具有只读属性设置的文件或文件夹,其值为True。当其值为 False 时(缺省),不能删除具有只读属性设置的文件或文件夹。 
    ===================================================
    说明如果指定的文件或文件夹不存在,则发生一个错误。对于一个 File 或 Folder,Delete 方法的结果和 执行 FileSystemObject.DeleteFile 或FileSystemObject.DeleteFolder 操作的结果是一样的。Delete 方法对于文件夹内是否有内容不做区别。不管指定的文件夹是否有内容,它都被删除。================================================================================