VB 删除带子文件夹和文件的文件夹

2024-05-09 04:15:35

代码如下：

Sub RecurseTree(CurrPath As String) 'currpath问文件夹路径
    Dim sFileName As String, newPath As String, sPath As String
    Static oldPath As String
    sPath = CurrPath & "\"
    sFileName = Dir(sPath, 31) '31的含义∶31=vbNormal+vbReadOnly+vbHidden+vbSystem+vbVolume+vbDirectory
    Do While sFileName <> ""
        If sFileName <> "." And sFileName <> ".." Then
            If GetAttr(sPath & sFileName) And vbDirectory Then '如果是目录和文件夹
                newPath = sPath & sFileName
                RecurseTree newPath
                sFileName = Dir(sPath, 31)
            Else
                SetAttr sPath & sFileName, vbNormal
                Kill (sPath & sFileName)
                'Label1.Caption = sPath & sFileName '显示删除过程
                sFileName = Dir
            End If
        Else
            sFileName = Dir
        End If
        DoEvents
    Loop
    SetAttr CurrPath, vbNormal
    RmDir CurrPath
    'Label1.Caption = CurrPath
End Sub

摘自：网络整理

相关文章参考：

※VB FTP操作类(可上传、下载、创建文件夹等等)

※VB 删除带子文件夹和文件的文件夹※

※用treeview遍历文件夹（vb）※

※VB 将文件夹复制到指定目录※

※VB 详细枚举指定目录、文件夹文件列表※

※VB删除带子文件夹和文件的文件夹

※VB 打开文件夹,并选中指定的文件

※得到指定文件夹下的文件列表

※VB选择文件夹并取文件夹名※

更多精彩>>>

VB 删除带子文件夹和文件的文件夹相关推荐

VB删除带子文件夹和文件的文件夹
删除带子文件夹和文件的文件夹程序代码: Sub RecurseTree(CurrPath As String)'currpath问文件夹路径 Dim sFileName As String, ...
删除文件夹下所有的文件_VB删除文件和文件夹的方法
在VB编程中,我们如何删除一个指定的文件,或者文件夹呢? 本文,介绍两种方法,详细的介绍如何实现删除文件和文件夹,并对两种方法的区别做一个说明. 一.删除文件的方法方法1: 使用kill方法删除文件 ...
vb.net 解压缩（文件/文件夹解压缩，zip文件浏览，单文件解压，分卷压缩）
vb.net 解压缩(文件/文件夹解压缩,zip文件浏览,单文件解压,分卷压缩) DLL:Ionic.Zip.dll 说明: 1.解压/压缩显示加密进度及总进度. 2.zip文件打开,浏览内部文件. ...
windows10 删除文件的权限才能对此文件夹进行更改解决办法
windows 10 删除文件的权限才能对此文件夹进行更改解决办法如果删不掉,重启计算机,再次右键.删除.
删除某个文件夹下的所有文件
//删除本地文件夹下保存的文件 NSFileManager *fileManager = [NSFileManager defaultManager]; NSS ...
c盘python27文件夹可以删除嘛_电脑C盘那些文件夹可以删除
展开全部 Windows操作系统在C盘空间不足的情况下,我们可以通过那些具体手段来增加C盘空间.1.打开62616964757a686964616fe59b9ee7ad9431333335313064 ...
python批量删除文件1001python批量删除文件_Python实现递归遍历文件夹并删除文件...
思路: 遍历文件夹下面的文件夹如果文件夹名称等于".svn",则修改文件夹的属性(因为".svn"的文件都是只读的,你不能直接删除) 删除此文件夹如果文件夹 ...
python操作文件夹-Python文件操作大全，随机删除文件夹内的任意文件
在读文件的时候往往需要遍历文件夹,python的os.path包含了很多文件.文件夹操作的方法: os.path.abspath(path) #返回绝对路径 os.path.basename(path ...
Linux 中如何复制和删除文件夹中的所有文件？
Linux 中如何复制和删除文件夹中的所有文件? 1.复制文件目标文件目录必须存在 (1) 直接复制 cp /hone/user/temp/test.c /home/user/ (2) 复制并重命名 ...

最新文章

热门文章