在Sharepoint站点发布Excel工作簿

问题描述：

我有一个Excel工作簿，需要使用Excel VBA将其发布到SharePoint网站中。在Sharepoint站点发布Excel工作簿

Private sc_Lists As SoapClient30 

Public c_WSDL_URL As String 

Private Const c_SERVICE As String = "Lists" 

Private Const c_PORT As String = "ListsSoap" 

Private Const c_SERVICE_NAMESPACE As String = "http://schemas.microsoft.com/sharepoint/soap/" 


Private Sub Class_Initialize() 

    Dim str_WSML As String 
    str_WSML = "" 
    Set sc_Lists = New SoapClient30 
    c_WSDL_URL = glb_URL 

    sc_Lists.MSSoapInit2 c_WSDL_URL, str_WSML, c_SERVICE, c_PORT, c_SERVICE_NAMESPACE 

    sc_Lists.ConnectorProperty("WinHTTPAuthScheme") = &H1 
    sc_Lists.ConnectorProperty("UseSSL") = True 
    sc_Lists.ConnectorProperty("AuthUser") = "username" 
    sc_Lists.ConnectorProperty("AuthPassword") = "pass" 

End Sub

问题是，当我打开Excel文件，并尝试发布它，然后它要求即使我已经为他们提供了我的SharePoint网站的凭据：所以我用下面的代码创建了一个模块中的方法在代码中可以看到上面的内容。我需要的是防止在发布时询问凭据。

答

我尝试使用VBA推送SP时遇到了授权问题;它只是脆弱而挑剔。我在工作中使用的一种解决方案是将SP站点映射为网络驱动器，并直接简单地将文件保存到(like in this UC tutorial)，从而避免了此问题。

在Sharepoint站点发布Excel工作簿

相关推荐