獲取72小時天氣預報的網址為：

例如：

深圳的天氣預報為：

RSS資料為：

<?xml version="1.0" encoding="gb2312" ?><rss version="2.0"><channel><title>深圳 72小時天氣預報</title><description>深圳72小時天氣預報 </description><copyright/><language>zh-cn</language><lastBuildDate>2010-10-11 9:15:11</lastBuildDate><link>http://weather.all2rss.com/</link><ttl>30</ttl><item><title><![CDATA[10月11日9時  -  今天：小雨 25℃～29℃ 微風 小於3 級；  明天：多雲 25℃～29℃ 微風 小於3 級；  後天：多雲 25℃～29℃ 微風 小於3 級]]></title><link><![CDATA[http://weather.all2rss.com/city.asp?id=219&city=深圳&date=2010-10-11-9:15]]></link><description><![CDATA[ ]]></description><author></author><pubDate>Mon, 11 Oct 2010 09:15:11 +0800</pubDate></item></channel></rss>

然後使用相關程式語言提取相應資料即可。

例如：獲取三天內的天氣預報（ASP）程式碼：

// getWeather.asp

<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%>
<%
dim ml
ml = ml & "<meta http-equiv=""Content-Type"" content=""text/html; charset=gb2312"" />"
ml = ml & "<meta http-equiv=""X-UA-Compatible"" content=""IE=7"" />"
'Response.Write("document.write('" & ml & "');")

Function ReadRSS(xmlseed)
 dim xmlDoc
 dim http
 Set http=Server.CreateObject("Microsoft.XMLHTTP")
 http.Open "GET",xmlseed,False
 http.send
 Set xmlDoc=Server.CreateObject("Microsoft.XMLDOM")
 xmlDoc.Async=False
 xmlDoc.ValidateOnParse=False
 xmlDoc.Load(http.ResponseXML)
    dim result
     if xmlDoc.ReadyState>2 Then
        Set lastBuildDate=xmlDoc.getElementsByTagName("lastBuildDate")
        dim channel_link
        Set channelLink=xmlDoc.selectSingleNode("//channel/link")
        channel_link = channelLink.Text
        dim lastDate
        lastDate = lastBuildDate.Item(0).Text
        Set item=xmlDoc.getElementsByTagName("item")
        if item.Length>0 then
            For i=0 To (item.Length-1)
                Set title=item.Item(i).getElementsByTagName("title")
                Set link=item.Item(i).getElementsByTagName("link")
                result= result & title.Item(0).Text
            Next
        end if
      end if
      Set xmlDoc=nothing
      result = Replace(Split(result,"  -  ")(1)," ","")
      result = Replace(result,"今天","<b><font color=""red"">今天</font></b>")
      result = Replace(result,"明天","<b>明天</b>")
      result = Replace(result,"後天","<b>後天</b>")
      ReadRSS = result
End Function
Response.Write("document.write('" & ReadRSS("

呼叫方式：

將上述程式碼儲存為getweather.asp，放在合適的目錄下（如：/weather），之後在其他網頁的合適的位置插入以下程式碼即可。

<script language="JavaScript" src="/weather/getweather.asp" charset="gb2312"></script>