sdk/samples/WFSamples/Technologies/Communications/WebService/VB/WebServicePublish/WebServicePublishWorkflow.designer.vb

   1 '---------------------------------------------------------------------
   2 '  This file is part of the Windows Workflow Foundation SDK Code Samples.
   3 '
   4 '  Copyright (C) Microsoft Corporation.  All rights reserved.
   5 '
   6 'This source code is intended only as a supplement to Microsoft
   7 'Development Tools and/or on-line documentation.  See these other
   8 'materials for detailed information regarding Microsoft code samples.
   9 '
  10 'THIS CODE AND INFORMATION ARE PROVIDED AS IS WITHOUT WARRANTY OF ANY
  11 'KIND, EITHER EXPRESSED OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE
  12 'IMPLIED WARRANTIES OF MERCHANTABILITY AND/OR FITNESS FOR A
  13 'PARTICULAR PURPOSE.
  14 '---------------------------------------------------------------------
  15
  16 Imports System
  17 Imports System.ComponentModel
  18 Imports System.Workflow.Activities
  19
  20 <Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()> _
  21 Partial Public NotInheritable Class WebServicePublishWorkflow
  22
  23     'NOTE: The following procedure is required by the Workflow Designer
  24     'It can be modified using the Workflow Designer.
  25     'Do not modify it using the code editor.
  26     <System.Diagnostics.DebuggerNonUserCode()> _
  27     Private Sub InitializeComponent()
  28         Me.CanModifyActivities = True
  29         Dim activitybind1 As System.Workflow.ComponentModel.ActivityBind = New System.Workflow.ComponentModel.ActivityBind
  30         Dim workflowparameterbinding1 As System.Workflow.ComponentModel.WorkflowParameterBinding = New System.Workflow.ComponentModel.WorkflowParameterBinding
  31         Dim activitybind2 As System.Workflow.ComponentModel.ActivityBind = New System.Workflow.ComponentModel.ActivityBind
  32         Dim workflowparameterbinding2 As System.Workflow.ComponentModel.WorkflowParameterBinding = New System.Workflow.ComponentModel.WorkflowParameterBinding
  33         Dim activitybind3 As System.Workflow.ComponentModel.ActivityBind = New System.Workflow.ComponentModel.ActivityBind
  34         Dim workflowparameterbinding3 As System.Workflow.ComponentModel.WorkflowParameterBinding = New System.Workflow.ComponentModel.WorkflowParameterBinding
  35         Me.webServiceResponse1 = New System.Workflow.Activities.WebServiceOutputActivity
  36         Me.webServiceReceive1 = New System.Workflow.Activities.WebServiceInputActivity
  37         '
  38         'webServiceResponse1
  39         '
  40         Me.webServiceResponse1.InputActivityName = "webServiceReceive1"
  41         Me.webServiceResponse1.Name = "webServiceResponse1"
  42         activitybind1.Name = "WebServicePublishWorkflow"
  43         activitybind1.Path = "POStatus"
  44         workflowparameterbinding1.ParameterName = "orderStatus"
  45         workflowparameterbinding1.SetBinding(System.Workflow.ComponentModel.WorkflowParameterBinding.ValueProperty, CType(activitybind1, System.Workflow.ComponentModel.ActivityBind))
  46         Me.webServiceResponse1.ParameterBindings.Add(workflowparameterbinding1)
  47         '
  48         'webServiceReceive1
  49         '
  50         Me.webServiceReceive1.InterfaceType = GetType(IPurchaseOrder)
  51         Me.webServiceReceive1.IsActivating = True
  52         Me.webServiceReceive1.MethodName = "CreateOrder"
  53         Me.webServiceReceive1.Name = "webServiceReceive1"
  54         activitybind2.Name = "WebServicePublishWorkflow"
  55         activitybind2.Path = "PurchaseOrderId"
  56         workflowparameterbinding2.ParameterName = "id"
  57         workflowparameterbinding2.SetBinding(System.Workflow.ComponentModel.WorkflowParameterBinding.ValueProperty, CType(activitybind2, System.Workflow.ComponentModel.ActivityBind))
  58         activitybind3.Name = "WebServicePublishWorkflow"
  59         activitybind3.Path = "POStatus"
  60         workflowparameterbinding3.ParameterName = "orderStatus"
  61         workflowparameterbinding3.SetBinding(System.Workflow.ComponentModel.WorkflowParameterBinding.ValueProperty, CType(activitybind3, System.Workflow.ComponentModel.ActivityBind))
  62         Me.webServiceReceive1.ParameterBindings.Add(workflowparameterbinding2)
  63         Me.webServiceReceive1.ParameterBindings.Add(workflowparameterbinding3)
  64         AddHandler Me.webServiceReceive1.InputReceived, AddressOf Me.OnWebServiceInputReceived
  65         '
  66         'WebServicePublishWorkflow
  67         '
  68         Me.Activities.Add(Me.webServiceReceive1)
  69         Me.Activities.Add(Me.webServiceResponse1)
  70         Me.Name = "WebServicePublishWorkflow"
  71         Me.CanModifyActivities = False
  72
  73     End Sub
  74     Private WithEvents webServiceReceive1 As System.Workflow.Activities.WebServiceInputActivity
  75     Private WithEvents webServiceResponse1 As System.Workflow.Activities.WebServiceOutputActivity
  76
  77 End Class