论坛 › 已解决问题区 › [已解决]获取网页源码的问题?

newuser 发表于 2011-6-3 10:41:36

[已解决]获取网页源码的问题?

本帖最后由 newuser 于 2011-6-3 11:12 编辑

#include <INet.au3>
$s_URL='http://www.soso.com/tb.q'
$soure = _INetGetSource($s_URL, 0)
Msgbox(0, 0, BinaryToString($soure, 4))
用以上代码获取不到如下的效果,汉字部分都没有,因为我想把今天、明天、后天的温度、风级和天气状况截取到INI或TXT文件中提供给不能访问因特网的用户:
<today>
<temperature><!]></temperature>
<weather><!]></weather>
<wind><!]></wind>
</today>
<tomorrow>
<temperature><!]></temperature>
<weather><!]></weather>
<wind><!]></wind>
</tomorrow>
<thirdDate>
<temperature><!]></temperature>
<weather><!]></weather>
<wind><!]></wind>
</thirdDate>

easefull 发表于 2011-6-3 11:03:14

多注意点基本函数,别只顾着集成的函数.
;使用InetGet
InetGet("http://www.soso.com/tb.q", @TempDir & "\1.xml", 1)
MsgBox(0, "Result", FileRead(@TempDir & "\1.xml"))
Exit

;使用_IEDocReadHTML
#include <IE.au3>
Local $oIE = _IECreate("http://www.soso.com/tb.q")
MsgBox(0, "Result", _IEDocReadHTML($oIE))
Exit

;直接使用HTML DOM对象
#include <IE.au3>
Local $oIE = _IECreate("http://www.soso.com/tb.q")
MsgBox(0, "Result", $oIE.document.getElementsByTagName("xml").item(0).outerHTML)
Exit

newuser 发表于 2011-6-3 11:09:40

回复 2# easefull
呵呵,谢谢!

klpwap 发表于 2011-8-11 17:28:38

好东西，学习了

查看完整版本: [已解决]获取网页源码的问题?