好不容易在整理好 BDC 後才發現他無法使用內建的功能來下載清單到 EXCEL 中.上網找了很久都找到2007 的作法. 那些API 有很多都是已停用的(雖然有人試出來,但我沒有 :( )
好了.以下是這個程式碼
<%@ Assembly Name="mscorlib, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089" %>
<%@ Assembly Name="Microsoft.SharePoint, Version=14.0.0.0, Culture=neutral, PublicKeyToken=71e9bce111e9429c" %>
<%@ Assembly Name="System.Web, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a" %>
<%@ Assembly Name="Microsoft.SharePoint.Portal, Version=14.0.0.0, Culture=neutral, PublicKeyToken=71e9bce111e9429c" %>
<%@ Assembly Name="Microsoft.BusinessData, Version=14.0.0.0, Culture=neutral, PublicKeyToken=71e9bce111e9429c" %>
<%@ WebHandler Language="C#" Class="ExcelDumper" %>
using System;
using System.Web;
using System.Web.UI;
using System.Web.SessionState;
using System.Collections;
using System.Collections.Generic;
using Microsoft.SharePoint;
using Microsoft.BusinessData.MetadataModel.Collections;
using Microsoft.BusinessData.Infrastructure;
using Microsoft.BusinessData.MetadataModel;
using Microsoft.BusinessData.Runtime;
using Microsoft.SharePoint.BusinessData.SharedService;
using Microsoft.SharePoint.Administration;
using System.Web;
using Microsoft.Office.Server.ApplicationRegistry.SystemSpecific.Db;
public class ExcelDumper : IHttpHandler, IReadOnlySessionState
{
public bool IsReusable
{
get { return false; }
}
public void ProcessRequest(HttpContext context)
{
//entityNS = "GW_BDCM_IP.IP_ALL";
//string entityName = "ENT_IP_ALL_";/
string siteURL = "
http://spcenter/IP/";
string entityNS = "GW_BDCM_IP.IP_ALL";// "<nameSpace>";
string entityName = "ENT_IP_ALL";// "<entityName>";
string methodInstanceName = "ReadList";//"<methodInstanceName>";
string H_HTML = "", TB_HTML = "", B_HTML = "";
bool firtLine = true;
context.Response.ContentType = "application/vnd.ms-excel";
//context.Response.ContentType =
//header('Content-disposition: attachment; filename='.$q);
if (context.Request["entityNS"] != null)
{
entityNS = context.Request["entityNS"];
}
if (context.Request["entityName"] != null)
{
entityName = context.Request["entityName"];
}
if (context.Request["methodInstanceName"] != null)
{
methodInstanceName = context.Request["methodInstanceName"];
}
using (SPSite site = new SPSite(SPContext.Current.Site.Url))
{
using (new Microsoft.SharePoint.SPServiceContextScope(
SPServiceContext.GetContext(site)))
{
BdcService service = SPFarm.Local.Services.GetValue<BdcService>(String.Empty);
IMetadataCatalog catalog = service.GetDatabaseBackedMetadataCatalog(SPServiceContext.Current);
IEntity entity = catalog.GetEntity(entityNS, entityName);
IMethodInstance imethInst = entity.GetMethodInstance(methodInstanceName, MethodInstanceType.Finder);
IEntityInstanceEnumerator prodEntityInstanceEnumerator = entity.FindFiltered(imethInst.GetFilters(), entity.GetLobSystem().GetLobSystemInstances()[0].Value);
context.Response.Headers.Add("Content-Disposition", "attachment; filename='Download.xls'");
while (prodEntityInstanceEnumerator.MoveNext())
{
IEntityInstance IE = prodEntityInstanceEnumerator.Current;
foreach (IField f in entity.GetFinderView(methodInstanceName).Fields)
{
if (firtLine)
{
H_HTML = string.Format("{0}<td>{1}</td>", H_HTML, f.DefaultDisplayName );
}
TB_HTML = string.Format("{0}<td>{1}</td>", TB_HTML, IE[f].ToString().Replace("\r\n", "<br style=\"mso-data-placement:same-cell;\" />"));
}
B_HTML = string.Format("{0}<tr>{1}</tr>", B_HTML, TB_HTML);
if (firtLine)
{
B_HTML = string.Format("<tr>{0}</tr>{1}", H_HTML, B_HTML);
}
TB_HTML = "";
firtLine = false;
}
B_HTML = string.Format("<table>{0}</table>", B_HTML);
context.Response.Write(B_HTML);
}
}
}
}
使用方式
1.將這個代碼 存到 C:\Program Files\Common Files\Microsoft Shared\Web Server Extensions\14\TEMPLATE\LAYOUTS 目錄下. 並存成 .ashx 檔
2. 自己在網站中建立一個LINK 網址設為
http://spcenter/IP/_layouts/excel02.ashx?entityNS=GW_BDCM_IP.IP_ALL&entityName=ENT_IP_ALL
參數內容自己看.
