加入收藏    手機頻道
當前位置:首頁 > 技術支持 > 網站建設
天氣預報遠程獲取方法 文章出處:淮南智誠網絡公司    網站責任編輯:     作者:     人氣:    發表時間:2017-10-25
今天小編共享一篇如何獲取遠程天氣的JS代碼

遠程調用天氣的JS插件

var xmlHttp = false;
try {
  xmlHttp = new ActiveXObject("Msxml2.XMLHTTP");
} catch (e) {
  try {
    xmlHttp = new ActiveXObject("Microsoft.XMLHTTP");
  } catch (e2) {
    xmlHttp = false;
  }
}
if (!xmlHttp && typeof XMLHttpRequest != 'undefined') {
  xmlHttp = new XMLHttpRequest();
}

function callServer() {
  xmlHttp.open("GET","/xg.asp", true);
  xmlHttp.onreadystatechange = updatePage;
  xmlHttp.send(null); 
}
function updatePage(id,divid) {
  if (xmlHttp.readyState < 4) {
 test1.innerHTML="<div style='text-align:center;color:ff0000'>讀取數據庫中...</div>";
  }
  if (xmlHttp.readyState == 4) {
    var response = xmlHttp.responseText;
 test1.innerHTML=response;
  }
}

 

下面是XG.ASP頁面部分

 

<% Response.charset = "utf-8" %>
<%function getHTTPPage(url)
dim Http
set Http=server.createobject("MSXML2.XMLHTTP")
Http.open "get",url,false
Http.send()
if Http.readystate<>4 then
exit function
end if
getHTTPPage=BytesToBSTR(Http.responseBody,"utf-8")
'xmlhttp.setRequestHeader("charset", "utf-8");
set http=nothing
if err.number<>0 then err.Clear
end function


Function BytesToBstr(body,Cset)
dim objstream
set objstream = Server.CreateObject("adodb.stream")
objstream.Type = 1
objstream.Mode =3
objstream.Open
objstream.Write body
objstream.Position = 0
objstream.Type = 2
objstream.Charset = Cset
BytesToBstr = objstream.ReadText
objstream.Close
set objstream = nothing
End Function

Dim Url,Html
Url="http://www.weather.com.cn/data/cityinfo/101210501.html"   ‘這里是JS部分
Html = getHTTPPage(Url)
Response.write Html
%>

 

想和他們一樣成功嗎?
此文關鍵詞:
域名查詢

????國家域名處理投訴中心
????010-58813000
????Email:supervise@cnnic.cn
Copyright © 2007 - 2020 版權所有 淮南智誠互動網絡科技有限公司
皖ICP備09027578號 聯系我們
友情鏈接:網站建設|網頁設計|SEO優化 | 皖公網安備 34040002001248號
国产又黄又硬又湿又黄的视频,4k最新福利片视频在线观看,东京热无码国产精品,99久久99这里只有免费费精品
<蜘蛛词>| <蜘蛛词>| <蜘蛛词>| <蜘蛛词>| <蜘蛛词>| <蜘蛛词>| <蜘蛛词>| <蜘蛛词>| <蜘蛛词>| <蜘蛛词>| <蜘蛛词>| <蜘蛛词>| <蜘蛛词>| <蜘蛛词>| <蜘蛛词>| <蜘蛛词>| <蜘蛛词>| <蜘蛛词>| <蜘蛛词>| <蜘蛛词>| <蜘蛛词>| <蜘蛛词>| <蜘蛛词>| <蜘蛛词>| <蜘蛛词>| <蜘蛛词>| <蜘蛛词>| <蜘蛛词>| <蜘蛛词>| <蜘蛛词>| <蜘蛛词>| <蜘蛛词>| <蜘蛛词>| <蜘蛛词>| <蜘蛛词>| <蜘蛛词>| <蜘蛛词>| <蜘蛛词>| <蜘蛛词>| <蜘蛛词>| <蜘蛛词>| <文本链> <文本链> <文本链> <文本链> <文本链> <文本链>