'------------------------------------------------------------------------------
'
' Dieser Code wurde von einem Tool generiert.
' Laufzeitversion:4.0.30319.42000
'
' Änderungen an dieser Datei können falsches Verhalten verursachen und gehen verloren, wenn
' der Code erneut generiert wird.
'
'------------------------------------------------------------------------------
Option Strict Off
Option Explicit On
Imports System.Xml.Serialization
Imports System.ComponentModel
Imports System.CodeDom.Compiler
'
'This source code was auto-generated by xsd, Version=4.6.1586.0.
'
'''
Partial Public Class LicenseSchema
Private modulesField() As LicenseModule
'''
Public Property Modules() As LicenseModule()
Get
Return Me.modulesField
End Get
Set
Me.modulesField = Value
End Set
End Property
End Class
'''
Partial Public Class LicenseModule
Private usersField() As LicenseModuleUser
Private nameField As String
Private validUntilField As Date
Private validUntilFieldSpecified As Boolean
'''
Public Property Users() As LicenseModuleUser()
Get
Return Me.usersField
End Get
Set
Me.usersField = Value
End Set
End Property
'''
Public Property Name() As String
Get
Return Me.nameField
End Get
Set
Me.nameField = Value
End Set
End Property
'''
Public Property ValidUntil() As Date
Get
Return Me.validUntilField
End Get
Set
Me.validUntilField = Value
End Set
End Property
'''
Public Property ValidUntilSpecified() As Boolean
Get
Return Me.validUntilFieldSpecified
End Get
Set
Me.validUntilFieldSpecified = Value
End Set
End Property
End Class
'''
Partial Public Class LicenseModuleUser
Private typeField As UserType
Private countField As String
Private testField As Boolean
Private validUntilField As Date
Private validUntilFieldSpecified As Boolean
Public Sub New()
MyBase.New
Me.testField = True
End Sub
'''
Public Property Type() As UserType
Get
Return Me.typeField
End Get
Set
Me.typeField = Value
End Set
End Property
'''
Public Property Count() As String
Get
Return Me.countField
End Get
Set
Me.countField = Value
End Set
End Property
'''
Public Property Test() As Boolean
Get
Return Me.testField
End Get
Set
Me.testField = Value
End Set
End Property
'''
Public Property ValidUntil() As Date
Get
Return Me.validUntilField
End Get
Set
Me.validUntilField = Value
End Set
End Property
'''
Public Property ValidUntilSpecified() As Boolean
Get
Return Me.validUntilFieldSpecified
End Get
Set
Me.validUntilFieldSpecified = Value
End Set
End Property
End Class
'''
Public Enum UserType
'''
PowerUser
'''
[ReadOnly]
'''
[WriteOnly]
'''
ReadWrite
End Enum