Serialisierung mit schema

[thomas (Gast)]

hi,
wenn ich folgende Klasse serialisiere:

Public Class clsFarbe
    Enum efarbe
        rot
        grün
        blau
    End Enum

    Private tmpFarbe As eFarbe = eFarbe.blau

    Public Property Farbe() As eFarbe
        Get
            Return tmpFarbe
        End Get
        Set(ByVal value As eFarbe)
            tmpFarbe = value
        End Set
    End Property
end class

dann erhalte ich folgende xml datei:

  <?xml version="1.0" encoding="utf-16" ?> 
- <clsFarbe xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance" xmlns:xsd="http://www.w3.org/2001/XMLSchema">
  <Farbe>blau</Farbe> 
  </clsFarbe>

Ich benötige aber auch das schema zu den elementen, also

<xsd:simpleType name="Farbe">
  <xsd:restriction base="xsd:string">
    <xsd:enumeration value="rot"/>
    <xsd:enumeration value="grün"/>
    <xsd:enumeration value="blau"/>
   </xsd:restriction>

ich möchte meiner Speicherklasse einfach die zu speichernde Klasse( das 
können die verschiedensten Klassen sein) übergeben und alle enums, 
datentypen und values sollen gespeichert werden.

Wie kann man sowas in VB2008 lösen?
Hat vieleicht einer eine Idee?


mfg Thomas