[已解决]请教如何获取该网站的下页内容

kxing

希望能通过程序获取到第n页的内容
他这个页面似乎只能post换页，不能在地址栏get方式。
http://t8.rbc.cn/category--s-id_77.html
请高人指点，多谢！

feilong

_IELinkClickByText($oie,"下一页")

;~ http://t8.rbc.cn/category--s-id_77.html

#NoTrayIcon

#include <ie.au3>


main ()


Func main ()
        
        $oie = _IECreate("http://t8.rbc.cn/category--s-id_77.html")
        _IELinkClickByText($oie,"下一页")
        
EndFunc

kxing

不是这种拉，我要的是get或post后台得到数据的。不希望通过ie打开得到。

骗子

;第3页
$yeshu = 3
$xmlhttp = ObjCreate("Msxml2.xmlhttp") 
$xmlhttp.open("POST", 'http://t8.rbc.cn/category--s-id_77.html', False) 
$xmlhttp.setRequestHeader('Content-Type', 'application/x-www-form-urlencoded')
$xmlhttp.send('p=' & $yeshu & '&id=77')
$para_txt = BinaryToString($xmlhttp.responseBody, 4)
ConsoleWrite($para_txt)

kxing

感谢楼上，可以用了。