本文整理匯總了VB.NET中System.Web.Services.Description.Operation類的典型用法代碼示例。如果您正苦於以下問題：VB.NET Operation類的具體用法？VB.NET Operation怎麽用？VB.NET Operation使用的例子？那麽, 這裏精選的類代碼示例或許可以為您提供幫助。
在下文中一共展示了Operation類的1個代碼示例，這些例子默認根據受歡迎程度排序。您可以為喜歡或者感覺有用的代碼點讚，您的評價將有助於係統推薦出更棒的VB.NET代碼示例。
示例1: MyOperationClass
' 導入命名空間
Imports System.Web.Services.Description
Imports System.Collections
Imports System.Xml
Class MyOperationClass
Public Shared Sub Main()
Dim myDescription As ServiceDescription = ServiceDescription.Read("Operation_5_Input_VB.wsdl")
' Create a 'PortType' object.
Dim myPortType As New PortType()
myPortType.Name = "OperationServiceHttpPost"
Dim myOperation As Operation = CreateOperation("AddNumbers", "s0:AddNumbersHttpPostIn", _
"s0:AddNumbersHttpPostOut")
myPortType.Operations.Add(myOperation)
' Get the PortType of the Operation.
Dim myPort As PortType = myOperation.PortType
Console.WriteLine( _
"The port type of the operation is: " & myPort.Name)
' Add the 'PortType's to 'PortTypeCollection' of 'ServiceDescription'.
myDescription.PortTypes.Add(myPortType)
' Write the 'ServiceDescription' as a WSDL file.
myDescription.Write("Operation_5_Output_VB.wsdl")
Console.WriteLine("WSDL file with name 'Operation_5_Output_VB.wsdl'" + _
"file created Successfully")
End Sub
Public Shared Function CreateOperation(myOperationName As String, myInputMesg As String, _
myOutputMesg As String) As Operation
' Create an Operation.
Dim myOperation As New Operation()
myOperation.Name = myOperationName
Dim myInput As OperationMessage = _
CType(New OperationInput(), OperationMessage)
myInput.Message = New XmlQualifiedName(myInputMesg)
Dim myOutput As OperationMessage = _
CType(New OperationOutput(), OperationMessage)
myOutput.Message = New XmlQualifiedName(myOutputMesg)
' Add messages to the OperationMessageCollection.
myOperation.Messages.Add(myInput)
myOperation.Messages.Add(myOutput)
Console.WriteLine("Operation name is: " & myOperation.Name)
Return myOperation
End Function 'CreateOperation
End Class