[学习日记]对SOAP请求的头添加内容的方法

2022-05-04 03:05:43

方法主要是利用类的继承
继承WEB服务的代理类，然后添加新的方法，实现对SOAP请求信封的头内添加信息。

以下是生成的继类的代码，继承类的名为GetHttpHeadersProxy.vb

Imports System.Net
[学习日记]对SOAP请求的头添加内容的方法

Imports System.Collections.Specialized
[学习日记]对SOAP请求的头添加内容的方法

Public Class GetHttpHeadersProxy
[学习日记]对SOAP请求的头添加内容的方法

Inherits getheaders.header
[学习日记]对SOAP请求的头添加内容的方法

Private headerstoadd As NameValueCollection
[学习日记]对SOAP请求的头添加内容的方法

Public Sub New()
[学习日记]对SOAP请求的头添加内容的方法

headerstoadd = New NameValueCollection
[学习日记]对SOAP请求的头添加内容的方法

End Sub

Public Sub addhttpheader(ByVal headername As String, ByVal headervalue As String)
[学习日记]对SOAP请求的头添加内容的方法

headerstoadd.Add(headername, headervalue)
[学习日记]对SOAP请求的头添加内容的方法

End Sub

Protected Overrides Function GetWebRequest(ByVal uri As Uri) As WebRequest
[学习日记]对SOAP请求的头添加内容的方法

Dim request As WebRequest
[学习日记]对SOAP请求的头添加内容的方法

request = MyBase.GetWebRequest(uri)
[学习日记]对SOAP请求的头添加内容的方法

request.Headers.Add(headerstoadd)
[学习日记]对SOAP请求的头添加内容的方法

Return request
[学习日记]对SOAP请求的头添加内容的方法

End Function
[学习日记]对SOAP请求的头添加内容的方法

End Class

其中用绿色底高亮显示的地方为对WEB服务生成的引用类

在使用时如下方法

dim proxy as GetHttpHeadersProxy=new GetHttpHeadersProxy
[学习日记]对SOAP请求的头添加内容的方法

proxy.AddHttpHeader("name","aowind")
[学习日记]对SOAP请求的头添加内容的方法

proxy.AddHttpHeader("sex","man")
[学习日记]对SOAP请求的头添加内容的方法

这样就可以在SOAP请求的头里加上所需要的值了。

码农公寓