utilisation de la librairie Msxml2.ServerXMLHTTP30

Bonjour ,

je suis confronté à l 'erreur suivante pourtant il me semble que j'utilise correctement les différentes méthodes pour appeler mon url , avez-vous une idée merci de votre aide ?

Mon erreur :

Citation:

---

la classe ne gère pas automation ou l'interface attendue 430

---

Mon code

Code:

---

1 2 3 4 5 6 7

Dim myMSXML As New Msxml2.ServerXMLHTTP30   URL = "https://monadresse.fr"   myMSXML.setProxy 2, "monproxy.fr:8080" myMSXML.Open "GET", URL, False myMSXML.setRequestHeader "Content-Type", "application/xml"

---

Pour récupérer le résultat de mon controle

Code:

---

1 2 3 4

Dim e_Civ As Msxml2.IXMLDOMElement Dim retourXML As New Msxml2.DOMDocument30 Dim noeud As Msxml2.IXMLDOMNode Dim noeudfils As Msxml2.IXMLDOMNode

---