文字天气预报

近日由于工作原因，需要在网页中插入一个单行显示的天气预报。。。在网上找了 N久，或许是不得法之故，无一能趁心意，只好动手为之，现在将弄出来的东东发在这里，希望能对需要的朋友有所帮助或启发。

 

（代码为 C#， ASP.net 2.0环境， 写得比较凌乱， 但大致上看得懂吧....）

 

建立一个 ASPX文件，名为 tqyb.aspx, 其中 .aspx文件中的内容无需理会， .aspx.cs中的内容如下：

 

using System;
using System.Data;
using System.Configuration;
using System.Web;
using System.Web.Security;
using System.Web.UI;
using System.Web.UI.WebControls;
using System.Web.UI.WebControls.WebParts;
using System.Web.UI.HtmlControls;
using System.Net;
using System.Text;
using System.Text.RegularExpressions;

public partial class _tqyb : System.Web.UI.Page
{
    protected void Page_Load(object sender, EventArgs e)
    {
        //-- 将此处的页面地址替换为相应的地址就行了，可以登陆 www.cma.gov.cn 查询到相应的城市
        string pageUrl = "http://www.cma.gov.cn/tqyb/weatherdetail/57496.html";

        //-- 用于存储抓取出来的地点的名称
        string dd = string.Empty;

        //-- 天气状况
        string tqgk = string.Empty;

        //-- 气温
        string qw = string.Empty;

        //-- 风力/风向
        string fxfl = string.Empty;

        if (!IsPostBack)
        {
            WebClient wc = new WebClient();
            wc.Credentials = CredentialCache.DefaultCredentials;

            Byte[] bt = wc.DownloadData(@pageUrl);

            string result = Encoding.Default.GetString(bt);

            if (result.Length <= 0)
            {
                Response.Write("未找到指定的城市天气信息！");
                return;
            }
            
            int pos = result.IndexOf("<div class=\"font01\">3天预报&nbsp;&nbsp;&nbsp;</div>");

            if (pos > 0)
                result = "未找到该城市的天气预报！";
            else
            {
                pos = result.IndexOf("<div class=\"font01\">3天预报");

                result = result.Substring(pos, result.IndexOf("穿衣指数") - pos);

                pos = result.IndexOf("&nbsp;&nbsp;&nbsp;") + 18;
                dd = result.Substring(pos, result.IndexOf("</") - pos);

                pos = result.IndexOf("天气概况");
                result = result.Substring(pos, result.IndexOf("<!--<tr>") - pos);

                pos = result.IndexOf("<td width=\"75\"");
                result = result.Substring(pos);

                pos = result.IndexOf(">");
                tqgk = result.Substring(pos + 1, result.IndexOf("</td>") - pos - 1);

                result = result.Substring(result.IndexOf("气 温"));
                pos = result.IndexOf("cn\">") + 4;

                qw = result.Substring(pos, result.IndexOf("℃</td>") - pos + 1);

                result = result.Substring(result.IndexOf("风向/风力</td>"));
                result = result.Substring(result.IndexOf("<td"));

                pos = result.IndexOf("cn\">") + 4;

                fxfl = result.Substring(pos, result.IndexOf("</td") - pos);

                tqgk = "今日天气：" + tqgk.Replace(" ", "");
                qw = qw.Replace(" ", "");

                qw = "最高温度：" + qw.Replace("/", " 最低温度：");

                fxfl = "风向/风力：" + fxfl.Replace(" ", "");

                result = dd + tqgk + " " + qw + " " + fxfl;

            }

            Response.Write("document.write(\"" + result + "\");");
            Response.End();
            
        }
    }
}


调用时只需要如下即可：

<script language="javascript" type="text/javascript" src="tqyb.aspx"></script>

即可得到纯文字的当日天气预报，自己再要设置什么格式均可。