易語言遍歷文件夾

⑴ 易語言 怎麼尋找所有文件

首先要枚舉出硬碟分區根目錄，然後逐個根目錄進行尋找文件，最後如果找到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個 超級列表框+驅動器

以下為代碼圖：

參考資料來源：網路-易語言