我正在处理soapweb服务调用的响应。当客户机对象中的方法尝试反序列化响应时,它什么都不是。
我已经设置了一个测试来模拟反序列化过程,但是仍然无法获取要填充到对象中的issucess和Message的值。
请帮助我确定缺少什么,这样反序列化过程将把xml完全反序列化到相应的对象中。合同代码是使用svcutil自动生成的。
编辑:我可以使用messageinspector根据需要操作xml,因此如果问题出在xml上,我只需要找出要更改的内容。
<System.CodeDom.Compiler.GeneratedCodeAttribute("svcutil", "4.0.30319.33440"),
System.SerializableAttribute(),
System.Diagnostics.DebuggerStepThroughAttribute(),
System.ComponentModel.DesignerCategoryAttribute("code"),
System.Xml.Serialization.XmlTypeAttribute(AnonymousType:=True, [Namespace]:="Green:EggsandHam.wsdll")>
Partial Public Class NumberResponse
Private isSuccessField As String
Private messageField As String
'''<remarks/>
<System.Xml.Serialization.XmlElementAttribute(Order:=0)>
Public Property IsSuccess() As String
Get
Return Me.isSuccessField
End Get
Set(value As String)
Me.isSuccessField = value
End Set
End Property
'''<remarks/>
<System.Xml.Serialization.XmlElementAttribute(Order:=1)>
Public Property Message() As String
Get
Return Me.messageField
End Get
Set(value As String)
Me.messageField = value
End Set
End Property
End Class
<System.Diagnostics.DebuggerStepThroughAttribute(),
System.CodeDom.Compiler.GeneratedCodeAttribute("System.ServiceModel", "4.0.0.0"),
System.ComponentModel.EditorBrowsableAttribute(System.ComponentModel.EditorBrowsableState.Advanced),
System.ServiceModel.MessageContractAttribute(IsWrapped:=False)>
Partial Public Class NumberResponse1
<System.ServiceModel.MessageBodyMemberAttribute([Namespace]:="Green:EggsandHam.wsdl", Order:=0)>
Public NumberResponse As NumberResponse
Public Sub New()
MyBase.New()
End Sub
Public Sub New(ByVal NumberResponse As NumberResponse)
MyBase.New()
Me.NumberResponse = NumberResponse
End Sub
End Class
测试:
Imports System.IO
Imports System.Text
Imports System.Xml.Serialization
Module Module1
Sub Main()
Dim u As New NumberResponse1()
u = Deserialize(Of NumberResponse1)(XElement.Load("C:\test\number.xml"))
Console.WriteLine(u.NumberResponse.Message)
End Sub
Public Function Deserialize(Of T)(ByVal xElement As XElement) As T
Using memoryStream As New MemoryStream(Encoding.ASCII.GetBytes(xElement.ToString()))
Dim xmlSerializer As New XmlSerializer(GetType(T))
Return xmlSerializer.Deserialize(memoryStream)
End Using
End Function
End Module
XML格式:
<?xml version="1.0" encoding="utf-8"?>
<NumberResponse1>
<NumberResponse>
<ns1:NumberResponse xmlns:ns1="Green:EggsandHam.wsdl">
<ns1:IsSuccess>true</ns1:IsSuccess>
<ns1:Message>number processed successfully.</ns1:Message>
</ns1:NumberResponse>
</NumberResponse>
</NumberResponse1>
输出: