:1.616KB : :1 :2020-01-14 16:42:30
.如果真 (取文本右边 (目录, 1) ≠ “\”) ' 判断当前目录的格式是否正确。如“C:”,这格式是不正确的,改为"C:\"。
目录 = 目录 + “\”
.如果真结束
文件名 = 寻找文件 (目录 + “*” + 文件类型, ) ' “*.mp3”搜索MP3文件,“*.*”搜索所有文件。
.判断循环首 (文件名 ≠ “”) ' 判断文件名是否有效,有效向下执行搜索。
.如果真 (寻找文本 (到文本 (读入文件 (目录 + 文件名)), “”, , 假) ≠ -1)
.如果真 (文件名 = 寻找的文件)
执行 (, 目录 + 寻找的文件, , , )
是否找到 = 真
跳出循环 ()
.如果真结束
.如果真结束
处理事件 ()
文件名 = 寻找文件 (, ) ' 继续搜寻文件
.判断循环尾 ()
文件名 = 寻找文件 (目录 + “*.*”, #子目录) ' 搜寻目录文件,包括子目录。
.判断循环首 (文件名 ≠ “”) ' 判断目录名是否有效,有效向下执行搜索。
.如果真 (是否找到 = 真)
返回 ()
.如果真结束
.如果真 (取文本左边 (文件名, 1) ≠ “.”)
_寻找文件 (目录 + 文件名, 文件类型, 寻找的文件) ' 如果寻找到目录路径就搜继续搜索文件。
.如果真结束
文件名 = 寻找文件 (, #子目录)
.判断循环尾 ()
让寻找文件变得更简单顺手了,也更好理解了,发了源码我去看电视了,下次发布百度音乐下载源码以及怎么播放百度MP3网络音乐,我感觉是蛮简单的例程。
01-11搜索指定磁盘里指定后缀文件,带参数寻找文