Mega Code Archive

 
Categories / VB.Net Tutorial / XML
 

SoapAttributeAttribute is used to override the serialization of a field

Imports System Imports System.IO Imports System.Xml Imports System.Xml.Serialization Public Class Group    <SoapAttribute (Namespace: = "http://www.yourHost.com")> Public GroupName As String  End Class public class Run    Public Shared Sub Main()       Dim mySoapAttributeOverrides As SoapAttributeOverrides = New SoapAttributeOverrides()       Dim mySoapAttributes As SoapAttributes = New SoapAttributes()       Dim mySoapAttribute As SoapAttributeAttribute = New SoapAttributeAttribute()       mySoapAttribute.AttributeName = "TeamName"       mySoapAttribute.Namespace = "http://www.yourhost.com"       mySoapAttributes.SoapAttribute = mySoapAttribute       mySoapAttributeOverrides.Add(GetType(Group), "GroupName" ,mySoapAttributes)            Dim myMapping  As XmlTypeMapping = (new SoapReflectionImporter(mySoapAttributeOverrides)).ImportTypeMapping(GetType(Group))            Dim overRideSerializer As XmlSerializer = new XmlSerializer(myMapping)       Dim writer As TextWriter = new StreamWriter("SoapOveride.xml")       Dim myGroup As Group = new Group()       myGroup.GroupName = ".NET"       overRideSerializer.Serialize(writer, myGroup)       writer.Close()    End Sub End Class