COM+ 上的属性已重置如果调用 ContextUtil.SetComplete() 则为对象

Question

我已经将两个类部署为 COM+ 组件，假设为 ClassA 和 ClassB。 ClassA 有一些公共属性。 ClassB 为这些属性设置值并调用 ClassA 的方法。该方法本身不会修改属性的值。

调用后，属性值将重置为相应类型的默认值。仅当被调用的方法包含语句 ContextUtil.SetComplete() 时才会发生这种情况。一旦我注释掉该语句，属性的值将保持与方法调用之前相同，这正是我所期望的。

我是否忽略了 COM+ 对象及其上下文的一些基本概念？我希望在任何情况下房产价值都保持不变。

这是代码的简化列表：

Option Strict Off
Option Explicit On 

Imports System.EnterpriseServices

<Transaction(TransactionOption.Required)> _
Public Class ClassA
    Inherits ServicedComponent

    Private _propertyA As String

    Public Property PropertyA() As String
        Get
            Return Me._propertyA
        End Get
        Set(ByVal Value As String)
            Me._propertyA = Value
        End Set
    End Property

    Public Sub MethodA()
        ' Do something
        ContextUtil.SetComplete() ' If this is called the Str property is reset after return from this call
    End Sub
End Class

<Transaction(TransactionOption.Required)> _
Public Class ClassB
    Inherits ServicedComponent

    Public Sub MethodB()
        Dim a As ClassA = New ClassA()
        a.PropertyA = "A"
        a.MethodA() 
        ' After this call the value of a.PropertyA is reset to Nothing if ContextUtil.SetComplete() was called inside MethodA()
    End Sub
End Class

Answer 1

您是否尝试过在事务上调用 Commit，即：ContextUtil.MyTransactionVote = TransactionVote.Commit。您可能正在进行更改，然后将上下文设置为在更改实际提交之前完成。