谁帮我写一下?

解决方案 »

  1.   

    以前写的,应该还有用weather.html<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
    <html xmlns="http://www.w3.org/1999/xhtml">
    <head>
    <meta http-equiv="Content-Type" content="text/html; charset=gb2312" />
    <title>天气预报</title>
    <script type="text/javascript">
    var Ajax = function(){};
    Ajax.prototype = {
    createHttpRequest : function(){
    if(window.ActiveXObject){
    //var ver = ["MSXML5.XMLHTTP","MSXML4.XMLHTTP","MSXML3.XMLHTTP","MSXML2.XMLHTTP","Microsoft.XMLHTTP"];
    var ver = ["Microsoft.XMLHTTP","MSXML.XMLHTTP"];
    for(var i=0; i<ver.length; i++){
    try{
    return new window.ActiveXObject(ver[i]);
    }catch(e){}
    }
    }else{
    try{
    return new XMLHttpRequest();
    }catch(e){}
    }
    alert("Failure to create HttpRequest!");
    },

    get : function(url, async, fnCallBack){
    var xmlHttp = this.createHttpRequest();
    xmlHttp.open("GET", url, async); xmlHttp.onreadystatechange = function(){
    if(xmlHttp.readyState == 4 ){
    if(xmlHttp.status == 200){
    fnCallBack(xmlHttp.responseText);
    }else{
    fnCallBack(null);
    }
    }
    };
    xmlHttp.setRequestHeader("If-Modified-Since","0");
    xmlHttp.send(null);
    }
    };
    function createXMLDOM(){
    var arr = ["MSXML2.DOMDocument.5.0", "MSXML2.DOMDocument.4.0", "MSXML2.DOMDocument.3.0", "MSXML2.DOMDocument", "Microsoft.XmlDom"];
    for(var i=0; i<arr.length; i++){
    try{
    var oXmlDom = new ActiveXObject(arr[i]);

    return oXmlDom;
    }
    catch(oError){
    }
    }

    throw new Error("MSXML is not installed on your system.");
    }window.onload = function(){
    var ajax = new Ajax();
    var city = "北京";
    var url = "weather.asp?dayFlag=1&cityName=" + encodeURI(city);

    ajax.get(url, true, function(str)
    {
    var string = str.split("|");
    if(string.length >= 6){
    var html = [];
    html.push(string[0])
    html.push(string[1]);
    html.push(string[2]);
    html.push(string[3]);
    html.push("<img src='" + string[5] + "'>");

    document.getElementById("container").innerHTML = html.join(" ");
    }
    }
    );
    };
    </script>
    </head>
    <body>
    <div id="container">
    </div>
    </body>
    </html>
    weather.asp<%@LANGUAGE="VBSCRIPT" CodePage="936" %>
    <%
    Dim xmlHttp, url, cityName, dayFlag
    cityName = Request("CityName")
    dayFlag = Request("DayFlag")

    If cityName = "" Then cityName = "%u6DF1%u5733"
    If dayFlag = "" Then dayFlag = 2 url = "http://www.ayandy.com/Service.asmx/getWeatherbyCityName?theCityName=" & cityName & "&theDayFlag=" & dayFlag

    Set xmlHttp = Server.CreateObject("Microsoft.XMLHttp")
    xmlHttp.Open "Get", url, False
    xmlHttp.Send()

    Set xmlDom = Server.CreateObject("Microsoft.XmlDom")
    xmlDom.async=False
    xmlDom.ValidateOnParse=false
    xmlDom.Load(xmlHttp.ResponseXML)

    Set oItem = xmlDom.GetElementsByTagName("string")

    Ret = ""
    For I = 1 To oItem.Length - 2
    If Ret <> "" Then Ret = Ret & "|"

    If oItem(i).childNodes.Length > 0 Then
    Ret = Ret & oItem(I).childNodes(0).text
    Else
    Ret = Ret & " "
    End If
    Next

    Set oItem = Nothing
    Set xmlDom = Nothing
    Set xmlHttp = Nothing

    Response.Charset = "gb2312"
    Response.ContentType = "text/html"
    Response.Write(Ret)
    %>
      

  2.   

    原文:http://www.mofun.cc/web/lwgboy/1/-/blogs/97589
    例子:http://www.mofun.cc/web/lwgboy/1/-/blogs/97589