added samples
[windows-sources.git] / sdk / samples / WCFSamples / TechnologySamples / Basic / Contract / Message / XmlReader / VB / client / generatedClient.vb
blobc989b20d6d178bb71b4075e085d1551cbc07c254
1 '------------------------------------------------------------------------------
2 ' <auto-generated>
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.
8 ' </auto-generated>
9 '------------------------------------------------------------------------------
11 Option Strict Off
12 Option Explicit On
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
36 End Interface
38 <System.CodeDom.Compiler.GeneratedCodeAttribute("System.ServiceModel", "3.0.0.0")> _
39 Public Interface ICalculatorChannel
40 Inherits Microsoft.ServiceModel.Samples.ICalculator, System.ServiceModel.IClientChannel
41 End Interface
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
49 Public Sub New()
50 MyBase.New()
51 End Sub
53 Public Sub New(ByVal endpointConfigurationName As String)
54 MyBase.New(endpointConfigurationName)
55 End Sub
57 Public Sub New(ByVal endpointConfigurationName As String, ByVal remoteAddress As String)
58 MyBase.New(endpointConfigurationName, remoteAddress)
59 End Sub
61 Public Sub New(ByVal endpointConfigurationName As String, ByVal remoteAddress As System.ServiceModel.EndpointAddress)
62 MyBase.New(endpointConfigurationName, remoteAddress)
63 End Sub
65 Public Sub New(ByVal binding As System.ServiceModel.Channels.Binding, ByVal remoteAddress As System.ServiceModel.EndpointAddress)
66 MyBase.New(binding, remoteAddress)
67 End Sub
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)
71 End Function
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)
75 End Function
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)
79 End Function
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)
83 End Function
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)
87 End Function
88 End Class
89 End Namespace