易語(yǔ)言使用超文本顯示新浪天氣預(yù)報(bào)的代碼
常量數(shù)據(jù)表
.版本 2 .常量 v1, "<文本長(zhǎng)度: 24>", , <p class="inx_w_city_c"> .常量 K, "<文本長(zhǎng)度: 8>", , url=http .常量 J, "<文本長(zhǎng)度: 47>", , <a href="http://share.sina.cn/callback?content= .常量 v2, "<文本長(zhǎng)度: 5>", , </p>
利用超文本顯示新浪天氣預(yù)報(bào)
此功能需要加載精易模塊5.6
.版本 2 .支持庫(kù) iext .程序集 窗口程序集1 .程序集變量 wangzhi, 文本型 .程序集變量 as, 文本型 .子程序 __啟動(dòng)窗口_創(chuàng)建完畢 獲取天氣 () .子程序 獲取天氣 .局部變量 B2, 文本型 .局部變量 C2, 文本型 .局部變量 sj, 文本型 .局部變量 ydm, 文本型 wangzhi = “http://weather1.sina.cn/?ttp=n13&pos=108&vt=4” ydm = 到文本 (網(wǎng)頁(yè)_訪問(wèn) (wangzhi)) .如果 (取文本長(zhǎng)度 (到文本 (取小時(shí) (取現(xiàn)行時(shí)間 ()))) = 1) B2 = “0” + 到文本 (取小時(shí) (取現(xiàn)行時(shí)間 ())) .否則 B2 = 到文本 (取小時(shí) (取現(xiàn)行時(shí)間 ())) .如果結(jié)束 .如果 (取文本長(zhǎng)度 (到文本 (取分鐘 (取現(xiàn)行時(shí)間 ()))) = 1) C2 = “:0” + 到文本 (取分鐘 (取現(xiàn)行時(shí)間 ())) .否則 C2 = “:” + 到文本 (取分鐘 (取現(xiàn)行時(shí)間 ())) .如果結(jié)束 sj = B2 + C2 透明標(biāo)簽_定位.標(biāo)題 = 到文本 (編碼_URL解碼 (文本_取出中間文本 (ydm, #v1, #v2), 真)) + “ ” + sj as = 到文本 (編碼_URL解碼 (ydm, 真)) as = 文本_替換 (as, , , , “+”, “ ”, “-”, “ ”) 透明標(biāo)簽_天氣情況.標(biāo)題 = 文本_取出中間文本 (as, #J, #K)
運(yùn)行結(jié)果:
總結(jié)
以上就是這篇文章的全部?jī)?nèi)容了,希望本文的內(nèi)容對(duì)大家的學(xué)習(xí)或者工作具有一定的參考學(xué)習(xí)價(jià)值,謝謝大家對(duì)腳本之家的支持。如果你想了解更多相關(guān)內(nèi)容請(qǐng)查看下面相關(guān)鏈接
相關(guān)文章
易語(yǔ)言超級(jí)列表框點(diǎn)擊表頭進(jìn)行排序的代碼
今天小編就為大家分享一篇關(guān)于易語(yǔ)言超級(jí)列表框點(diǎn)擊表頭進(jìn)行排序的代碼,小編覺(jué)得內(nèi)容挺不錯(cuò)的,現(xiàn)在分享給大家,具有很好的參考價(jià)值,需要的朋友一起跟隨小編來(lái)看看吧2018-11-11易語(yǔ)言中的命令及操作符知識(shí)點(diǎn)總結(jié)
在本篇文章里小編給各位整理的是關(guān)于易語(yǔ)言中的命令及操作符知識(shí)點(diǎn)總結(jié)內(nèi)容,有需要的朋友們可以參考下。2020-03-03易語(yǔ)言獲取任意按鍵對(duì)應(yīng)的鍵代碼
今天小編就為大家分享一篇關(guān)于易語(yǔ)言獲取任意按鍵對(duì)應(yīng)的鍵代碼,小編覺(jué)得內(nèi)容挺不錯(cuò)的,現(xiàn)在分享給大家,具有很好的參考價(jià)值,需要的朋友一起跟隨小編來(lái)看看吧2018-11-11