易語言操作硬盤txt掃描刪除

本源碼主要內容就是對硬盤里的txt文檔文件進行掃描并刪除的操作，下面是所有代碼：

成都創(chuàng)新互聯公司-專業(yè)網站定制、快速模板網站建設、高性價比江門網站開發(fā)、企業(yè)建站全套包干低至880元,成熟完善的模板庫,直接使用。一站式江門網站制作公司更省心,省錢,快速模板網站建設找我們，業(yè)務覆蓋江門地區(qū)。費用合理售后完善，十余年實體公司更值得信賴。

子程序 遍歷目錄, , , 輸出指定目錄下的所有文件，包括子目錄
.參數 參目錄, 文本型, , 不帶最后的“\”
.局部變量 文件名, 文本型
.局部變量 目錄數組, 文本型, , "0"
.局部變量 i, 整數型
.局部變量 文件類型, 整數型


.如果真 (信息框 (“即將遍歷指定目錄并刪除所有TXT文件!是否繼續(xù)?”, 1, ) ≠ 0)
  返回 ()
.如果真結束


文件類型 ＝ 位或 (#存檔文件, #只讀文件, #系統(tǒng)文件, #隱藏文件, #子目錄)
文件名 ＝ 尋找文件 (選擇 (取文本右邊 (參目錄, 1) ≠ “\”, 參目錄 ＋ “\”, 參目錄) ＋ “*.*”, 文件類型)
.如果真 (文件名 ＝ “”)
  返回 () ' 設定終止條件
.如果真結束


.循環(huán)判斷首 ()
  .如果 (位與 (取文件屬性 (參目錄 ＋ “\” ＋ 文件名), #子目錄) ≠ 0)
    ' 注意這里不能直接遍歷，要先存入數組，
    ' 否則就是開啟了一個新的尋找文件的過程，
    ' 導致無法列正確的文件
    加入成員 (目錄數組, 文件名) ' 把目錄先存入數組中
  .否則
    .如果真 (到小寫 (取文本右邊 (文件名, 4)) ＝ “.txt”)
      刪除文件 (參目錄 ＋ “\” ＋ 文件名)
    .如果真結束
    ' 輸出調試文本 (參目錄 ＋ “\” ＋ 文件名) ' 文件名則輸出
  .如果結束
  ' 尋找下一個
  文件名 ＝ 尋找文件 (, 文件類型)
.循環(huán)判斷尾 (文件名 ≠ “”)


.計次循環(huán)首 (取數組成員數 (目錄數組), i)
  .如果真 (目錄數組 [i] ≠ “.” 且 目錄數組 [i] ≠ “..”)
    ' 不是當前目錄和父目錄才進行掃描
    遍歷目錄 (參目錄 ＋ “\” ＋ 目錄數組 [i]) ' 遞歸調用子程序本身
  .如果真結束


.計次循環(huán)尾 ()

感謝大家對創(chuàng)新互聯的支持，大家可以測試下代碼內容。

分享標題：易語言操作硬盤txt掃描刪除
本文URL：http://www.rwnh.cn/article46/ipjhhg.html

成都網站建設公司_創(chuàng)新互聯，為您提供Google、自適應網站、手機網站建設、網站內鏈、用戶體驗、建站公司

聲明：本網站發(fā)布的內容（圖片、視頻和文字）以用戶投稿、用戶轉載內容為主，如果涉及侵權請盡快告知，我們將會在第一時間刪除。文章觀點不代表本網站立場，如需處理請聯系客服。電話：028-86922220；郵箱：631063699@qq.com。內容未經允許不得轉載，或轉載時需注明來源：創(chuàng)新互聯

猜你還喜歡下面的內容

内射老阿姨1区2区3区4区_久久精品人人做人人爽电影蜜月_久久国产精品亚洲77777_99精品又大又爽又粗少妇毛片

易語言操作硬盤txt掃描刪除