SharePoint 2010]开发与SharePoint2010 数据同步的Outlook2007 add-in
企业在使用SharePoint的同时，有时候可以和Outlook集成起来，比如在SharePoint中创建了一个Training meeting，但是在SharePoint中无法象Outlook那样Book meeting room，添加Attendee也不如Outlook里来的方便，因此希望同时能够在Outlook中也创建meeting request，这样不仅可以完成以上功能，同样也可以使用Outlook的TO-DO list的功能，管理个人的Calendar，同时和meeting有关的信息又可以在SharePoint site上管理维护。要完成这样的功能，我们首先需要开发一个Outlook add-in。下面介绍详细步骤：
1.打开visual studio 2010 (2008亦可）->New Project, 在office栏中选择Outlook 2007 Add-in 模板，创建完项目后，Add New Item, 选择Ribbon(Visual Designer)此item.
2.双击刚才创建的Ribbon item，可以看见一个Ribbon的设计视图，根据需要修改Tab，Group的名字，并在旁边的toolbox中拖一个button到group中。 修改button的name，根据自己需要设置一些UI，这样UI部分就完成了，如下图：
3.现在要完成功能部分，在Ribbon视图中右键->Property, 修改Behavior节中的Ribbon Type，这个type设置的意思是要将你的Ribbon应用在Outlook的什么地方，这里我们选择
确保可以在打开Outlook的meeting request时使用这个Ribbon Item。
这里使用SharePoint的list web service来完成和SharePoint同步，在项目中添加web reference，url中输入 http://server/_vti_bin/lists.asmx?wsdl,添加Service。
同时添加IListOperation和IAuthorization接口，完成对List操作和用户验证的抽象，类SyncAuthorization和ListServiceProxy实现了上述接口
代码 
代码 {
bool Authorize(MeetingRequest request);
}
interface IListOperation
{
XmlNode GetListItems(string listName, XmlNode query, XmlNode viewField);
bool UpdateListItems(string listName, XmlNode batchElement);
}
class SyncAuthorization:IAuthorization
{
private string _currentUser;
private string _listName;
public SyncAuthorization(string currentUser, string listName)
{
this._currentUser = currentUser;
this._listName = listName;
}
public bool Authorize(MeetingRequest request)
{
XmlDocument xmlDoc = new XmlDocument();
XmlNode ndQuery = xmlDoc.CreateNode(XmlNodeType.Element, "Query", "");
XmlNode ndViewFields = xmlDoc.CreateNode(XmlNodeType.Element, "ViewFields", "");
ndViewFields.InnerXml = "<FieldRef Name=\"Author\"/>";
ndQuery.InnerXml = "<Where><Eq><FieldRef Name='Training_x0020_ID'/><Value Type='Text'>" + request.TrainingGuid + "</Value></Eq></Where>";
XmlNode targetItem = ListServiceProxy.listServiceProxy.GetListItems(_listName,ndQuery,ndViewFields);
XmlTextReader xmlTextReader = new XmlTextReader(targetItem.OuterXml, XmlNodeType.Element, null);
while (xmlTextReader.Read())
{
if (xmlTextReader.Name == "z:row")
{
string lookupFieldValue = xmlTextReader.GetAttribute("ows_Author").ToString();
string createrName = lookupFieldValue.Split(new string[] { ";#" }, StringSplitOptions.RemoveEmptyEntries)[1];
if (createrName == _currentUser)
{
return true;
}
else
{
return false;
}
}
}
return false;
}
}
}
class ListServiceProxy:IListOperation,IDisposable
{
private TrainingListService.Lists trainingListServiceProxy;
private ListServiceProxy()
{
trainingListServiceProxy = new TrainingListService.Lists();
trainingListServiceProxy.Credentials = System.Net.CredentialCache.DefaultCredentials;
}
public static readonly ListServiceProxy listServiceProxy = new ListServiceProxy();
public XmlNode GetListItems(string listName, XmlNode query, XmlNode viewFields)
{
return trainingListServiceProxy.GetListItems(listName, "", query, viewFields, null,null,null);
}
public bool UpdateListItems(string listName, XmlNode batchElement)
{
XmlNode resultNode = trainingListServiceProxy.UpdateListItems(listName, batchElement);
string errorCode = resultNode.FirstChild.InnerText;
if (errorCode == "0x00000000")
return true;
else
return false;
}
public void Dispose()
{
trainingListServiceProxy.Dispose();
}
}
这里的验证操作比较简单，只有SharePoint training meeting list中某个training meeting的创建者才可以在Outlook的meeting request中完成同步。
TrainingInfoSynchronization类完成了我们需要的业务操作。
代码 {
public static readonly Outlook.Application application = application = new Outlook.Application();
private string traininglistName = null;
public TrainingInfoSynchronization(string traingListName)
{
traininglistName = traingListName;
}
public MeetingRequest GetCurrentOutlookRequest()
{
Outlook.AppointmentItem mail = application.ActiveInspector().CurrentItem;
Regex rg = new Regex(@"[A-Fa-f0-9]{8}(-[A-Fa-f0-9]{4}){3}-[A-Fa-f0-9]{12}");
using (mail as IDisposable)
{
MeetingRequest request = new MeetingRequest();
request.Topic = mail.Subject;
request.StartTime = mail.Start;
request.EndTime = mail.End;
request.Location = mail.Location;
request.TrainingGuid = rg.Match(mail.Body).Value.ToString();
string currentRequestID = GetItemIDByTrainingGuid(request);
int resultID = 0;
bool isGetCorrectID = Int32.TryParse(currentRequestID, out resultID);
if (isGetCorrectID)
request.RequestId = resultID;
else
request.RequestId = 0;
return request;
}
}
private string GetItemIDByTrainingGuid(MeetingRequest request)
{
XmlDocument xmlDoc = new XmlDocument();
XmlNode ndQuery = xmlDoc.CreateNode(XmlNodeType.Element, "Query", "");
XmlNode ndViewFields = xmlDoc.CreateNode(XmlNodeType.Element, "ViewFields", "");
ndViewFields.InnerXml = "<FieldRef Name=\"Author\"/>";
ndQuery.InnerXml = "<Where><Eq><FieldRef Name='Training_x0020_ID'/><Value Type='Text'>" + request.TrainingGuid + "</Value></Eq></Where>";
XmlNode targetItem = ListServiceProxy.listServiceProxy.GetListItems(traininglistName, ndQuery, ndViewFields);
XmlTextReader xmlTextReader = new XmlTextReader(targetItem.OuterXml, XmlNodeType.Element, null);
string requestID = String.Empty;
while (xmlTextReader.Read())
{
if (xmlTextReader.Name == "z:row")
{
requestID = xmlTextReader.GetAttribute("ows_ID").ToString();
break;
}
}
return requestID;
}
public bool UpdateTrainingInfoInSharePoint(MeetingRequest request)
{
XmlDocument xmlDoc = new XmlDocument();
XmlElement batchElement = xmlDoc.CreateElement("Batch");
string startDateTime = request.StartTime.ToString("s") + "Z";
string endDateTime = request.EndTime.ToString("s") + "Z";
string command = "<Method ID=\"1\" Cmd=\"Update\">" + "<Field Name=\"ID\">" + request.RequestId.ToString() + "</Field><Field Name=\"Title\">" + request.Topic.ToString() + "</Field><Field Name=\"Start_x0020_Time\">" + startDateTime + "</Field><Field Name=\"End_x0020_Time\">" + endDateTime + "</Field><Field Name=\"Location\">" + request.Location + "</Field></Method>";
batchElement.SetAttribute("OnError", "Continue");
batchElement.SetAttribute("ListVersion", "1");
batchElement.InnerXml = command;
return ListServiceProxy.listServiceProxy.UpdateListItems(traininglistName, batchElement);
}
}
GetCurrentOutlookRequest() 方法提取当前打开的outlook meeting request中的数据，而UpdateTrainingInfoInSharePoint方法完成从Outlook到SharePoint的同步。
双击Ribbon Item上我们添加的Button，在事件处理方法中添加
代码 {
tabSharePoint.Visible = false;
TrainingInfoSynchronization tSync = new TrainingInfoSynchronization(TRAININGLISTNAME);
DialogResult result = MessageBox.Show("This operation will change the training information on SharePoint training center, do you want to continue?", "Training Info Sync", MessageBoxButtons.YesNo);
if (result == DialogResult.Yes)
{
string currentOutlookUser = TrainingInfoSynchronization.application.Inspectors.Session.CurrentUser.Name;
IAuthorization authorization = new SyncAuthorization(currentOutlookUser, TRAININGLISTNAME);
MeetingRequest request = tSync.GetCurrentOutlookRequest();
if (request.RequestId == 0)
{
MessageBox.Show("We cannot find the related training info in Training Center, please keep the [Training GUID] correct.");
return;
}
if (authorization.Authorize(request))
{
bool isSuccess = tSync.UpdateTrainingInfoInSharePoint(request);
if (isSuccess)
{
MessageBox.Show("Meeting information is successfully sychronized with Training Center on SharePoint.");
}
else
{
MessageBox.Show("Errors happened in the process of syhchronization, please try it again or contact with the administrator of Training Center site.");
}
}
else
{
MessageBox.Show("Only the training creater can synchronize the information.");
}
}
}
catch
{
MessageBox.Show("Only the training creater can synchronize the information.");
}
finally
{
ListServiceProxy.listServiceProxy.Dispose();
}
这样一个从Outlook到SharePoint的同步就完成了。Build项目完成后，右键项目->publish,选择一个本地路径，这 样VS2010将为我们在本地产生一个Setup.exe,运行这个文件，可以在客户端的Outlook上安装上我们开发的ribbon add-in，当我们安装完成后，在Outlook中新建一个meeting request或者打开一个meeting request，就可看到我们的Ribbon Tab，如图：
接下来，用SharePoint designer在Training meeting list 的newform和editform两个页面中添加js，确保当每一个meeting item 保存的时候，都可以弹出一个Outlook的meeting request 窗口。如下面的js：
代码 {
var outlookApp = new ActiveXObject("Outlook.Application");
try
{
var mailItem= outlookApp.createItem(1); //Appointment
mailItem.MeetingStatus = 1;//Set Appointment to Meeting
mailItem.Subject=strSubject;
mailItem.Body = strHTMLBody;
mailItem.Start = strStart;
mailItem.End = strEnd;
mailItem.Location = strLocation;
if(strTo != "")
mailItem.recipients.add(strTo);
mailItem.display (0);
}
finally
{
outlookApp =null;
}
}
这样，当我们在SharePoint的Training Meeting List中创建一个Meeting item结束的时候，都会弹出一个Outlook meeting request的窗口，我们把当前在Item中添加的一些相关信息，如Topic，Agenda等等先自动填入meeting request窗口的Subject和Body中，一旦我们在meeting request的窗口中完成了Room booking和Agendee的添加后，我们可以点击Ribbon tab中的同步按钮，完成信息写回到SharePoint的过程。
