Navigation

Inscrivez-vous gratuitement
pour pouvoir participer, suivre les réponses en temps réel, voter pour les messages, poser vos propres questions et recevoir la newsletter

Macros et VBA Excel Discussion :

Erreur VBA Sharepoint UpdateWorkflow


Sujet :

Macros et VBA Excel

  1. #1
    Nouveau membre du Club
    Erreur VBA Sharepoint UpdateWorkflow
    Bonjour,

    Je viens vers vous car impossible de trouver la solution sur notre ami google depuis maintenant plusieurs jours.

    Pour faire simple j'ai un fichier Excel qui communique avec un SharePoint, jusqu'ici il marchait très bien sur Office 2010

    Notre service informatique nous migre sur Office 2013 et forcément le code ne fonctionne plus.

    Mon Bug viens de l'update du Workflow qui génère un web dossier sur le SharePoint.

    Quoi que je fasse, après le .Send, j'ai forcément ma condition d'erreur en fin de procédure qui s'enclenche.

    Code :Sélectionner tout -Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    6
    7
    8
    9
    10
    11
    12
    13
    14
    15
    16
    17
    18
    19
    20
    21
    22
    23
    24
    25
    26
    27
    28
    29
    30
    31
    32
    33
    34
    35
    36
    37
     
    Dim objXMLHTTP As MSXML2.XMLHTTP60
        Dim objNodesCollection As IXMLDOMSelection
        Dim strSoapBody As String
     
        Set objXMLHTTP = New MSXML2.XMLHTTP60
     
        objXMLHTTP.Open "POST", strSiteUrl, False
        objXMLHTTP.setRequestHeader "Content-Type", "text/xml; charset=""UTF-8"""
        objXMLHTTP.setRequestHeader "SOAPAction", "http://nintex.com/StartWorkflowOnListItem"
     
        strSoapBody = "<?xml version='1.0' encoding='utf-8' ?>" _
            & "<soap:Envelope xmlns<img src="images/smilies/icon_mad.gif" border="0" alt="" title=":x" class="inlineimg" />si='http://www.w3.org/2001/XMLSchema-instance' xmlns<img src="images/smilies/icon_mad.gif" border="0" alt="" title=":x" class="inlineimg" />sd='http://www.w3.org/2001/XMLSchema' xmlns:soap='http://schemas.xmlsoap.org/soap/envelope/'>" _
                    & "<soap:Body>" _
                        & "<StartWorkflowOnListItem xmlns='http://nintex.com'>" _
                            & "<itemId>" & strItemId & "</itemId>" _
                            & "<listName>" & strListId & "</listName>" _
                            & "<workflowName>" & strWorkflowName & "</workflowName>" _
                            & "<associationData>" & strWorkflowData & "</associationData>" _
                        & "</StartWorkflowOnListItem>" _
                    & "</soap:Body>" _
            & "</soap:Envelope>"
        'Debug.Print strSoapBody
     
        objXMLHTTP.send strSoapBody
     
        If objXMLHTTP.readyState = 4 Then
            If objXMLHTTP.Status = 200 Then
                'Debug.Print objXMLHTTP.responseText
                RunNintexWorkflowOnItem = True
            Else
                MsgBox "Erreur RunWorkflow :" & objXMLHTTP.Status & " - " & objXMLHTTP.statusText & " : \n" & objXMLHTTP.responseText
                RunNintexWorkflowOnItem = False
            End If
        End If
     
        Set objXMLHTTP = Nothing


    Je précise que cette procédure fonctionne parfaitement sur un Socle Office 2010

    Si quelqu'un à peut m’aiguiller sur le correctif ça serait le top !

    merci d'avance

    Peall13

  2. #2
    Responsable Access

    Bonjour,

    Quel est le status et le message d'erreur ?

  3. #3
    Nouveau membre du Club
    Bonjour Arkham46,

    Merci d'essayer de m'aider.

    Voilà tout ce je peux te donner comme info :

    Contenu des variables :

    strWorkflowData = "&lt;Data&gt;&lt;strIndice&gt;D&lt;/strIndice&gt;&lt;/Data&gt;".

    strWorkflowName= "NW-CreateUpdateDatapackDocSet".

    strItemId = N° Id de la ligne dans le SharePoint


    objXMLHTTP.Status = 500



    objXMLHTTP.statusText = Internal serveur error





    Code :Sélectionner tout -Visualiser dans une fenêtre à part
    Debug.Print objXMLHTTP.responseText




    <?xml version="1.0" encoding="utf-8"?><soap:Envelope xmlns:soap="http://schemas.xmlsoap.org/soap/envelope/" xmlns<img src="images/smilies/icon_mad.gif" border="0" alt="" title=":x" class="inlineimg" />si="http://www.w3.org/2001/XMLSchema-instance" xmlns<img src="images/smilies/icon_mad.gif" border="0" alt="" title=":x" class="inlineimg" />sd="http://www.w3.org/2001/XMLSchema"><soap:Body><soap:Fault><faultcode>soap:Server</faultcode><faultstring>Server was unable to process request. ---&gt; Attempted to perform an unauthorized operation.</faultstring><detail /></soap:Fault></soap


    Peall13

  4. #4
    Responsable Access

    Bonjour

    Ça ressemble plutôt à un problème de droits dans SharePoint.

    Je ne connais oas cette partie là....

###raw>template_hook.ano_emploi###