VBA UpdateListItems SharePoint WebService

Question

Я пытаюсь создать новую задачу в списке SharePoint в VBA. Вот код, я использую:

Public Sub AddToSharePoint(ByVal Title As String, ByVal URL As String) 
    Dim oSoapClient As Object 
    Const ListID As String = "{0533218A-7FD9-4A25-AB8B-640F43E99741}" 
    Const ListView As String = "{805F724A-C3BD-4F26-891F-A331A469BC35}" 

    Dim BatchXML As String 

    BatchXML = "<Batch OnError='continue' ListVersion='1' ViewName='" & ListView & "'>" 
    BatchXML = BatchXML & "<Method ID='1' Cmd='New'>" 

    BatchXML = BatchXML & "<Field Name='Title'>" & Title & "</Field>" 

    BatchXML = BatchXML & "</Method></Batch>" 

    Set oSoapClient = CreateObject("MSSOAP.SOAPClient30") 
    oSoapClient.MSSoapInit URL&"?WSDL" 

    oSoapClient.UpdateListItems ListID, BatchXML 

    Set oSoapClient = Nothing  
End Sub 

Все хорошо работает до линии:

oSoapClient.UpdateListItems ListID, BatchXML 

Приходя к этой линии я получил ошибку, которая говорит:

Максимальный повторный попыток подключения (80004005)

Я не могу выясните, что здесь не так.

Answer 1

Первым шагом в решении вашей проблемы является просмотр точного характера параметров функции UpdateListItems.

=>http://msdn.microsoft.com/en-us/library/lists.lists.updatelistitems%28v=office.12%29.aspx

Как вы можете видеть: - Первый параметр должен быть строкой, содержащей имя вашего списка Sharepoint - Второй должен быть XMLNode компонента (а не просто строка).

Я не могу больше помочь, потому что я тоже немного застрял в этой проблеме (ошибка выполнения: выброшено SoapServerException). Но это все еще первый шаг;)