Php Soap服务器检索vb WinHttp.WinHttpRequest


Php Soap Server to retrieve vb WinHttp.WinHttpRequest

读者,您好。

我的任务是构建一个PHP SOAP服务器,以接收VB客户端通过WinHttp.WinHttpRequest对象发送的xml。我正在为php服务器使用nuSoap,直到现在它还没有工作。

vb客户端发送的xml包含定义的Web服务,这些服务需要与其他nessecary变量一起使用,这就是为什么在vb代码中没有植入soapaction内容的原因。他们想要这样:

soap服务器确实向vb发送了这样的响应:

<?xml version="1.0" encoding="ISO-8859-1"?><SOAP-ENV:Envelope SOAP-
ENV:encodingStyle="http://schemas.xmlsoap.org/soap/encoding/"
  xmlns:SOAP-ENV="http://schemas.xmlsoap.org/soap/envelope/"
  xmlns:xsd="http://www.w3.org/2001/XMLSchema"
  xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance"
  xmlns:SOAP-ENC="http://schemas.xmlsoap.org/soap/encoding/">
<SOAP-ENV:Body>
    <SOAP-ENV:Fault>
        <faultcode xsi:type="xsd:string">SOAP-ENV:Client</faultcode>
        <faultactor xsi:type="xsd:string"></faultactor>
        <faultstring xsi:type="xsd:string">Operation &apos;&apos; is not defined in the WSDL for this service</faultstring>
        <detail xsi:type="xsd:string"></detail>
    </SOAP-ENV:Fault>
</SOAP-ENV:Body>
</SOAP-ENV:Envelope>

发送xml:的vb客户端

Private Sub Command2_Click()
 mydata = "<?xml version=""1.0"" encoding=""UTF-8""?>" & vbCrLf
  mydata = mydata & "<root>" & vbCrLf
mydata = mydata & "<SERVICE>SayHello</SERVICE>" & vbCrLf
mydata = mydata & "<NAME>Noobula</NAME>" & vbCrLf
mydata = mydata & "</root>" & vbCrLf
  Set w = CreateObject("WinHttp.WinHttpRequest.5.1")
      w.Open "POST", "http://127.0.0.1:80/soapvb/terimaxml.php"
      w.SetRequestHeader "Content-Type", "application/x-www-form-urlencoded"
      w.Option(WinHttpRequestOption_SslErrorIgnoreFlags) = 13056
      w.Send mydata
      respo = w.ResponseText
      Text1 = respo
End Sub

最后,服务器本身:

require_once "lib/nusoap.php";
$debug = 0;
$server = new soap_server();
$server->configureWSDL('terimaxml', 'urn:terimaxml');
function SayHello($xml){
    //messing with xml taking NAME and say Olaa
    echo "Olaaa :D";
}
$server->register('SayHello()',
                    array('xml' =>'xsd:array'),
                   'urn: terimaxml',
                   'urn: terimaxml#__construct()',
                   'rpc',
                   'encoded',
                   '-----'
                );
$HTTP_RAW_POST_DATA = isset($HTTP_RAW_POST_DATA)
? $HTTP_RAW_POST_DATA : '';
$server->service($HTTP_RAW_POST_DATA);

为了解决这个问题,我在网上漫游了很长一段时间。如果有任何帮助,我们将不胜感激D

操作'apos;未在此服务的WSDL中定义

这是因为

$HTTP_RAW_POST_DATA : '';

该操作&apos意味着您使用xml禁止的撇号值将数据解析为xml。

并尝试用双引号(")更改所有撇号

$server->register("SayHello()",
                    array("xml" =>"xsd:array"),
                   "urn: terimaxml",
                   "urn: terimaxml#__construct()",
                   "rpc",
                   "encoded",
                   "-----"
                );

如果我错了,请纠正我。

^^

我不确定这里的代码是否是为了可读性而故意清理的,但我认为我看到了它的三个问题。

首先,->register中的函数名称不应包含()

$server->register("SayHello",
  array("xml" =>"xsd:array"),
  "urn: terimaxml",
  "urn: terimaxml#__construct()",
  "rpc",
  "encoded",
  "-----"
);

其次,我认为$HTTP_RAW_POST_DATA命名错误,因此您正在向函数发送一个空变量。

$HTTP_RAW_POST_DATA = isset($GLOBALS["HTTP_RAW_POST_DATA"]) ? 
$GLOBALS["HTTP_RAW_POST_DATA"] : "";

可选的第三,HTTP_RAW_POST_DATA被弃用,取而代之的是超全局数组$_POST

$server->service( http_build_query($_POST) );

我不确定,我两个月前才开始使用nusoap,但这些就是我的代码和你的代码之间的区别。一次尝试一个,看看它们是否有帮助。