2012-09-28 94 views
4

我有一個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網站的憑據:所以我用下面的代碼創建了一個模塊中的方法在代碼中可以看到上面的內容。我需要的是防止在發佈時詢問憑據。

回答

2

我嘗試使用VBA推送SP時遇到了授權問題;它只是脆弱而挑剔。我在工作中使用的一種解決方案是將SP站點映射爲網絡驅動器,並直接簡單地將文件保存到(like in this UC tutorial),從而避免了此問題。