4

Excelブックがあり、ExcelVBAを使用してSharePointサイトに公開する必要があります。そこで、以下のコードを使用してモジュールにメソッドを作成しました。

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サイトのクレデンシャルを要求されることです。私が必要としているのは、公開時にクレデンシャルを要求しないようにすることです。

4

1 に答える 1