Équivalence Php de HttpObj
Bonjour,
Je cherche s'il existe une façon de faire ce la en PHP
Code:
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 38 39 40 41 42 43
|
Dim xmlRequest
xmlRequest = " <?xml version=""1.0"" ?> " & _
"<eparcel> " & _
"<language> fr </language> " & _
"<ratesAndServicesRequest> " & _
" <merchantCPCID> CPC_DEMO_HTML </merchantCPCID> " & _
" <lineItems> " & _
" <item> " & _
" <quantity> 1 </quantity> " & _
" <weight> 1.5 </weight> " & _
" <length> 1 </length> " & _
" <width> 1 </width> " & _
" <height> 1 </height> " & _
" <description>Mon article type</description> " & _
" </item> " & _
" </lineItems> " & _
" <city> </city> " & _
" <provOrState> Wisconsin </provOrState> " & _
" <country> CANADA </country> " & _
" <postalCode> H3K1E5 </postalCode> " & _
"</ratesAndServicesRequest> " & _
"</eparcel>"
Set HttpObj = Server.CreateObject("AspHTTP.Conn")
HTTPObj.Url = "http://206.191.4.228:30000" ' Internet IP:
HTTPObj.PostData = xmlRequest
HTTPObj.RequestMethod = "POST"
strResult = HTTPObj.GetURL
errorFound = Instr(strResult, "ERROR_CODE")
If (errorFound>0) Then
' TÂCHE :
' Si le module CyberVente renvoie un code
' d'erreur, vous devez prendre les mesures
' nécessaires pour signaler le problème au
' consommateur (destination non valide, etc.)
End If |
Est-ce que quelqu'un peut m'aider ???
J'ai vérifier du coter fsockopen mais il doit y avoir quelques chose que je ne fais pas comme il faut. mais bon ce code que j'ai trouver en ASP semble tellement plus simple que la méthode en socket de PHP.
merci d'avance.