易语言按时间范围搜索指定类型文件的代码

118 阅读 0 评论 78 点赞

我是靠谱客的博主英勇月亮，最近开发中收集的这篇文章主要介绍易语言按时间范围搜索指定类型文件的代码，觉得挺不错的，现在分享给大家，希望可以做个参考。

概述

按时间搜索文件代码

.版本 2
.支持库 iext
.程序集 窗口程序集1
.子程序 _按钮_搜索_被单击
文件搜索 (“C:”, “*.*”)
.子程序 文件搜索
.参数 欲寻找的目录, 文本型, , 如：C:,表示C盘,记得C字后面两点一定要写
.参数 欲寻找的文件名, 文本型, , 如果寻找全部文件可以填入*.*或*.txt只找txt文件
.局部变量 局部_子目录, 文本型
.局部变量 局部_文件名, 文本型
.局部变量 局部_文件时间, 日期时间型
.局部变量 局部_项目索引, 整数型
.如果真 (取文本右边 (欲寻找的目录, 1) ≠ “”)
  欲寻找的目录 ＝ 欲寻找的目录 ＋ “”
.如果真结束
局部_文件名 ＝ 寻找文件 (欲寻找的目录 ＋ 欲寻找的文件名, )
.判断循环首 (局部_文件名 ≠ “”)
  局部_文件时间 ＝ 取文件时间 (欲寻找的目录 ＋ 局部_文件名)
  .如果真 (局部_文件时间 ＞ 日期框_起始.今天 且 局部_文件时间 ＜ 日期框_结束.今天)
    局部_项目索引 ＝ 超级列表框1.插入表项 (, , , , , )
    超级列表框1.置标题 (局部_项目索引, 0, 欲寻找的目录 ＋ 局部_文件名)
    超级列表框1.置标题 (局部_项目索引, 1, 到文本 (局部_文件时间))
  .如果真结束
  处理事件 ()
  局部_文件名 ＝ 寻找文件 (, )
.判断循环尾 ()
局部_子目录 ＝ 寻找文件 (欲寻找的目录 ＋ “*.*”, #子目录)
.判断循环首 (局部_子目录 ≠ “”)
  .如果真 (取文本左边 (局部_子目录, 1) ≠ “.”)
    处理事件 ()
    文件搜索 (欲寻找的目录 ＋ 局部_子目录 ＋ “”, 欲寻找的文件名)
  .如果真结束
  局部_子目录 ＝ 寻找文件 (, #子目录)
.判断循环尾 ()

运行结果：