1樓:湖洋狼
.版本 2
.支援庫 regex
.支援庫 internet
.支援庫 iext
.子程式 _按鈕1_被單擊
.區域性變數 網頁文字, 文字型
.區域性變數 表示式, 正規表示式
.區域性變數 搜尋結果, 搜尋結果, , "0"
.區域性變數 計次變數, 整數型
.區域性變數 文字, 文字型
網頁文字 = 到文字 (http讀檔案 (編輯框1.內容))
網頁文字 = 子文字替換 (網頁文字, #引號, 「'」, 0, , 真)
網頁文字 = 到小寫 (網頁文字)
透明標籤1.標題 = 取中間文 (網頁文字, 「」, 「」)
表示式.建立 (「meta (.*?)>」, 假)
搜尋結果 = 表示式.搜尋全部 (網頁文字)
.計次迴圈首 (取陣列成員數 (搜尋結果), 計次變數)
文字 = 搜尋結果 [計次變數].取子匹配文字 (網頁文字, 1, )
.判斷開始 (尋找文字 (文字, 「name='keywords'」, 1, 假) > 0)
透明標籤2.標題 = 取中間文 (文字, 「content='」, 「'」)
.判斷 (尋找文字 (文字, 「name='description'」, 1, 假) > 0)
透明標籤3.標題 = 取中間文 (文字, 「content='」, 「'」)
.預設.判斷結束
.計次迴圈尾 ()
.子程式 取中間文, 文字型
.引數 全文, 文字型
.引數 左文, 文字型
.引數 右文, 文字型
.區域性變數 位置, 整數型
.區域性變數 總長度, 整數型
.區域性變數 文字, 文字型
總長度 = 取文字長度 (全文)
位置 = 尋找文字 (全文, 左文, , 假)
.如果真 (位置 < 0)
返回 (「」)
.如果真結束
位置 = 位置 + 取文字長度 (左文)
文字 = 取文字中間 (全文, 位置, 總長度)
總長度 = 取文字長度 (文字)
位置 = 尋找文字 (文字, 右文, , 假) - 1
.如果真 (位置 < 0)
返回 (「」)
.如果真結束
文字 = 取文字中間 (文字, 1, 位置)
返回 (文字)
2樓:伍慕雁
可以做到啊!用超文字框
易語言怎樣提取網頁元素,易語言怎樣提取網頁元素?
版本 2 子程式 取元素橫座標,整數型 引數 元素物件,物件 區域性變數 元素座標,整數型 區域性變數 元素父物件,物件 元素座標 元素物件.讀數值屬性 offsetleft 元素父物件 元素物件.讀物件型屬性 offsetparent 如果真 元素父物件.是否為空 假 元素座標 元素座標 取元素橫...
易語言中如何判斷數字是不是,易語言中 如何判斷第一個數字是不是
請在界bai面上放置控制元件 一個 duzhi 編輯框dao 和一個 按鈕 來測內試這段 版本 2 如果容 取文字左邊 編輯框1.內容,1 0 資訊框 第一個數字是 0 0,否則資訊框 第一個數字不是 0 0,判斷 取文字左邊 文字串,1 1 是否成立.易語言怎樣判斷編輯框裡是否為數字 是否全是數字...
易語言怎麼顯示倒計時,如何用易語言編輯倒計時和計時
建一個變數 djs 一個時鐘 時鐘週期為999 首先設djs 3600 再在時鐘事件下寫 djs djs 1 編輯框 內容 djs 版本 2.程式集 視窗程式集1 程式集變數 分,整數型 程式集變數 秒,整數型 程式集變數 時,整數型.子程式 啟動視窗 建立完畢時鐘1.時鐘週期 1000 分 59 ...