2012-02-29 74 views
0

我試圖在VBA中的SharePoint列表中創建一個新任務。 這裏是我使用的代碼:VBA UpdateListItems SharePoint Web服務

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)

我不能弄清楚這裏有什麼問題。在解決您的問題

+1

什麼是'URL'參數的值? – naivists 2012-02-29 17:39:12

回答

0

一個第一步是看UpdateListItems函數的參數的確切性質。

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

正如你可以看到: - 第一個參數必須是包含您的SharePoint列表 的名稱的字符串 - 第二個應該是組件的一個XmlNode(不只是一個String )。

我不能幫助更多的,因爲我還停留在這個問題有點遠(執行錯誤:SoapServerException被拋出)。 但是,這仍然是一個第一步;)