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
|