Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- <ServiceContract()> _
- Public Interface IServicevb
- <OperationContract()> _
- Function GetData(ByVal value As Integer) As String
- <OperationContract()> _
- Function GetDataUsingDataContract(ByVal composite As CompositeType) As CompositeType
- ' TÂCHE : ajoutez vos opérations de service ici
- <OperationContract()> _
- Function getRandomInt(ByVal Min As Integer, ByVal Max As Integer) As Integer
- <OperationContract()> _
- Function getSquare(ByVal i As Integer) As Integer
- End Interface
- ' Utilisez un contrat de données comme indiqué dans l’exemple ci-après pour ajouter les types composites aux opérations de service.
- <DataContract()> _
- Public Class CompositeType
- Private boolValueField As Boolean
- Private stringValueField As String
- Private versionValueField As String
- <DataMember()> _
- Public Property BoolValue() As Boolean
- Get
- Return Me.boolValueField
- End Get
- Set(ByVal value As Boolean)
- Me.boolValueField = value
- End Set
- End Property
- <DataMember()> _
- Public Property StringValue() As String
- Get
- Return Me.stringValueField
- End Get
- Set(ByVal value As String)
- Me.stringValueField = value
- End Set
- End Property
- <DataMember()> _
- Public Property VersionValue() As String
- Get
- Return Me.versionValueField
- End Get
- Set(ByVal value As String)
- Me.versionValueField = value
- End Set
- End Property
- End Class
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement