易語言取網頁指定內容?
.版本 2 .支持庫 internet .支持庫 spec .程序集 窗口程序集1 .程序集變量 號碼, 文本型, , "7" .子程序 __啟動窗口_創建完畢 .子程序 _按鈕1_被單擊 .局部變量 網頁文本, 文本型 .局部變量 文本, 文本型, , "0" .局部變量 i, 整數型 .局部變量 n, 整數型 網頁文本 = 到文本 (HTTP讀文件 (“http://lottery.titan24.com/kaijiang/ssq.html”)) 文本 = 分割文本 (網頁文本, #換行符, ) .計次循環首 (取數組成員數 (文本), i) 處理事件 () 編輯框1.內容 = “” .如果真 (尋找文本 (文本 [i], “福彩雙色球第”, , 假) ≠ -1) 調試輸出 (文本 [i]) 調試輸出 (尋找文本 (文本 [i], “12064”, , 假)) 標簽1.標題 = “福彩雙色球第 ” + 取文本中間 (文本 [i], 76, 5) + “ 期開獎公告” .如果真結束 .如果 (尋找文本 (文本 [i], “開獎結果:”, , 假) ≠ -1) .計次循環首 (7, n) 號碼 [n] = 文本 [i + n] 調試輸出 (號碼 [n]) 調試輸出 (取文本中間 (號碼 [n], 20, 2)) 編輯框1.加入文本 (取文本中間 (號碼 [n], 20, 2) + “ ”) 編輯框1.加入文本 (取文本中間 (號碼 [7], 22, 2)) .計次循環尾 () 跳出循環 () .否則 編輯框1.加入文本 (“正查詢開獎結果!請稍等……”) .如果結束 .計次循環尾 () 一個窗口上,放3個組建,按鈕1,標簽1,編輯框1,加上上面的代碼。OK了