在线编辑Office文件
前言
第一次用SharePoint的时候感觉很惊奇，竟然可以在本地编辑服务器上的Office文件！不过不知道为什么一直没有想要知道为什么可以这样做。
前两天园子里有一篇文章引发了激烈的讨论。其中有人问楼主一些问题，其中就有这个。OK，那就看看到底的为什么吧。
准备
此部分可忽略，可直接看正文部分。
找原因的过程蛮简单。随便打开了公司SharePoint上的Document页，看HTML源码。发现链接的onfocus事件OnLink(this)。
好吧，那就找找这个函数吧。还是看源码，里面没有找到这个函数。那就去引用的两个js文件里看看吧。
最终在init.js里找到了。
function OnLink(elm)
{
DeferCall('OnLinkDeferCall', elm);
}
DeferCall函数是干嘛的就先不管了，找找OnLinkDeferCall函数。然后在core.js里找着了。
function OnLinkDeferCall(elm)
{
if (!IsMenuEnabled())
return false;
elm.onblur=OutItem;
elm.onkeydown=PopMenu;
var elmTmp=FindSTSMenuTable(elm, "CTXName");
if (elmTmp==null)
return false;
OnItem(elmTmp);
return false;
}
没什么值得注意的，再找PopMenu函数。
function PopMenu(e)
{
if (!IsMenuEnabled())
return true;
if (e==null)
e=window.event;
var nKeyCode;
if (browseris.nav6up)
nKeyCode=e.which;
else
nKeyCode=e.keyCode;
if (!IsMenuOn() && ((e.shiftKey && nKeyCode==13) || (e.altKey && nKeyCode==40)))
{
onKeyPress=true;
CreateMenu(e);
onKeyPress=false;
return false;
}
else
return true;
}
真他娘的悲剧，找CreateMenu函数；继续悲剧，找CreateMenuEx函数；再次悲剧，找AddDocLibMenuItems函数。好吧，在这个函数里有一句：
strAction="editDocumentWithProgID2('"+currentItemFileUrl+"', '"+currentItemProgId+"', '"
+currentItemOpenControl+"', '"+bIsCheckout+"', '"+ctx.HttpRoot+"', '"+currentItemCheckedoutToLocal+"')";
editDocumentWithProgID2函数又调用editDocumentWithProgIDNoUI函数。
editDocumentWithProgIDNoUI里面有一段是这样的：
objEditor=new ActiveXObject(varEditor+".3");
if (objEditor !=null )
{
if (bCheckout=="1")
{
if (!objEditor.CheckoutDocumentPrompt(strDocument, true, varProgID))
return 1;
}
else
{
if (strCheckouttolocal=="1")
fUseLocalCopy=true;
if (!objEditor.EditDocument3(window, strDocument, fUseLocalCopy, varProgID))
return 1;
}
var fRefreshOnNextFocus=false;
fRefreshOnNextFocus=objEditor.PromptedOnLastOpen();
if (fRefreshOnNextFocus)
{
window.onfocus=RefreshOnNextFocus;
}
else
{
SetWindowRefreshOnFocus();
}
return;
}
objEditor.EditDocument3，看来就是varEditor参数的问题了。然后往回找，到AddDocLibMenuItems函数这里卡住了。
function AddDocLibMenuItems(m, ctx)
就两个参数，真他大爷的！
找找currentItemOpenControl参数，没什么有价值的内容。
那就随便看看吧，AddCheckinCheckoutMenuItem函数应该是签入签出用的。函数里有一句：
strAction="CheckoutDocument('"+ctx.HttpRoot+"', '"+url+"', '"+opencontrol+"')";
继续找：
function CheckoutDocument(strhttpRoot, strDocument, strOpenControl)
{
var stsOpen=null;
var fRet=true;
var fClientCheckout=false;
if (strDocument.charAt(0)=="/" || strDocument.substr(0,3).toLowerCase()=="%2f")
strDocument=document.location.protocol+"//"+document.location.host+strDocument;
var strextension=SzExtension(unescapeProperly(strDocument));
if (FSupportCheckoutToLocal(strextension) &&
strOpenControl=="SharePoint.OpenDocuments.3") //应该就是这玩意儿了吧
{
stsOpen=StsOpenEnsureEx(strOpenControl);
}
if (stsOpen !=null)
{
try
{
fRet=stsOpen.CheckoutDocumentPrompt(unescapeProperly(strDocument), false, "");
SetWindowRefreshOnFocus();
fClientCheckout=true;
return;
}
catch (e)
{
}
}
if (!fClientCheckout)
NavigateToCheckinAspx(strhttpRoot, "FileName="+escapeProperly(unescapeProperly(strDocument))+"&Checkout=true");
}
OK，google一下。在MSDN里提到%ProgramFiles%\Microsoft Office\Office14\OWSSUPP.dll 。我的电脑里只有OFFICE11。所以实例化var obj = new ActiveXObject('SharePoint.OpenDocuments.3');用不了。
再看看其他资源，看来还有SharePoint.OpenDocuments.2和SharePoint.OpenDocuments.1，测试一下，都可以用。
正文
好吧，既然找着了就试试怎么用的吧。
查了下MSDN，SharePoint.OpenDocuments控件在安装了Office2007后将3用做版本号，Office2003是将2作版本号，Office2003之前的版本以1作版本号。
1.新建网站。
2.网站里新建文件夹，并在文件夹里放拷贝一个word文件test.doc，一个excel文件test.xls。
3.在Default.aspx里写javascript。
var objEditor;
try{
objEditor = new ActiveXObject("SharePoint.OpenDocuments.3");
}catch(e){
try{
objEditor = new ActiveXObject("SharePoint.OpenDocuments.2");
}catch(e){
try{
objEditor = new ActiveXObject("SharePoint.OpenDocuments.1");
}catch(e){
alert("你还是洗洗睡吧！");//当然，洗洗睡是解决不了问题的，先装Office吧
}
}
}
试试打开，编辑和新建。
expression.ViewDocument(bstrDocumentLocation, varProgID) //俗称“打开”
expression.EditDocument(bstrDocumentLocation, varProgID) //编辑
expression.CreateNewDocument(bstrTemplateLocation, bstrDefaultSaveLocation)//新建文档
/**********************************************************************
参数
expression:一个返回 OpenDocuments 控件 对象的表达式。
bstrDocumentLocation:一个字符串，其中包含要打开以读取的文档的 URL。
varProgID:一个可选字符串，其中包含要用来打开文档的应用程序的 ProgID。如果省略此参数，将使用文档的默认查看器。
bstrTemplateLocation:一个字符串，包含从中创建文档的文档模板的 URL 或创建文档时要调用的应用程序的编程标识符 (progID)。
bstrDefaultSaveLocation:一个字符串，包含可指定用于保存新文档的建议默认位置的路径。
返回值
3个函数返回值都是成功为 true；失败为 false。
***********************************************************************/
按规则分别些好3个函数，然后用3个A标签调用。建个模版，用来创建文件。但是路径不清楚，浏览一遍Default.aspx，把路径改好。刷新一下。
objEditor.ViewDocument("http://localhost:1773/WebSite1/Documents/Test.doc");
objEditor.EditDocument("http://localhost:1773/WebSite1/Documents/Test.xls");
objEditor.CreateNewDocument("http://localhost:1773/WebSite1/Documents/Template.dot","http://localhost:1773/WebSite1/Documents/");
试试Open：
点击“确定”，成功以只读打开Test.doc文件。
试试Edit，成功以只读打开。干嘛是只读啊？
Create呢？好吧，可以打开一个新文档，当然是跟模版一个样儿的。在文档中写“Hello Kitty”，保存。见鬼，保存不了。
看来还是只读的问题啊。赋予Documents文件夹Users用户修改、写入权限，问题依然。
部署到IIS看看，毕竟网站最终要靠它的。配置完成，再次修改函数里的路径。然后通过IIS浏览，My God!怎么还是没法保存？明明有修改和写入的权限啊？再通过IIS赋予Documents目录写入权限。大功告成！
结语
OpenDocuments对象的公共方法有十几个，具体可查看MSDN：http://msdn.microsoft.com/zh-cn/library/cc264316(v=office.12).aspx
然后需要注意权限问题。我是在本机测试，IIS是5.1的，如果是IIS6，应该不需要再通过IIS赋权限了。
