1
'------------------------------------------------------------------------------
3 ' This code was generated by a tool.
4 ' Runtime Version:2.0.50727.42
6 ' Changes to this file may cause incorrect behavior and will be lost if
7 ' the code is regenerated.
9 '------------------------------------------------------------------------------
16 Namespace Microsoft
.ServiceModel
.Samples
18 <System
.CodeDom
.Compiler
.GeneratedCodeAttribute("System.ServiceModel", "3.0.0.0"), _
19 System
.ServiceModel
.ServiceContractAttribute([Namespace
]:="http://Microsoft.ServiceModel.Samples", ConfigurationName
:="Microsoft.ServiceModel.Samples.ICalculator")> _
20 Public Interface ICalculator
22 <System
.ServiceModel
.OperationContractAttribute(ProtectionLevel
:=System
.Net
.Security
.ProtectionLevel
.EncryptAndSign
, Action
:="http://Microsoft.ServiceModel.Samples/ICalculator/Add", ReplyAction
:="http://Microsoft.ServiceModel.Samples/ICalculator/AddResponse")> _
23 Function Add(ByVal n1
As Double, ByVal n2
As Double) As Double
25 <System
.ServiceModel
.OperationContractAttribute(ProtectionLevel
:=System
.Net
.Security
.ProtectionLevel
.EncryptAndSign
, Action
:="http://Microsoft.ServiceModel.Samples/ICalculator/Subtract", ReplyAction
:="http://Microsoft.ServiceModel.Samples/ICalculator/SubtractResponse")> _
26 Function Subtract(ByVal n1
As Double, ByVal n2
As Double) As Double
28 <System
.ServiceModel
.OperationContractAttribute(ProtectionLevel
:=System
.Net
.Security
.ProtectionLevel
.EncryptAndSign
, Action
:="http://Microsoft.ServiceModel.Samples/ICalculator/Multiply", ReplyAction
:="http://Microsoft.ServiceModel.Samples/ICalculator/MultiplyResponse")> _
29 Function Multiply(ByVal n1
As Double, ByVal n2
As Double) As Double
31 <System
.ServiceModel
.OperationContractAttribute(ProtectionLevel
:=System
.Net
.Security
.ProtectionLevel
.EncryptAndSign
, Action
:="http://Microsoft.ServiceModel.Samples/ICalculator/Divide", ReplyAction
:="http://Microsoft.ServiceModel.Samples/ICalculator/DivideResponse")> _
32 Function Divide(ByVal n1
As Double, ByVal n2
As Double) As Double
35 <System
.CodeDom
.Compiler
.GeneratedCodeAttribute("System.ServiceModel", "3.0.0.0")> _
36 Public Interface ICalculatorChannel
37 Inherits Microsoft
.ServiceModel
.Samples
.ICalculator
, System
.ServiceModel
.IClientChannel
40 <System
.Diagnostics
.DebuggerStepThroughAttribute(), _
41 System
.CodeDom
.Compiler
.GeneratedCodeAttribute("System.ServiceModel", "3.0.0.0")> _
42 Partial
Public Class CalculatorClient
43 Inherits System
.ServiceModel
.ClientBase(Of Microsoft
.ServiceModel
.Samples
.ICalculator
)
44 Implements Microsoft
.ServiceModel
.Samples
.ICalculator
50 Public Sub New(ByVal endpointConfigurationName
As String)
51 MyBase
.New(endpointConfigurationName
)
54 Public Sub New(ByVal endpointConfigurationName
As String, ByVal remoteAddress As String)
55 MyBase
.New(endpointConfigurationName
, remoteAddress)
58 Public Sub New(ByVal endpointConfigurationName
As String, ByVal remoteAddress As System.ServiceModel.EndpointAddress)
59 MyBase
.New(endpointConfigurationName
, remoteAddress)
62 Public Sub New(ByVal binding
As System
.ServiceModel
.Channels
.Binding
, ByVal remoteAddress As System.ServiceModel.EndpointAddress)
63 MyBase
.New(binding
, remoteAddress)
66 Public Function Add(ByVal n1
As Double, ByVal n2
As Double) As Double Implements Microsoft
.ServiceModel
.Samples
.ICalculator
.Add
67 Return MyBase
.Channel
.Add(n1
, n2
)
70 Public Function Subtract(ByVal n1
As Double, ByVal n2
As Double) As Double Implements Microsoft
.ServiceModel
.Samples
.ICalculator
.Subtract
71 Return MyBase
.Channel
.Subtract(n1
, n2
)
74 Public Function Multiply(ByVal n1
As Double, ByVal n2
As Double) As Double Implements Microsoft
.ServiceModel
.Samples
.ICalculator
.Multiply
75 Return MyBase
.Channel
.Multiply(n1
, n2
)
78 Public Function Divide(ByVal n1
As Double, ByVal n2
As Double) As Double Implements Microsoft
.ServiceModel
.Samples
.ICalculator
.Divide
79 Return MyBase
.Channel
.Divide(n1
, n2
)