请教一个WEB SERVICE的问题 ( 积分: 300 )

沙隆巴斯的主人 · 2005-08-18

WEB SERVICE服务器由JAVA实现（TOMCAT+AXIS）
在一个JWS中有两个方法：getName与getPhoneBook
整个文件如下所示
public class HelloClient
{
public String getName(String name)
{
return "hello "+name;
}
public PhoneBook getPhoneBook(){
PhoneBook result = new PhoneBook();
result.name = "0";
result.number = 0;
return result;
}
}
其中PhoneBook 的定义如下：
public class PhoneBook{
public String name;
public int number;
};
以上文件部署后通过浏览器可以访问到

-
<wsdl:definitions targetNamespace="http://xbw1:1977/axis/HelloClient.jws">
-

-
<wsdl:types>
-
<schema targetNamespace="http://DefaultNamespace">
<import namespace="http://schemas.xmlsoap.org/soap/encoding/"/>
-
<complexType name="PhoneBook">
-
<sequence>
<element name="name"
nillable="true"
type="xsd:string"/>
<element name="number"
type="xsd:int"/>
</sequence>
</complexType>
</schema>
</wsdl:types>
-
<wsdl:message name="getNameRequest">
<wsdl

art name="name"
type="xsd:string"/>
</wsdl:message>
<wsdl:message name="getPhoneBookRequest">
</wsdl:message>
-
<wsdl:message name="getPhoneBookResponse">
<wsdl

art name="getPhoneBookReturn"
type="tns1

honeBook"/>
</wsdl:message>
-
<wsdl:message name="getNameResponse">
<wsdl

art name="getNameReturn"
type="xsd:string"/>
</wsdl:message>
-
<wsdl

ortType name="HelloClient">
-
<wsdl

peration name="getPhoneBook">
<wsdl:input message="impl:getPhoneBookRequest"
name="getPhoneBookRequest"/>
<wsdl

utput message="impl:getPhoneBookResponse"
name="getPhoneBookResponse"/>
</wsdl

peration>
-
<wsdl

peration name="getName"
parameterOrder="name">
<wsdl:input message="impl:getNameRequest"
name="getNameRequest"/>
<wsdl

utput message="impl:getNameResponse"
name="getNameResponse"/>
</wsdl

peration>
</wsdl

ortType>
-
<wsdl:binding name="HelloClientSoapBinding"
type="impl:HelloClient">
<wsdlsoap:binding style="rpc"
transport="http://schemas.xmlsoap.org/soap/http"/>
-
<wsdl

peration name="getPhoneBook">
<wsdlsoap

peration soapAction=""/>
-
<wsdl:input name="getPhoneBookRequest">
<wsdlsoap:body encodingStyle="http://schemas.xmlsoap.org/soap/encoding/"
namespace="http://DefaultNamespace"
use="encoded"/>
</wsdl:input>
-
<wsdl

utput name="getPhoneBookResponse">
<wsdlsoap:body encodingStyle="http://schemas.xmlsoap.org/soap/encoding/"
namespace="http://xbw1:1977/axis/HelloClient.jws"
use="encoded"/>
</wsdl

utput>
</wsdl

peration>
-
<wsdl

peration name="getName">
<wsdlsoap

peration soapAction=""/>
-
<wsdl:input name="getNameRequest">
<wsdlsoap:body encodingStyle="http://schemas.xmlsoap.org/soap/encoding/"
namespace="http://DefaultNamespace"
use="encoded"/>
</wsdl:input>
-
<wsdl

utput name="getNameResponse">
<wsdlsoap:body encodingStyle="http://schemas.xmlsoap.org/soap/encoding/"
namespace="http://xbw1:1977/axis/HelloClient.jws"
use="encoded"/>
</wsdl

utput>
</wsdl

peration>
</wsdl:binding>
-
<wsdl:service name="HelloClientService">
-
<wsdl

ort binding="impl:HelloClientSoapBinding"
name="HelloClient">
<wsdlsoap:address location="http://xbw1:1977/axis/HelloClient.jws"/>
</wsdl

ort>
</wsdl:service>
</wsdl:definitions>

沙隆巴斯的主人 · 2005-08-18

WEB SERVICE服务器由JAVA实现（TOMCAT+AXIS）
在一个JWS中有两个方法：getName与getPhoneBook
整个文件如下所示
public class HelloClient
{
public String getName(String name)
{
return "hello "+name;
}
public PhoneBook getPhoneBook(){
PhoneBook result = new PhoneBook();
result.name = "0";
result.number = 0;
return result;
}
}
其中PhoneBook 的定义如下：
public class PhoneBook{
public String name;
public int number;
};
以上文件部署后通过浏览器可以访问到

-
<wsdl:definitions targetNamespace="http://xbw1:1977/axis/HelloClient.jws">
-

-
<wsdl:types>
-
<schema targetNamespace="http://DefaultNamespace">
<import namespace="http://schemas.xmlsoap.org/soap/encoding/"/>
-
<complexType name="PhoneBook">
-
<sequence>
<element name="name"
nillable="true"
type="xsd:string"/>
<element name="number"
type="xsd:int"/>
</sequence>
</complexType>
</schema>
</wsdl:types>
-
<wsdl:message name="getNameRequest">
<wsdl

art name="name"
type="xsd:string"/>
</wsdl:message>
<wsdl:message name="getPhoneBookRequest">
</wsdl:message>
-
<wsdl:message name="getPhoneBookResponse">
<wsdl

art name="getPhoneBookReturn"
type="tns1

honeBook"/>
</wsdl:message>
-
<wsdl:message name="getNameResponse">
<wsdl

art name="getNameReturn"
type="xsd:string"/>
</wsdl:message>
-
<wsdl

ortType name="HelloClient">
-
<wsdl

peration name="getPhoneBook">
<wsdl:input message="impl:getPhoneBookRequest"
name="getPhoneBookRequest"/>
<wsdl

utput message="impl:getPhoneBookResponse"
name="getPhoneBookResponse"/>
</wsdl

peration>
-
<wsdl

peration name="getName"
parameterOrder="name">
<wsdl:input message="impl:getNameRequest"
name="getNameRequest"/>
<wsdl

utput message="impl:getNameResponse"
name="getNameResponse"/>
</wsdl

peration>
</wsdl

ortType>
-
<wsdl:binding name="HelloClientSoapBinding"
type="impl:HelloClient">
<wsdlsoap:binding style="rpc"
transport="http://schemas.xmlsoap.org/soap/http"/>
-
<wsdl

peration name="getPhoneBook">
<wsdlsoap

peration soapAction=""/>
-
<wsdl:input name="getPhoneBookRequest">
<wsdlsoap:body encodingStyle="http://schemas.xmlsoap.org/soap/encoding/"
namespace="http://DefaultNamespace"
use="encoded"/>
</wsdl:input>
-
<wsdl

utput name="getPhoneBookResponse">
<wsdlsoap:body encodingStyle="http://schemas.xmlsoap.org/soap/encoding/"
namespace="http://xbw1:1977/axis/HelloClient.jws"
use="encoded"/>
</wsdl

utput>
</wsdl

peration>
-
<wsdl

peration name="getName">
<wsdlsoap

peration soapAction=""/>
-
<wsdl:input name="getNameRequest">
<wsdlsoap:body encodingStyle="http://schemas.xmlsoap.org/soap/encoding/"
namespace="http://DefaultNamespace"
use="encoded"/>
</wsdl:input>
-
<wsdl

utput name="getNameResponse">
<wsdlsoap:body encodingStyle="http://schemas.xmlsoap.org/soap/encoding/"
namespace="http://xbw1:1977/axis/HelloClient.jws"
use="encoded"/>
</wsdl

utput>
</wsdl

peration>
</wsdl:binding>
-
<wsdl:service name="HelloClientService">
-
<wsdl

ort binding="impl:HelloClientSoapBinding"
name="HelloClient">
<wsdlsoap:address location="http://xbw1:1977/axis/HelloClient.jws"/>
</wsdl

ort>
</wsdl:service>
</wsdl:definitions>

沙隆巴斯的主人 · 2005-08-18

然后在 Delphi2005中导入次WSDL，得到
// ************************************************************************ //
// The types declared in this file were generated from data read from the
// WSDL File described below:
// WSDL : http://xbw1:1977/axis/HelloClient.jws?wsdl
// Encoding : UTF-8
// Version : 1.0
// (2005-8-18 23:13:38 - 1.33.2.5)
// ************************************************************************ //
unit HelloClient1;
interface
uses InvokeRegistry, SOAPHTTPClient, Types, XSBuiltIns;
type
// ************************************************************************ //
// The following types, referred to in the WSDLdo
cument are not being represented
// in this file. They are either aliases[@] of other types represented or were referred
// to but never[!] declared in thedo
cument. The types from the latter category
// typically map to predefined/known XML or Borland types;
however, they could also
// indicate incorrect WSDLdo
cuments that failed to declare or import a schema type.
// ************************************************************************ //
// !:string - "http://www.w3.org/2001/XMLSchema"
// !:int - "http://www.w3.org/2001/XMLSchema"
PhoneBook = class;
{ "http://DefaultNamespace"
}

// ************************************************************************ //
// Namespace : http://DefaultNamespace
// ************************************************************************ //
PhoneBook = class(TRemotable)
private
Fname: WideString;
Fnumber: Integer;
published
property name: WideString read Fname write Fname;
property number: Integer read Fnumber write Fnumber;
end;

// ************************************************************************ //
// Namespace : http://DefaultNamespace
// transport : http://schemas.xmlsoap.org/soap/http
// style : rpc
// binding : HelloClientSoapBinding
// service : HelloClientService
// port : HelloClient
// URL : http://xbw1:1977/axis/HelloClient.jws
// ************************************************************************ //
HelloClient = interface(IInvokable)
['{9C1A956D-90D0-8EE9-4A40-F80E9AE12639}']
function getPhoneBook: PhoneBook;
stdcall;
function getName(const name: WideString): WideString;
stdcall;
end;

function GetHelloClient(UseWSDL: Boolean=System.False;
Addr: string='';
HTTPRIO: THTTPRIO = nil): HelloClient;

implementation
function GetHelloClient(UseWSDL: Boolean;
Addr: string;
HTTPRIO: THTTPRIO): HelloClient;
const
defWSDL = 'http://xbw1:1977/axis/HelloClient.jws?wsdl';
defURL = 'http://xbw1:1977/axis/HelloClient.jws';
defSvc = 'HelloClientService';
defPrt = 'HelloClient';
var
RIO: THTTPRIO;
begin
Result := nil;
if (Addr = '') then
begin
if UseWSDL then
Addr := defWSDL
else
Addr := defURL;
end;
if HTTPRIO = nil then
RIO := THTTPRIO.Create(nil)
else
RIO := HTTPRIO;
try
Result := (RIO as HelloClient);
if UseWSDL then
begin
RIO.WSDLLocation := Addr;
RIO.Service := defSvc;
RIO.Port := defPrt;
end else
RIO.URL := Addr;
finally
if (Result = nil) and (HTTPRIO = nil) then
RIO.Free;
end;
end;

initialization
InvRegistry.RegisterInterface(TypeInfo(HelloClient), 'http://DefaultNamespace', 'UTF-8');
InvRegistry.RegisterDefaultSOAPAction(TypeInfo(HelloClient), '');
RemClassRegistry.RegisterXSClass(PhoneBook, 'http://DefaultNamespace', 'PhoneBook');
end.

沙隆巴斯的主人 · 2005-08-18

以上的步骤都非常正常，完全符合预期
在DELPHI中调用getName方法，结果也很正确
但调用getPhoneBook方法，出现EDOMParseError with message 'XMLdo
cument must have a top level element'

沙隆巴斯的主人 · 2005-08-18

根据上面的情况，初步判断是DELPHI对收到的WEB SERVICE回应的解析出现了问题。关键应该是在对：
PhoneBook = class(TRemotable)
private
Fname: WideString;
Fnumber: Integer;
published
property name: WideString read Fname write Fname;
property number: Integer read Fnumber write Fnumber;
end;

此对象的解析上。

沙隆巴斯的主人 · 2005-08-18

我想请教各位DFW关于此问题的解决方法。
前提是体系结构不能改。后台是：
数据库：ORACLE
业务层：Ｊ２ＥＥ的ＥＪＢ，主要是实体ＢＥＡＮ与ＳＥＳＳＩＯＮ　ＢＥＡＮ
边界层：TOMCAT + AXIS实现WEB SERVICE　
前台：还是希望通过DELPHI实现
现在在“边界层”与“前台”间遇到了障碍，请各位不吝赐教。

zbird · 2005-08-19

public class PhoneBook{
public String name;
public int number;
};
换成这个试试：
public class PhoneBook{
private String name;
private int number;
public getxxx() {
}
pubic setxxx(xx) {
}
};

沙隆巴斯的主人 · 2005-08-19

先多谢zbird。
尝试过把PhoneBook按照JAVA BEAN的形式来写，但解决不了问题。
其实WS的服务端已经正常返回了结果，但客户端没有能够正确解析。

zbird · 2005-08-19

可能和JDK或TOMCAT的版本有关系。
以前出过类似的问题。
当时客户端用tomcat5.5+jdk1.5无法调用成功。
换回jdk1.4+tomcat4.1调用成功。

沙隆巴斯的主人 · 2005-08-19

to zbird:
正在尝试jdk1.4+tomcat4.1
另外，AXIS有版本要求吗
你在DELPHI客户端做了什么设置吗？我一直是直接调用的GetHelloClient.getPhoneBook.name ，而没有用任何THTTPRIO之类的控件

沙隆巴斯的主人 · 2005-08-19

to zbird:
换成 jdk1.4+tomcat4.1，问题依然

yzxcsw · 2005-08-19

根据出错提示，应该是xml文件没有根节点，你设置根节点了吗？

沙隆巴斯的主人 · 2005-08-19

to yzxcsw:
怎么设置根节点？

沙隆巴斯的主人 · 2005-08-20

问题解决了。
我最初的判断“DELPHI对收到的WEB SERVICE回应的解析出现了问题”，这个判断是错误的。问题出在JAVA端。
在WS中返回的自定义对象，按照规则，需要符合JavaBean规范，并且实现了Serializable接口。这个Serializable接口是关键，因为OBJECT 到 XML的转化是需要序列化的。然后就是在发布WS的配置文件中加入beanMapping元素。
通过JAVA端的这两处修改，DELPHI就可以完全正常的使用自定义对象了。

沙隆巴斯的主人 · 2005-08-21

谢谢zbird的意见，也谢谢yzxcsw的参与。

请教一个WEB SERVICE的问题 ( 积分: 300 )

沙隆巴斯的主人

Unregistered / Unconfirmed

沙隆巴斯的主人

Unregistered / Unconfirmed

沙隆巴斯的主人

Unregistered / Unconfirmed

沙隆巴斯的主人

Unregistered / Unconfirmed

沙隆巴斯的主人

Unregistered / Unconfirmed

沙隆巴斯的主人

Unregistered / Unconfirmed

zbird

Unregistered / Unconfirmed

沙隆巴斯的主人

Unregistered / Unconfirmed

zbird

Unregistered / Unconfirmed

沙隆巴斯的主人

Unregistered / Unconfirmed

沙隆巴斯的主人

Unregistered / Unconfirmed

yzxcsw

Unregistered / Unconfirmed

沙隆巴斯的主人

Unregistered / Unconfirmed

沙隆巴斯的主人

Unregistered / Unconfirmed

沙隆巴斯的主人

Unregistered / Unconfirmed

Similar threads