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(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(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(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(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
34 <System
.ServiceModel
.OperationContractAttribute(Action
:="http://Microsoft.ServiceModel.Samples/ICalculator/Sum", ReplyAction
:="http://Microsoft.ServiceModel.Samples/ICalculator/SumResponse")> _
35 Function Sum(ByVal request
As System
.ServiceModel
.Channels
.Message
) As System
.ServiceModel
.Channels
.Message
38 <System
.CodeDom
.Compiler
.GeneratedCodeAttribute("System.ServiceModel", "3.0.0.0")> _
39 Public Interface ICalculatorChannel
40 Inherits Microsoft
.ServiceModel
.Samples
.ICalculator
, System
.ServiceModel
.IClientChannel
43 <System
.Diagnostics
.DebuggerStepThroughAttribute(), _
44 System
.CodeDom
.Compiler
.GeneratedCodeAttribute("System.ServiceModel", "3.0.0.0")> _
45 Partial
Public Class CalculatorClient
46 Inherits System
.ServiceModel
.ClientBase(Of Microsoft
.ServiceModel
.Samples
.ICalculator
)
47 Implements Microsoft
.ServiceModel
.Samples
.ICalculator
53 Public Sub New(ByVal endpointConfigurationName
As String)
54 MyBase
.New(endpointConfigurationName
)
57 Public Sub New(ByVal endpointConfigurationName
As String, ByVal remoteAddress As String)
58 MyBase
.New(endpointConfigurationName
, remoteAddress)
61 Public Sub New(ByVal endpointConfigurationName
As String, ByVal remoteAddress As System.ServiceModel.EndpointAddress)
62 MyBase
.New(endpointConfigurationName
, remoteAddress)
65 Public Sub New(ByVal binding
As System
.ServiceModel
.Channels
.Binding
, ByVal remoteAddress As System.ServiceModel.EndpointAddress)
66 MyBase
.New(binding
, remoteAddress)
69 Public Function Add(ByVal n1
As Double, ByVal n2
As Double) As Double Implements Microsoft
.ServiceModel
.Samples
.ICalculator
.Add
70 Return MyBase
.Channel
.Add(n1
, n2
)
73 Public Function Subtract(ByVal n1
As Double, ByVal n2
As Double) As Double Implements Microsoft
.ServiceModel
.Samples
.ICalculator
.Subtract
74 Return MyBase
.Channel
.Subtract(n1
, n2
)
77 Public Function Multiply(ByVal n1
As Double, ByVal n2
As Double) As Double Implements Microsoft
.ServiceModel
.Samples
.ICalculator
.Multiply
78 Return MyBase
.Channel
.Multiply(n1
, n2
)
81 Public Function Divide(ByVal n1
As Double, ByVal n2
As Double) As Double Implements Microsoft
.ServiceModel
.Samples
.ICalculator
.Divide
82 Return MyBase
.Channel
.Divide(n1
, n2
)
85 Public Function Sum(ByVal request
As System
.ServiceModel
.Channels
.Message
) As System
.ServiceModel
.Channels
.Message Implements Microsoft
.ServiceModel
.Samples
.ICalculator
.Sum
86 Return MyBase
.Channel
.Sum(request
)