|
发表于 2013-3-24 17:16:41
|
显示全部楼层
$ursd = "下面的网址"
$oHTTP = ObjCreate("MSXML2.XMLHTTP")
$oHTTP.Open("get", $ursd, False)
$oHTTP.setRequestHeader("Accept", "text/html, application/xhtml+xml, */*")
$oHTTP.setRequestHeader("Accept-Language", "zh-CN")
$oHTTP.setRequestHeader("Accept-Encoding", "gzip, deflate")
$oHTTP.setRequestHeader("Connection", "Keep-Alive")
$oHTTP.setRequestHeader("User-Agent", "Mozilla/5.0 (compatible; MSIE 9.0; Windows NT 6.1; WOW64; Trident/5.0)")
$oHTTP.Send("")
$a2 = ($oHTTP.responsetext)
msgbox(0,"返回值是",$a2)
http://s.wanfangdata.com.cn/Paper.aspx?q=%E4%B8%BB%E9%A2%98%3A(%22%E5%9C%B0%E9%AB%98%E8%BE%9B%E5%9C%A8%E5%BF%83%E5%8A%9B%E8%A1%B0%E7%AB%AD%E6%82%A3%E8%80%85%E4%B8%AD%E7%9A%84%E5%BA%94%E7%94%A8%22)%20%E5%88%9B%E4%BD%9C%E8%80%85%3A(%22%E9%A9%AC%E6%A1%82%E4%BC%B6%22)%20%E6%9C%9F%E5%88%8A%E2%80%94%E6%9D%A5%E6%BA%90%3A(%22%E4%B8%AD%E5%8D%8E%E5%BF%83%E8%A1%80%E7%AE%A1%E7%97%85%E6%9D%82%E5%BF%97%22)%20DBID%3AWF_QK&f=c.Periodical |
|