Webサービスを呼び出すためにSOAPを直接記述する問題

http://192.168.19.134/service/api.php?wsdl があります
フィードバックと追加という 2 つの単純な関数を作成しました
vb を使用して呼び出すときは、soap ツールキットを使用して簡単に呼び出すことができます

Dim ss As New SoapClient30 ss.MSSoapInit "http://192.168.19.134/service/api.php?wsdl"MsgBox ss.feedback("zzzz")MsgBox ss.Add(34, 56)

でも、xmlhttp の使い方を知りたいのですが、それを SOAP 経由で呼び出すにはどうすればよいでしょうか?

        url = "http://192.168.19.134/service/api.php?wsdl"        oXMLHttp.Open "POST", url, False        oXMLHttp.setRequestHeader "Content-Type", "text/xml; charset=utf-8"        oXMLHttp.setRequestHeader "Content-length", Len(URLEncode(postData))        oXMLHttp.setRequestHeader "Accept-Language", "zh-CN"        oXMLHttp.setRequestHeader "SOAPAction", "http://192.168.19.134/service/api.php?wsdl"        oXMLHttp.setRequestHeader "Host", "192.168.19.134"        oXMLHttp.Send URLEncode(postData)

postdata

        postData = "<?xml version=""1.0"" encoding=""utf-8""?>"        postData = postData & "<soap:Envelope xmlns:xsi=""http://www.w3.org/2001/XMLSchema-instance"" xmlns:xsd=""http://www.w3.org/2001/XMLSchema"" xmlns:soap=""http://schemas.xmlsoap.org/soap/envelope/"">"        postData = postData & "<soap:Body  xmlns:m=""http://192.168.19.134/service/api.php?wsdl"">"        postData = postData & "<m:add>"        postData = postData & "<m:aa>1</m:aa>"        postData = postData & "<m:bb>2</m:bb>"        postData = postData + "</m:add>"        postData = postData + "</soap:Body>"        postData = postData + "</soap:Envelope>"

このようなメッセージを送信すると、常に 500 エラーが表示されます。何が問題ですか?

ディスカッションへの返信（解決策）

兄さん。これはphpセクションのようです。 。

あなたの SOAP サーバーは get メソッドまたは post メソッドをサポートしていますか?

サポート

あなたの SOAP サーバーは get メソッドまたは post メソッドをサポートしていますか?