从 Excel VBA 启动 TransactionScope？

Question

我有一些现有的 c# 代码，我想通过 com 互操作公开，以便可以从 Excel VBA 调用它。由于我将执行许多嵌套的批量更新操作，我需要支持事务，并且为了最大限度地减少 c# 级别所需的重构，我想使用 TransactionScope 方法：

使用事务范围实现隐式事务
http://msdn.microsoft.com/en-us/library/ms172152.aspx

TransactionScope 类提供了一种简单的方法来标记一个块 代码作为参与交易，而无需您 与交易本身进行交互。事务范围可以选择 并自动管理环境事务。由于其易于 使用和效率，建议您使用 开发事务应用程序时的 TransactionScope 类。

此外，您无需使用 交易。任何 System.Transactions 资源管理器（例如 SQL Server 2005) 可以检测环境事务的存在 由作用域创建并自动登记。

我的问题是：是否可以在 VBA 代码中初始化 TransactionScope（或通过 COM 互操作调用 ac# 方法来实例化并返回一个 TransactionScope 对象），然后继续调用其他各种c# 对象通过 COM 互操作，会自动参与单一根事务？

Answer 1

我认为您的方法没有问题。您在 VBA 中没有 using，因此您必须通过

来模拟它

• 使用错误处理程序和
• 要非常小心，不要在没有以一种或另一种方式处理 TransactionScope 的情况下离开方法。

例如，假设在您的 C# 应用程序中，您提供了以下方法：

public TransactionScope BeginTransactionScope()
{
    return new TransactionScope();
}

public void CommitTransactionScope(TransactionScope scope)
{
    scope.Complete();
    scope.Dispose();  // simulates leaving the using { ... } scope
}

public void RollbackTransactionScope(TransactionScope scope)
{
    scope.Dispose();  // simulates leaving the using { ... } scope
}

// Does some work using Connections and maybe nested scopes
public void DoSomeWork1() { ... }
public void DoSomeWork2() { ... }
public void DoSomeWork3() { ... }

您编译您的 C# DLL 并通过 COM 互操作将其提供给 Excel VBA。在 VBA 中，您可以按如下方式运行方法：

Private Sub MySub()

    On Error Goto MyErrorHandler

    ...
    Dim scope As Object
    Set scope = myCsObject.BeginTransactionScope()
    ...
    myCsObject.DoSomeWork1
    ...
    myCsObject.DoSomeWork2
    ...
    myCsObject.DoSomeWork3
    ...
    myCsObject.CommitTransactionScope scope
    Set scope = Nothing
    ...

    Exit Sub

MyErrorHandler:
    If Not (scope Is Nothing) Then
        myCsObject.RollbackTransactionScope scope
    End If
    ' Remainder of your error handler goes here
    ...
End Sub

但请注意，您使用 VBA 代码 执行的任何数据访问（在 DoSomeWork 调用之间）都将在事务范围之外，因为 TransactionScope 与经典的 ADO 或 DAO。