怎么去取文件夹

紫色星辰

怎么获取一个磁盘里的全部父文件夹啊？
例如：e盘里的全部文件夹的路径出来

梦生

  

变量名	类 型	静态	数组	备 注
Folder	文本型		0
i	整数型

目录_枚举子目录 (“C:\”, Folder, 真)
计次循环首 (取数组成员数 (Folder), i)
输出调试文本 (Folder [i])
计次循环尾 ()

.版本 2<br /> <br /> .局部变量 Folder, 文本型, , "0"<br /> .局部变量 i, 整数型<br /> <br /> 目录_枚举子目录 (“C:\”, Folder, 真)<br /> .计次循环首 (取数组成员数 (Folder), i)<br />     输出调试文本 (Folder <i>)<br /> .计次循环尾 ()

1aa82e

.版本 2

.局部变量 寻找路径, 文本型
.局部变量 文件名, 文本型

寻找路径 ＝ “g:”
文件名 ＝ 寻找文件 (寻找路径 ＋ “\*.*”, 16)
.判断循环首 (文件名 ≠ “”)
    .判断开始 (取文本左边 (文件名, 1) ＝ “.”)
        列表框1.加入项目 (“”, )
    .默认
        列表框1.加入项目 (文件名, )
    .判断结束
    文件名 ＝ 寻找文件 (, 16)
.判断循环尾 ()

梦生

.版本 2

.局部变量 Folder, 文本型, , "0"
.局部变量 i, 整数型

目录_枚举子目录 (“E:\”, Folder, 真)
.计次循环首 (取数组成员数 (Folder), i)
    输出调试文本 (Folder [i])
.计次循环尾 ()