Ⅰ 易語言如何自動搜索文件並且自動替換,
.版本 2
.支持庫 eAPI
.程序集 窗口程序集1
.子程序 全盤搜索, 文本型, , 在指定目錄下搜索文件,返回第一個符合條件的文件路徑
.參數 目錄, 文本型, , 欲尋找的目錄
.參數 文件名, 文本型, , 欲尋找文件名
.參數 顯示, 標簽, , 用來顯示搜索路徑的標簽
.局部變數 全屬性, 文本型
.局部變數 子目錄, 文本型
.局部變數 顯示用, 文本型
.局部變數 邏輯判斷, 邏輯型
邏輯判斷 = 假
目錄 = 目錄 + 「\」
處理事件 ()
全屬性 = 尋找文件 (目錄 + 「*.*」, 39)
.判斷循環首 (全屬性 ≠ 「」)
顯示.標題 = 目錄 + 全屬性
.如果真 (全屬性 = 文件名)
返回 (目錄 + 文件名)
.如果真結束
.如果真 (邏輯判斷)
返回 (「」)
.如果真結束
全屬性 = 尋找文件 (, )
.判斷循環尾 ()
子目錄 = 尋找文件 (目錄 + 「*.*」, 16)
.判斷循環首 (子目錄 ≠ 「」)
.如果真 (子目錄 ≠ 「.」 且 子目錄 ≠ 「..」)
顯示用 = 全盤搜索 (目錄 + 子目錄, 文件名, 顯示)
.如果真 (顯示用 ≠ 「」)
返回 (顯示用)
.如果真結束
.如果真結束
子目錄 = 尋找文件 (, #子目錄)
.判斷循環尾 ()
返回 (「」)
.子程序 _按鈕1_被單擊
.局部變數 i, 整數型
.局部變數 盤符, 文本型, , "0"
.局部變數 目錄位置, 文本型
.局部變數 目標文件, 文本型
.局部變數 文件名稱, 文本型
按鈕1.禁止 = 真
編輯框1.禁止 = 真
盤符 = 取驅動器列表 (#介面常量.硬碟驅動器) ' 取盤符數
.計次循環首 (取數組成員數 (盤符), i)
目標文件 = 全盤搜索 (盤符 [i], 編輯框1.內容, 標簽1) ' 文件所在位置及名稱顯示在標簽1中
目錄位置 = 取文本左邊 (目標文件, 倒找文本 (目標文件, 「\」, , 假)) ' 取文件完整路徑
文件名稱 = 取文本右邊 (目標文件, 取文本長度 (目標文件) - 倒找文本 (目標文件, 「\」, , 假)) ' 取文件名稱
.如果 (文件名稱 = 編輯框1.內容) ' 防止空文本返回
' 這里寫去除文件各類屬性,比如系統,隱藏,只讀
寫到文件 (目錄位置 + 「男人靠的住.jpg」, #圖片1) ' 寫出資源表圖片。如果需要替換文件,寫到文件(目錄位置+文件名稱,#圖片1)
.否則
.如果結束
.計次循環尾 ()
按鈕1.禁止 = 假
編輯框1.禁止 = 假
-------------------------------------------------------------------------
測試通過! 圖片1是圖片資源表中你的圖片
Ⅱ 易語言取某網頁上的視頻並且播放如何實現,求源碼
一個超文本瀏覽框
超文本瀏覽框.地址=」這里鍵入視頻網頁的鏈接」
Ⅲ 易語言如何搜索文件
.版本 2
.支持庫 EThread.程序集 窗口程序集1
.程序集變數 線程, 整數型.子程序 _按鈕1_被單擊編輯框2.內容 = 「」
啟動線程 (&創建線程, , 線程).子程序 __啟動窗口_創建完畢編輯框2.是否允許多行 = 真
編輯框2.滾動條 = 3.子程序 創建線程文件搜索 (「C:\」, 編輯框1.內容)
文件搜索 (「D:\」, 編輯框1.內容)
文件搜索 (「E:\」, 編輯框1.內容)
文件搜索 (「G:\」, 編輯框1.內容)
文件搜索 (「f:\」, 編輯框1.內容)
' 若還有其他盤還可以繼續添加
關閉線程句柄 (線程).子程序 文件搜索
.參數 目錄名, 文本型
.參數 文件名, 文本型, 可空
.局部變數 尋找結果, 文本型.如果真 (目錄名 = 「」)
信息框 (「目錄名不能為空」, 0, )
返回 ()
.如果真結束
.如果真 (文件名 = 「」)
文件名 = 「*.*」
.如果真結束
.如果真 (取文本右邊 (目錄名, 1) ≠ 「\」)
目錄名 = 目錄名 + 「\」
.如果真結束
尋找結果 = 尋找文件 (目錄名 + 文件名, )
.判斷循環首 (尋找結果 ≠ 「」)
編輯框2.加入文本 (目錄名 + 尋找結果 + 「 」 + #換行符)
尋找結果 = 尋找文件 (, )
.判斷循環尾 ()
尋找結果 = 尋找文件 (目錄名 + 「*.*」, #子目錄)
.判斷循環首 (尋找結果 ≠ 「」)
.如果真 (尋找結果 ≠ 「.」 且 尋找結果 ≠ 「..」)
文件搜索 (目錄名 + 尋找結果, 文件名)
.如果真結束
尋找結果 = 尋找文件 (, #子目錄)
.判斷循環尾 ()
打開文件(編輯框2.內容)
Ⅳ 易語言如何實現查找功能
可按以下步驟設計:
1、獲取編輯框中的文本內容並將其保存到一個文本型的變數中;
2、使用易語言核心庫提供的文本命令「查找文本」、「倒找文本」等即可實現你所要求的功能。(這些命令的詳細幫助請見「易語言知識庫」)
Ⅳ 易語言怎樣編寫在線電影播放器
您好,我看到您的問題很久沒有人來回答,但是問題過期無人回答會被扣分的並且你的懸賞分也會被沒收!所以我給你提幾條建議:
一,你可以選擇在正確的分類下去提問,這樣知道你問題答案的人才會多一些,回答的人也會多些。
二,您可以到與您問題相關專業網站論壇里去看看,那裡聚集了許多專業人才,一定可以為你解決問題的。
三,你可以向你的網上好友問友打聽,他們會更加真誠熱心為你尋找答案的,甚至可以到相關網站直接搜索.
四,網上很多專業論壇以及知識平台,上面也有很多資料,我遇到專業性的問題總是上論壇求解決辦法的。
五,將你的問題問的細一些,清楚一些!讓人更加容易看懂明白是什麼意思!
謝謝採納我的建議! !
Ⅵ 易語言怎麼全盤搜索指定文件
.版本 2
.支持庫 eAPI
.子程序 __啟動窗口_創建完畢
.局部變數 磁碟, 文本型, , "0"
.局部變數 I, 整數型
磁碟 = 取驅動器列表 (#介面常量.硬碟驅動器)
.計次循環首 (取數組成員數 (磁碟), I)
文件搜索 (磁碟 [I], 「1.txt」) ' 這里是關鍵
.計次循環尾 ()
信息框 (「刪除完畢」, 0, )
.子程序 文件搜索
.參數 目錄, 文本型
.參數 文件名, 文本型
.局部變數 局部文件名, 文本型
.局部變數 子目錄, 文本型
.局部變數 內容, 文本型
目錄 = 目錄 + 「\」
處理事件 ()
局部文件名 = 尋找文件 (目錄 + 「*.*」, 39)
.判斷循環首 (局部文件名 ≠ 「」)
.如果真 (局部文件名 = 文件名)
刪除文件 (目錄 + 文件名) ' 這里也是關鍵
返回 ()
.如果真結束
局部文件名 = 尋找文件 (, )
.判斷循環尾 ()
子目錄 = 尋找文件 (目錄 + 「*.*」, 16)
.判斷循環首 (子目錄 ≠ 「」)
.如果真 (子目錄 ≠ 「.」 且 子目錄 ≠ 「..」)
文件搜索 (目錄 + 子目錄, 文件名)
.如果真結束
子目錄 = 尋找文件 (, #子目錄)
.判斷循環尾 ()
Ⅶ 易語言:flash播放器加一個搜索功能,搜索指定文件夾內flash文件,並播放。怎麼弄
尋找文件
Ⅷ 資源搜索用什麼
1.比目魚BT資源搜索
比目魚BT資源搜索是一款非常好用的BT資源搜索軟體,軟體內置了BT搜索工具,支持全網資源搜索,可以按和網站關鍵詞來查找相關的資源內容!此外,軟體還內置了下載工具,直接右鍵就能將搜索到的BT資源下載下來,並且是不限速的哦。
Ⅸ 易語言怎樣寫自動搜索軟體和運行它
[AutoRun]
open=XXX.exe
icon=XXX.ico
只是最常見的,open後面是要運行的文件名,icon後面是盤圖標名,還可以加上
shellopen=打開(&O)
shellopenCommand=XXX.exe替換右鍵點擊盤時的「打開」
shellopenDefault=1
shellexplore=資源管理器(&X)
shellexploreCommand=XXX.exe替換右鍵點擊盤時的「資源管理器」
xxx是你的文件名,比如說替換為a.exe,a.ico,如果你的a.exe里包含圖標:
[AutoRun]
open=a.exe
icon=a.exe,1
shellopen=打開(&O)
shellopenCommand=a.exe
shellopenDefault=1
shellexplore=資源管理器(&X)
shellexploreCommand=a.exe