Hi, i call web services like that :
Work if i call WebServices on my PC but not if i call this webservices on my serveur...?
Do you know if my syntax "soap 1.2" could be the cause of my probleme?
B4X:
Dim URL As String
URL = "http://"& Main.gsServeurWebServices & "/WebServices/Mobiv.asmx"
Dim XML As String
XML = ""
XML = XML & "<?xml version='1.0' encoding='utf-8'?>"
XML = XML & "<soap12:Envelope xmlns:xsi='http://www.w3.org/2001/XMLSchema-instance' xmlns:xsd='http://www.w3.org/2001/XMLSchema' xmlns:soap12='http://www.w3.org/2003/05/soap-envelope'>"
XML = XML & "<soap12:Body>"
XML = XML & "<GetReferences xmlns='http://" & Main.gsServeurWebServices & "/WebServices/Mobiv'>"
XML = XML & "<Nom>" & txb_Nom.text.ToUpperCase & "</Nom>"
XML = XML & "<Rue>" & txb_Rue.text.ToUpperCase & "</Rue>"
XML = XML & "<CP>" & txb_CodePostal.text.ToUpperCase & "</CP>"
XML = XML & "<Ville>" & txb_Ville.text.ToUpperCase & "</Ville>"
XML = XML & "<Produit>" & MobivAndroid.GetCodeCombo(cbo_Produit,lst_Produit).ToUpperCase & "</Produit>"
If rb_Reference.Checked = True Then
XML = XML & "<TypeRecherche>R</TypeRecherche>"
Else
XML = XML & "<TypeRecherche>C</TypeRecherche>"
End If
XML = XML & "</GetReferences>"
XML = XML & "</soap12:Body>"
XML = XML & "</soap12:Envelope>"
XML = XML.Replace("'", Chr(34))
Dim request As HttpRequest
request.InitializePost2(URL, XML.GetBytes("UTF8"))
request.SetHeader("Content-Type", "application/soap+xml; charset=utf-8")
request.Timeout = 10000
If HttpClient1.Execute(request, 1) = False Then Return
ProgressDialogShow("Recherche en cour...")
Work if i call WebServices on my PC but not if i call this webservices on my serveur...?
Do you know if my syntax "soap 1.2" could be the cause of my probleme?