_ Partial Class Workflow1 'HINWEIS: Die folgende Prozedur ist für den Workflow-Designer erforderlich. 'Das Bearbeiten ist mit dem Workflow-Designer möglich. 'Das Bearbeiten mit dem Code-Editor ist nicht möglich. _ _ Private Sub InitializeComponent() Me.CanModifyActivities = True Dim activitybind1 As System.Workflow.ComponentModel.ActivityBind = New System.Workflow.ComponentModel.ActivityBind Dim workflowparameterbinding1 As System.Workflow.ComponentModel.WorkflowParameterBinding = New System.Workflow.ComponentModel.WorkflowParameterBinding Dim activitybind2 As System.Workflow.ComponentModel.ActivityBind = New System.Workflow.ComponentModel.ActivityBind Dim workflowparameterbinding2 As System.Workflow.ComponentModel.WorkflowParameterBinding = New System.Workflow.ComponentModel.WorkflowParameterBinding Dim typedoperationinfo1 As System.Workflow.Activities.TypedOperationInfo = New System.Workflow.Activities.TypedOperationInfo Dim workflowserviceattributes1 As System.Workflow.Activities.WorkflowServiceAttributes = New System.Workflow.Activities.WorkflowServiceAttributes Me.setStateActivity1 = New System.Workflow.Activities.SetStateActivity Me.receiveActivity1 = New System.Workflow.Activities.ReceiveActivity Me.eventDrivenActivity1 = New System.Workflow.Activities.EventDrivenActivity Me.stateActivity1 = New System.Workflow.Activities.StateActivity Me.Workflow1InitialState = New System.Workflow.Activities.StateActivity ' 'setStateActivity1 ' Me.setStateActivity1.Name = "setStateActivity1" Me.setStateActivity1.TargetStateName = "stateActivity1" ' 'receiveActivity1 ' Me.receiveActivity1.CanCreateInstance = True Me.receiveActivity1.Name = "receiveActivity1" activitybind1.Name = "Workflow1" activitybind1.Path = "ReturnValue" workflowparameterbinding1.ParameterName = "(ReturnValue)" workflowparameterbinding1.SetBinding(System.Workflow.ComponentModel.WorkflowParameterBinding.ValueProperty, CType(activitybind1, System.Workflow.ComponentModel.ActivityBind)) activitybind2.Name = "Workflow1" activitybind2.Path = "InputValue" workflowparameterbinding2.ParameterName = "value" workflowparameterbinding2.SetBinding(System.Workflow.ComponentModel.WorkflowParameterBinding.ValueProperty, CType(activitybind2, System.Workflow.ComponentModel.ActivityBind)) Me.receiveActivity1.ParameterBindings.Add(workflowparameterbinding1) Me.receiveActivity1.ParameterBindings.Add(workflowparameterbinding2) typedoperationinfo1.ContractType = GetType($safeprojectname$.IWorkflow1) typedoperationinfo1.Name = "GetData" Me.receiveActivity1.ServiceOperationInfo = typedoperationinfo1 ' 'eventDrivenActivity1 ' Me.eventDrivenActivity1.Activities.Add(Me.receiveActivity1) Me.eventDrivenActivity1.Activities.Add(Me.setStateActivity1) Me.eventDrivenActivity1.Name = "eventDrivenActivity1" ' 'stateActivity1 ' Me.stateActivity1.Name = "stateActivity1" ' 'Workflow1InitialState ' Me.Workflow1InitialState.Activities.Add(Me.eventDrivenActivity1) Me.Workflow1InitialState.Name = "Workflow1InitialState" workflowserviceattributes1.ConfigurationName = "Workflow1" workflowserviceattributes1.Name = "Workflow1" ' 'Workflow1 ' Me.Activities.Add(Me.Workflow1InitialState) Me.Activities.Add(Me.stateActivity1) Me.CompletedStateName = "stateActivity1" Me.DynamicUpdateCondition = Nothing Me.InitialStateName = "Workflow1InitialState" Me.Name = "Workflow1" Me.SetValue(System.Workflow.Activities.ReceiveActivity.WorkflowServiceAttributesProperty, workflowserviceattributes1) Me.CanModifyActivities = False End Sub Private eventDrivenActivity1 As System.Workflow.Activities.EventDrivenActivity Private setStateActivity1 As System.Workflow.Activities.SetStateActivity Private stateActivity1 As System.Workflow.Activities.StateActivity Private receiveActivity1 As System.Workflow.Activities.ReceiveActivity Private Workflow1InitialState As System.Workflow.Activities.StateActivity End Class