易语言遍历文件夹

⑴ 易语言 怎么寻找所有文件

首先要枚举出硬盘分区根目录，然后逐个根目录进行寻找文件，最后如果找到123.dll，弹出一个信息框，为“123.dll”代码如下：
.版本2.支持库eapi
.子程序_按钮1_被单击.局部变量文本数组,文本型,,"0".局部变量i,整数型
文本数组＝取驱动器列表(1)
'这里枚举出硬盘分区根目录.计次循环首(取数组成员数(文本数组),i)
遍历目录(文本数组[i])
处理事件().计次循环尾()
.子程序遍历目录.参数参目录,文本型.局部变量文件名,文本型.局部变量目录数组,文本型,,"0".局部变量i,整数型.局部变量文件类型
文件类型＝位或(#存档文件,#只读文件,#系统文件,#隐藏文件)文件名＝寻找文件(参目录＋“\*.*”,文件类型).如果真(文件名＝“”)
返回().如果真结束
.循环判断首()
.如果(位与(取文件属性(参目录＋“\”＋文件名),#子目录)≠0)
加入成员(目录数组,文件名)
.否则
.如果真(文件名＝“123.dll”)
'判断文件是否存在
信息框(“123.dll”,0,)
'如果存在弹出一个信息框
返回()
'然后终止搜索
.如果真结束
.如果结束
文件名＝寻找文件(,文件类型).循环判断尾(文件名≠“”)
.计次循环首(取数组成员数(目录数组),i)
.如果真(目录数组[i]≠“.”且目录数组[i]≠“..”)
遍历目录(参目录＋“\”＋目录数组[i])
.如果真结束
.计次循环尾()
代码结束
控件只需要一个按钮，名称为按钮1

⑵ 易语言 遍历指定路径下所有文件夹 包括子文件夹

超级列表框1.全部删除 ()
目录 ＝ 驱动器框1.驱动器 ＋ “:\*”
link ＝ 寻找文件 (目录, #子目录)
.判断循环首 (link ≠ “”)
.如果真 (link ≠ “.” 且 link ≠ “..”)
超级列表框1.插入表项 (, link, 0, , , )
.如果真结束

link ＝ 寻找文件 (, #子目录)
.判断循环尾 ()
link1 ＝ 寻找文件 (目录, #子目录)
.判断循环首 (link1 ≠ “”)
.如果真 (link1 ≠ “.” 且 link1 ≠ “..”)
超级列表框1.插入表项 (, link1, 1, , , )
.如果真结束

link1 ＝ 寻找文件 (, )
.判断循环尾 ()

.子程序 _驱动器框1_驱动器被改变

目录文件夹 ()

⑶ 易语言遍历目录

版本 2 .子程序 _按钮1_被单击 .局部变量 文件名称, 文本型 文件名称 ＝ 寻找文件 (“d:\欲取目录\*.*”, ) .判断循环首 (文件名称 ≠ “”) 列表框1.加入项目 (文件名称, ) 文件名称 ＝ 寻找文件 (, ) .判断循环尾 ()

⑷ 易语言如何搜索文件

.版本 2
.支持库 EThread.程序集 窗口程序集1
.程序集变量 线程, 整数型.子程序 _按钮1_被单击编辑框2.内容 ＝ “”
启动线程 (&创建线程, , 线程).子程序 __启动窗口_创建完毕编辑框2.是否允许多行 ＝ 真
编辑框2.滚动条 ＝ 3.子程序 创建线程文件搜索 (“C:\”, 编辑框1.内容)
文件搜索 (“D:\”, 编辑框1.内容)
文件搜索 (“E:\”, 编辑框1.内容)
文件搜索 (“G:\”, 编辑框1.内容)
文件搜索 (“f:\”, 编辑框1.内容)
' 若还有其他盘还可以继续添加
关闭线程句柄 (线程).子程序 文件搜索
.参数 目录名, 文本型
.参数 文件名, 文本型, 可空
.局部变量 寻找结果, 文本型.如果真 (目录名 ＝ “”)
信息框 (“目录名不能为空”, 0, )
返回 ()
.如果真结束
.如果真 (文件名 ＝ “”)
文件名 ＝ “*.*”
.如果真结束
.如果真 (取文本右边 (目录名, 1) ≠ “\”)
目录名 ＝ 目录名 ＋ “\”
.如果真结束
寻找结果 ＝ 寻找文件 (目录名 ＋ 文件名, )
.判断循环首 (寻找结果 ≠ “”)
编辑框2.加入文本 (目录名 ＋ 寻找结果 ＋ “ ” ＋ #换行符)
寻找结果 ＝ 寻找文件 (, )
.判断循环尾 ()
寻找结果 ＝ 寻找文件 (目录名 ＋ “*.*”, #子目录)
.判断循环首 (寻找结果 ≠ “”)
.如果真 (寻找结果 ≠ “.” 且 寻找结果 ≠ “..”)
文件搜索 (目录名 ＋ 寻找结果, 文件名)
.如果真结束
寻找结果 ＝ 寻找文件 (, #子目录)
.判断循环尾 ()
打开文件（编辑框2.内容）

⑸ 易语言如何实现定时自动按顺序选择文件

.版本 2
.支持库 EThread
.支持库 spec

.程序集 窗口程序集_启动窗口

.子程序 _按钮1_被单击

启动线程 (&子程序1, , )

.子程序 子程序1

遍历文件 (“C:\Users\Administrator\Desktop\新建文件夹\”)

.子程序 遍历文件, 文本型
.参数 遍历目录, 文本型
.局部变量 临时_文件, 文本型
.局部变量 临时_创建时间, 文本型
.局部变量 数组1, 文本型, , "0"
.局部变量 数组2, 整数型, , "0"
.局部变量 数组3, 整数型, , "0"
.局部变量 i, 整数型
.局部变量 s, 整数型
.局部变量 文本, 文本型

临时_文件 ＝ 寻找文件 (遍历目录 ＋ “\*.*”, )
.判断循环首 (临时_文件 ≠ “”)
临时_文件 ＝ 寻找文件 (, )
.如果真 (临时_文件 ≠ “”)
文件_取时间 (遍历目录 ＋ 临时_文件, 临时_创建时间)
' 调试输出 (临时_文件, 到长整数 (时间_取现行时间戳 (真)) － 时间_北京转格林威治 (到时间 (临时_创建时间)))
加入成员 (数组1, 临时_文件)
加入成员 (数组2, 到长整数 (时间_取现行时间戳 (真)) － 时间_北京转格林威治 (到时间 (临时_创建时间)))
加入成员 (数组3, 到长整数 (时间_取现行时间戳 (真)) － 时间_北京转格林威治 (到时间 (临时_创建时间)))
.如果真结束

.判断循环尾 ()
数组排序 (数组3, 真)

.计次循环首 (取数组成员数 (数组3), i)
.计次循环首 (取数组成员数 (数组2), s)
.如果真 (数组3 [i] ＝ 数组2 [s])
文件_取时间 (遍历目录 ＋ 数组1 [s], 临时_创建时间)
调试输出 (数组1 [s], 临时_创建时间)
文本 ＝ 文本 ＋ 数组1 [s] ＋ #换行符
数组2 [s] ＝ 999999999999

.如果真结束

.计次循环尾 ()
.计次循环尾 ()
返回 (文本)

⑹ 易语言遍历某个文件下的所有TXT文件，然后把遍历出来的这些文件都删除掉

.版本 2
.支持库 shell

.子程序 __启动窗口_创建完毕
.局部变量 文件名, 文本型
.局部变量 文件, 文本型, , "0"
.局部变量 目录, 文本型
.局部变量 计次, 整数型

编辑框1.是否允许多行 ＝ 真
编辑框1.滚动条 ＝ 2
目录 ＝ 浏览文件夹 (“请选择目录！”, )
目录 ＝ 目录 ＋ “\”
文件名 ＝ 寻找文件 (“*.txt”, )
.判断循环首 (文件名 ≠ “”)
编辑框1.加入文本 (文件名, #换行符)
加入成员 (文件, 文件名)
文件名 ＝ 寻找文件 (, )
.判断循环尾 ()
.如果真 (信息框 (“是否删除这些文件？”, #是否钮, ) ＝ #是钮)
.计次循环首 (取数组成员数 (文件), 计次)
删除文件 (目录 ＋ 文件 [计次])
.计次循环尾 ()
.如果真结束
结束 ()

⑺ 各位大神 请问易语言如何批量查找指定文件夹里面的.txt文件内容 在.txt找到关键字添加到 级列表中啊！

⑻ 易语言如何获取文件夹内的所有文件

显示指定目录内所有的文件和文件夹的代码如下：

.版本 2

.支持库 iext

.子程序 目录文件夹
.局部变量 link, 文本型
.局部变量 link1, 文本型
.局部变量 目录, 文本型

超级列表框1.全部删除 ()
目录 ＝ 驱动器框1.驱动器 ＋ “:*”
link ＝ 寻找文件 (目录, #子目录)
.判断循环首 (link ≠ “”)

.如果真 (link ≠ “.” 且 link ≠ “..”)
超级列表框1.插入表项 (, link, 0, , , )
.如果真结束

link ＝ 寻找文件 (, #子目录)
.判断循环尾 ()
link1 ＝ 寻找文件 (目录, #子目录)
.判断循环首 (link1 ≠ “”)

.如果真 (link1 ≠ “.” 且 link1 ≠ “..”)
超级列表框1.插入表项 (, link1, 1, , , )
.如果真结束

link1 ＝ 寻找文件 (, )
.判断循环尾 ()

.子程序 _驱动器框1_驱动器被改变

目录文件夹 ()

组件2个 超级列表框+驱动器

以下为代码图：

参考资料来源：网络-易语言