MOSS的Excel Services相信大家都听说过.我们可以创建一个引用了外部数据的Excel文件,然后发布到Excel Services中,然后就可以让用户在网页上看到数据库中的数据的实时的状态.
我们会有这样的设想,我在Excel中设计一个计算逻辑,然后从数据库中取一些值出来,填到Excel中,然后让Excel 自动去计算,然后我们可以把计算分析后的结果呈现给拥护.恩,这个设想很好!我们要实现这个想法需要做三件事情:
1)我们要能从数据库中取出特定的数,可能需要取到某一个数
2)我们需要Excel Services能支持我们直接查数据库
3)我们把设计好的Excel发布出去
第一件事情我们自然想到了SQL语句比如"Select value From table..."之类.
很遗憾,Excel Services不支持直接查询数据库,只支持SQL Server Analysis Services等间接的方式,可能是处于安全或者其他考虑,对于不了解SQL Server Analysis Services的兄弟来说就很难了 : (
这么一个好的设想,难道就实现不了吗?庆幸的是,Excel Services支持Udf用户自定义函数,我们可以通过用户自定义函数开发一个直接查数据库的Udf,使用我们熟悉的SQL语句.
Udf的开发过程:
1)VS2005新建一个类工程,应用经典目录下 12/ISAPI/Microsoft.Office.Excel.Server.Udf.dll
2)编写自定义的函数
3)注册Udf
关于Udf中的支持的返回值类型等可以参考:
http://officeblogs.net/excel/UDFs%20for%20Excel%20client%20and%20server.doc
SQLExcuteUdf是为实现了一个方法取数据库中的某个值而设计的:
using System;
using System.Collections.Generic;
using System.Text;
using System.Data;
using Microsoft.Office.Excel.Server.Udf;
using System.Data.SqlClient;
namespace SQLExcuteUdf
{
[UdfClass]
public class SQLExcute
{
/**//// <summary>
/// 取SQL Server数据库中的单个值
/// </summary>
/// <param name="constr">数据库链接</param>
/// <param name="comstr">SQl语句</param>
/// <returns></returns>
[UdfMethod]
public string GetSingleDataFromSQL(string constr, string comstr)
{
try
{
string tempstring = "无数据";
SqlConnection mycon = new SqlConnection(constr);
mycon.Open();
SqlCommand mycom = new SqlCommand(comstr, mycon);
SqlDataReader myreader = mycom.ExecuteReader();
if (myreader.Read())
{
tempstring = myreader[0].ToString();
}
mycon.Close();
mycon.Dispose();
return tempstring;
}
catch (Exception ex)
{
return "运行错误,错误:"+ex.Message;
}
}
}
}
编译把dll进行注册
根据Udf的设计,需要给函数提供一个数据库连接和SQL语句,在Excel中我是需要用这个Udf查数据库中某个值,直接在某个单元格输入函数"=GetSingleDataFromSQL($A$1,B4)".因为Excel不知道这个函数所以在这里会显示"#Name!"之类的东西,如果把Udf作成xll放到Excel中就能直接在Excel中用了,这里就不做介绍了.
然后,我把这个发布到Excel Services中.
当我在浏览器中访问的时候,Excel Services就会利用Udf去数据库中查到一个值,显示出来,当数据库中数据有更新的时候,刷新页面会实时更新数据.
在
这里下载源代码.
预告:
如何利用Excel Services取实数据作为KPI列表数据源