客户端调用第三方remoting 服务程序的n中方式,VB.NET 晚期邦定还真方便
2004-11-12 09:23
555 查看
写一个简单的Remoting 服务程序,HelloWorld:)
类函数:
Public Class SimpleObjectClass SimpleObject
Inherits System.MarshalByRefObject
Public Function HelloWorld()Function HelloWorld(ByVal message As String) As String
Return "Hello World" & message
End Function
End Class
host 程序代码
Imports System.Runtime.Remoting.Channels
Imports System.Runtime.Remoting.RemotingConfiguration
Public Class HostClass Host
Public Shared Sub Main()Sub Main()
Dim channel As New Http.HttpServerChannel(6363)
ChannelServices.RegisterChannel(channel)
RegisterWellKnownServiceType(GetType(ObjectLib.SimpleObject), "simpleobject", Runtime.Remoting.WellKnownObjectMode.SingleCall)
Console.WriteLine("started ok")
Console.ReadLine()
End Sub
End Class
下面讨论几种调用方式
1.可客户端不支持或者没有安装.NET Framework 的情况。
本质上remoting 服务端和客户端走的是Soap协议,对于简单的方法。只要客户端能支持Soap就可以了。微软提供了一个soaptoolkit ,比如在vb6 中调用我的remoting 服务。
Dim o As New SoapClient30
o.MSSoapInit "http://Server:6363/simpleobject?wsdl"
MsgBox o.HelloWorld("montaque")
2. 在vb.net 中调用remoting 服务。通过bindingtomoniker
Dim o As Object = System.Runtime.InteropServices.Marshal.BindToMoniker("soap:wsdl=http://localhost:6363/simpleobject?wsdl")
MsgBox(o.helloworld("asdf")) 当然要设置option explicit off
上述代码好像无法翻译成C#
3。常规的方式,忽略。。。
类函数:
Public Class SimpleObjectClass SimpleObject
Inherits System.MarshalByRefObject
Public Function HelloWorld()Function HelloWorld(ByVal message As String) As String
Return "Hello World" & message
End Function
End Class
host 程序代码
Imports System.Runtime.Remoting.Channels
Imports System.Runtime.Remoting.RemotingConfiguration
Public Class HostClass Host
Public Shared Sub Main()Sub Main()
Dim channel As New Http.HttpServerChannel(6363)
ChannelServices.RegisterChannel(channel)
RegisterWellKnownServiceType(GetType(ObjectLib.SimpleObject), "simpleobject", Runtime.Remoting.WellKnownObjectMode.SingleCall)
Console.WriteLine("started ok")
Console.ReadLine()
End Sub
End Class
下面讨论几种调用方式
1.可客户端不支持或者没有安装.NET Framework 的情况。
本质上remoting 服务端和客户端走的是Soap协议,对于简单的方法。只要客户端能支持Soap就可以了。微软提供了一个soaptoolkit ,比如在vb6 中调用我的remoting 服务。
Dim o As New SoapClient30
o.MSSoapInit "http://Server:6363/simpleobject?wsdl"
MsgBox o.HelloWorld("montaque")
2. 在vb.net 中调用remoting 服务。通过bindingtomoniker
Dim o As Object = System.Runtime.InteropServices.Marshal.BindToMoniker("soap:wsdl=http://localhost:6363/simpleobject?wsdl")
MsgBox(o.helloworld("asdf")) 当然要设置option explicit off
上述代码好像无法翻译成C#
3。常规的方式,忽略。。。
相关文章推荐
- 客户端调用第三方remoting 服务程序的n中方式,VB.NET 晚期邦定还真方便
- 客户端调用第三方remoting 服务程序的n中方式,VB.NET 晚期邦定还真方便
- .NET Remoting Basic(4)-客户端调用方式
- [VB.NET]VB.net有窗体程序如何以系统服务方式运行?
- 使用ASP.NET AJAX异步调用Web Service和页面中的类方法(10):服务器端和客户端数据类型的自动转换:以XML方式序列化数据、小结
- 以Windows服务方式运行ASP.NET Core程序【转载】
- webservice的发布技术不同,客户端调用程序也不一样,从发布的wsdl文档,怎么判断webservice是哪种方式发布的?
- wcf第三方客户端与wcf服务之间调用入门
- python服务程序(调用摄像头查看视频和识别二维码)+ Android 客户端程序
- vb.net 两种方式调用存储过程的总结
- 使用ASP.NET AJAX异步调用Web Service和页面中的类方法(10):服务器端和客户端数据类型的自动转换:以XML方式序列化数据、小结
- Remoting客户端和服务端两种方式的调用总结
- VB.NET 调用外部程序
- asp.net网页调用客户端程序
- [笔记-架构探险]web服务框架-cxf-4.1.多种方式的发布与客户端调用
- CXF3.0.4客户端调用Web service来获取服务的三种方式
- 如何使用来自 ASP.NET 的客户端证书调用 Web 服务
- [VB.NET]点net写client程序传递参数给mssql存储过程insert,为什么要反复执行客户端代码才能成功insert,怎么才能使客户端插入记录操作变得稳定呢?
- WCF分布式开发常见错误(3):客户端调用服务出错:You have tried to create a channel to a service that does not support .Net Framing
- HTTP请求中的Body构建——.NET客户端调用JAVA服务进行文件上传