{"id":512,"date":"2009-08-25T01:25:36","date_gmt":"2009-08-24T17:25:36","guid":{"rendered":""},"modified":"2014-03-11T22:27:11","modified_gmt":"2014-03-11T14:27:11","slug":"gethttppage%e7%bc%93%e5%ad%98","status":"publish","type":"post","link":"http:\/\/www.xiaoyebailong.com\/index.php\/2009\/08\/25\/512.htm","title":{"rendered":"gethttppage()\u7f13\u5b58"},"content":{"rendered":"

 <\/p>\n

\n

[Code]<%
\nfunction getHTTPPage(url) 
\n    dim   httpxml  
\n   Set httpxml= server.CreateObject("msxml2.XMLHTTP")  
\n    httpxml.open "get",url,False
\n    httpxml.send()
\n     if httpxml.readystate<>4 then
\n  exit function
\nend if 
\n  getHTTPPage=bytesToBSTR(Httpxml.responseBody,"GB2312")
\n    set httpxml=nothing
\n  if err.number<>0 then err.Clear
\n   end function           ‘ 2\u3001\u8f6c\u6362\u4e71\u739b\uff0c\u76f4\u63a5\u7528xmlhttp\u8c03\u7528\u6709\u4e2d\u6587\u5b57\u7b26\u7684\u7f51\u9875\u5f97\u5230\u7684\u5c06\u662f\u4e71\u739b\uff0c\u53ef\u4ee5\u901a\u8fc7adodb.stream\u7ec4\u4ef6\u8fdb\u884c\u8f6c\u6362
\nFunction BytesToBstr(body,Cset) 
\ndim objstream
\nset objstream = Server.CreateObject("adodb.stream")
\nobjstream.Type = 1
\nobjstream.Mode =3
\nobjstream.Open
\nobjstream.Write body
\nobjstream.Position = 0
\nobjstream.Type = 2
\nobjstream.Charset = Cset
\nBytesToBstr = objstream.ReadText
\nobjstream.Close
\nset objstream = nothing
\nEnd Function
\n%>[\/Code]<\/p>\n<\/div>\n

\u4e0a\u9762\u7684\u4ee3\u7801\u5728\u4ee3\u7801\u7b2c\u4e8c\u6b21\u751f\u6210\u7684\u65f6\u5019\u4e0d\u4f1a\u66f4\u65b0\uff0c\u4e0b\u9762\u7684\u4ee3\u7801\u52a0\u4e0a\u65f6\u95f4\u5c31\u597d\u4e86\uff01<\/p>\n

\n

[Code]<%
\nfunction getHTTPPage(byval url) 
\n  if instr(url,"?")>0 then
\n    url=url&"&d="&now() 
\n  else
\n    url=url&"?d="&now()
\n  end if
\n    dim   httpxml  
\n   Set httpxml= server.CreateObject("msxml2.XMLHTTP")  
\n    httpxml.open "get",url,False
\n    httpxml.send()
\n     if httpxml.readystate<>4 then
\n  exit function
\nend if 
\n  getHTTPPage=bytesToBSTR(Httpxml.responseBody,"GB2312")
\n    set httpxml=nothing
\n  if err.number<>0 then err.Clear
\n   end function           ‘ 2\u3001\u8f6c\u6362\u4e71\u739b\uff0c\u76f4\u63a5\u7528xmlhttp\u8c03\u7528\u6709\u4e2d\u6587\u5b57\u7b26\u7684\u7f51\u9875\u5f97\u5230\u7684\u5c06\u662f\u4e71\u739b\uff0c\u53ef\u4ee5\u901a\u8fc7adodb.stream\u7ec4\u4ef6\u8fdb\u884c\u8f6c\u6362
\nFunction BytesToBstr(body,Cset) 
\ndim objstream
\nset objstream = Server.CreateObject("adodb.stream")
\nobjstream.Type = 1
\nobjstream.Mode =3
\nobjstream.Open
\nobjstream.Write body
\nobjstream.Position = 0
\nobjstream.Type = 2
\nobjstream.Charset = Cset
\nBytesToBstr = objstream.ReadText
\nobjstream.Close
\nset objstream = nothing
\nEnd Function
\n%>
\n[\/Code]<\/p>\n<\/div>\n

 <\/p>\n","protected":false},"excerpt":{"rendered":"

  [Code]<% function getHTTPPage(url)      dim   httpxml  …<\/p>\n","protected":false},"author":1,"featured_media":0,"comment_status":"open","ping_status":"open","sticky":false,"template":"","format":"standard","meta":{"footnotes":""},"categories":[1],"tags":[],"topic":[],"class_list":["post-512","post","type-post","status-publish","format-standard","hentry","category-technology"],"_links":{"self":[{"href":"http:\/\/www.xiaoyebailong.com\/index.php\/wp-json\/wp\/v2\/posts\/512","targetHints":{"allow":["GET"]}}],"collection":[{"href":"http:\/\/www.xiaoyebailong.com\/index.php\/wp-json\/wp\/v2\/posts"}],"about":[{"href":"http:\/\/www.xiaoyebailong.com\/index.php\/wp-json\/wp\/v2\/types\/post"}],"author":[{"embeddable":true,"href":"http:\/\/www.xiaoyebailong.com\/index.php\/wp-json\/wp\/v2\/users\/1"}],"replies":[{"embeddable":true,"href":"http:\/\/www.xiaoyebailong.com\/index.php\/wp-json\/wp\/v2\/comments?post=512"}],"version-history":[{"count":1,"href":"http:\/\/www.xiaoyebailong.com\/index.php\/wp-json\/wp\/v2\/posts\/512\/revisions"}],"predecessor-version":[{"id":66372,"href":"http:\/\/www.xiaoyebailong.com\/index.php\/wp-json\/wp\/v2\/posts\/512\/revisions\/66372"}],"wp:attachment":[{"href":"http:\/\/www.xiaoyebailong.com\/index.php\/wp-json\/wp\/v2\/media?parent=512"}],"wp:term":[{"taxonomy":"category","embeddable":true,"href":"http:\/\/www.xiaoyebailong.com\/index.php\/wp-json\/wp\/v2\/categories?post=512"},{"taxonomy":"post_tag","embeddable":true,"href":"http:\/\/www.xiaoyebailong.com\/index.php\/wp-json\/wp\/v2\/tags?post=512"},{"taxonomy":"topic","embeddable":true,"href":"http:\/\/www.xiaoyebailong.com\/index.php\/wp-json\/wp\/v2\/topic?post=512"}],"curies":[{"name":"wp","href":"https:\/\/api.w.org\/{rel}","templated":true}]}}