Au3截取腾讯天气的脚本
时间:2021-06-17 09:17:45|栏目:|点击: 次
其实很简单的Replace就搞定了.
#include <IE.au3>
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>(.*?)</(?i)strong>",1)
for $i = 0 to UBound($array) - 1
$tqtemp = $array[$i]
Next
$tqtoday = StringReplace($tqtemp, " ", " ")
msgbox (32,"天气",$tqtoday)
_IEQuit ($oIE)
聪明的你知道怎么用了吧?嘘,低调,低调点.弄不好就被腾讯封了.
复制代码 代码如下:
#include <IE.au3>
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>(.*?)</(?i)strong>",1)
for $i = 0 to UBound($array) - 1
$tqtemp = $array[$i]
Next
$tqtoday = StringReplace($tqtemp, " ", " ")
msgbox (32,"天气",$tqtoday)
_IEQuit ($oIE)
聪明的你知道怎么用了吧?嘘,低调,低调点.弄不好就被腾讯封了.
上一篇:dede3.1分页文字采集过滤规则详说(图文教程)续三
栏 目:
下一篇:docker 容器上编译 go 程序提示找不到文件问题
本文标题:Au3截取腾讯天气的脚本
本文地址:http://www.codeinn.net/misctech/143359.html






