易語言獲取指定網(wǎng)頁信息？

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