文章摘要
这篇文章描述了一种通过IE浏览器控制访问天气网站(如Soso天气预报)来获取实时天气信息的方法。主要步骤包括:删除旧天气文件、加载天气预报网页、使用IE对象获取HTML内容,并通过正则表达式提取天气信息。最终将提取的天气文本显示在消息框中。文章重点展示了如何利用编程手段实现自动化获取和显示天气信息,避免了手动查找文件的繁琐过程。
#include
Filedelete (“Tq.txt”)
$Url=”http://www.soso.com/tb.q”
$oIE=_IECreate ($url, 0, 0)
$sHTML=_IEBodyReadHTML ($oIE)
$array=StringRegExp($sHTML, “<(?i)strong class=fs_14>(.*?)
“,1)
for $i=0 to UBound($array) – 1
$tqtemp=$array[$i]
Next
$tqtoday=StringReplace($tqtemp, ” “, ” “)
msgbox (32,”天气”,$tqtoday)
_IEQuit ($oIE)
© 版权声明
文章版权归作者所有,未经允许请勿转载。