开发工具：
MyEclipse 8
Lotus Domino 8.5
SoapToolkit3.0
平台：
Windows
XFire1.2 (WebService)
1. 新建web工程
2. 用MyEclipse自动导入XFire包
3. 创建测试类
接口：IUserInfo.java
实现类：UserInfoImpl.java
4.代码：
-------------------------------
IUserInfo.java：
public interface IUserInfo {
public String example(String message);
}
-------------------------------
UserInfoImpl.java：
public class UserInfoImpl implements IUserInfo {
public String example(String message) {
message = "hello "+message;
System.out.println(message);
return message;
}
}
5. 让MyEclipse自动创建WebService Client
生成后类如图：
6. 测试WebService服务http://localhost:8080/XFireDemo91/services/UserInfo?wsdl，并另存为UserInfo.wsdl文件以备用。
7. domino中新建代理agtDemo：
Sub Initialize
On Error Goto errshanle
Dim s As New NotesSession
Dim doc As Notesdocument
Set doc = s.DocumentContext
Dim client As Variant
Set Client =CreateObject("MSSOAP.soapClient30")
Call Client.mssoapinit ("http://localhost:8080/XFireDemo91/services/UserInfo?wsdl")
Dim result As String
If Not Client Is nothing Then
result = Client.example("Saliner")
Else
result="no web"
End If
Print result
Exit Sub
errshanle:
Print "agtDemo Error " & Error$ " in Line " & Cstr(Erl)
End Sub
8. 安装SoapToolkit3.0
9. 执行此代理，输出hello Saliner成功！
版权声明：本文内容由互联网用户自发贡献，该文观点与技术仅代表作者本人。本站仅提供信息存储空间服务，不拥有所有权，不承担相关法律责任。如发现本站有涉嫌侵权/违法违规的内容， 请发送邮件至 [email protected] 举报，一经查实，本站将立刻删除。
