易语言如何列出某文件夹下所有文件，并列出路径。

19833757 · 发表于 2012-3-7 11:11:20

如：
要列出e:\kugou下面所有文件。并加入列表项。并设置所有文件选中项。（就是全选的意思。ctrl+a）
列出效果为:
e:\kuguo\1.mp3
e:\kuguo\2.mp3
e:\kugou\流行音乐\1.mp3
e:\kugou\最新歌曲\周杰伦\1.mp3
e:\kugou\轻音乐\周杰伦\周杰伦弟弟\1.mp3
e:\kugou\轻音乐\周杰伦\周杰伦弟弟\周杰伦妈妈\1.mp3

shi6718298 · 发表于 2012-3-7 11:45:48

[e].版本 2

.程序集窗口程序集1

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

搜寻 (“D:\”)

.子程序搜寻, , , 如提供搜索目录路径，将会搜索此目录所有在内的文件。
.参数目录, 文本型, , 目录，如“C:\”盘。
.局部变量文件名, 文本型

处理事件 ()  ' 给出机会以接收停止按钮事件，搜索时会占用程序的资源，使得延时处理其它事件，所要用：“处理事件（）”。
.如果真 (取文本右边 (目录, 1) ≠ “\”)  ' 判断当前目录的格式是否正确。如“C:”,这格式是不正确的,改为"C:\"。
目录＝目录＋ “\”
.如果真结束
文件名＝寻找文件 (目录＋ “*.mp3”, )  ' “*.mp3”搜索MP3文件，“*.*”搜索所有文件。
.判断循环首 (文件名 ≠ “”)  ' 判断文件名是否有效，有效向下执行搜索。
输出调试文本 (目录＋文件名)  ' 当前搜索到的文件路径
文件名＝寻找文件 (, )  ' 继续搜寻文件
.判断循环尾 ()
文件名＝寻找文件 (目录＋ “*.*”, #子目录)  ' 搜寻目录文件，包括子目录。
.判断循环首 (文件名 ≠ “”)  ' 判断目录名是否有效，有效向下执行搜索。
.如果真 (取文本左边 (文件名, 1) ≠ “.”)
      搜寻 (目录＋文件名)  ' 如果寻找到目录路径就搜继续搜索文件。
.如果真结束
文件名＝寻找文件 (, #子目录)
.判断循环尾 ()
[/e]

shi6718298 · 发表于 2012-3-7 11:46:25

文件搜索.zip (1.41 KB, 下载次数: 503)

追忆流年 · 发表于 2012-3-7 12:00:12

有多种方式，1用DOS命令，2就用驱动器。Q451205927

蟋蟀 · 发表于 2012-3-7 12:02:42

未命名.rar (89.81 KB, 下载次数: 444)

19833757 · 发表于 2012-3-7 14:28:37

警告：支持库“xwxyh无限扩展库”未提供静态库所需的命令实现函数的函数名称
警告：支持库“xwxyh无限扩展库”未提供静态库所需的“处理系统通知的函数”的函数名称
警告：支持库“xwxyh无限扩展库”未提供静态库所需的命令实现函数的函数名称：选择文件夹
找不到静态库“D:\PROGRA~1\e\static_lib\xwx_static.lib”或“D:\PROGRA~1\e\static_lib\xwx.lib”！
LINK : fatal error LNK1181: cannot open input file "D:\PROGRA~1\e\static_lib\xwx_static.lib"
静态连接失败

亦惜风流 · 发表于 2012-4-6 20:31:01

xwxyh无限扩展库”未提供静态库所需的命令实现函数的函数名称我也碰见这广告弯头了

淡入你人生 · 发表于 2012-4-24 20:15:13

顶一下！！！！！！！！！！！{:3_227:}

abchzw · 发表于 2019-1-13 21:36:39

shi6718298 发表于 2012-3-7 11:45
[e].版本 2

.程序集窗口程序集1

既有jpg，又有png要怎么写？

sasir · 发表于 2019-1-25 18:18:51

shi6718298 发表于 2012-3-7 11:45
[e].版本 2

.程序集窗口程序集1

感谢分享，学习了

		自动登录	找回密码
密码			注册

[易语言] 易语言如何列出某文件夹下所有文件，并列出路径。