4

在我的应用程序中，我有几个 DataContexts 连接到具有不同模式的不同数据库。在自定义用户控件中，我显示查询结果并让用户编辑它们，当用户编辑数据时，我希望将更改持久保存到数据库中。为此，我需要引用源 DataContext（或至少源 datacontext 类型），以便我可以执行DataContext.SubmitChanges();

有什么方法可以确定查询来自哪个 DataContext？DataQuery 类本身被标记为内部的，所以我不能访问它的上下文属性而不诉诸丑陋的反射黑客，所以我正在寻找一种更清洁的方法。

有（几种）解决这个问题的方法，例如传递对源 DataContext 的引用，但我想必须有一种更简单的方法来做到这一点。

编辑：以下代码有效，但很难看：

FieldInfo contextField = query.GetType().GetField("context", BindingFlags.Instance | BindingFlags.NonPublic);
if (query != null)
{
  queryContext = contextField.GetValue(value) as DataContext;
}
4

2 回答 2

2

是的 - 使用反射是确定查询所属的 DataContext 的唯一方法。触发查询时创建的数据对象也是如此。

以下内容并未严格回答 Rune 的问题，但如果您想使用反射来确定数据对象是否附加到数据上下文并由数据上下文监控，则可能会有所帮助：

以下代码定义了一个 Context 属性，该属性可以放置在数据对象上，然后用于返回该对象附加到的 DataContext（如果有）。

Private Const StandardChangeTrackerName As String = "System.Data.Linq.ChangeTracker+StandardChangeTracker"

Private _context As DataClasses1DataContext
Public Property Context() As DataClasses1DataContext
    Get
        Dim hasContext As Boolean = False
        Dim myType As Type = Me.GetType()
        Dim propertyChangingField As FieldInfo = myType.GetField("PropertyChangingEvent", BindingFlags.NonPublic Or BindingFlags.Instance)
        Dim propertyChangingDelegate As PropertyChangingEventHandler = propertyChangingField.GetValue(Me)
        Dim delegateType As Type = Nothing

        For Each thisDelegate In propertyChangingDelegate.GetInvocationList()
            delegateType = thisDelegate.Target.GetType()
            If delegateType.FullName.Equals(StandardChangeTrackerName) Then
                propertyChangingDelegate = thisDelegate
                hasContext = True
                Exit For
            End If
        Next

        If hasContext Then
            Dim targetField = propertyChangingDelegate.Target
            Dim servicesField As FieldInfo = targetField.GetType().GetField("services", BindingFlags.NonPublic Or BindingFlags.Instance)
            If servicesField IsNot Nothing Then

                Dim servicesObject = servicesField.GetValue(targetField)

                Dim contextField As FieldInfo = servicesObject.GetType.GetField("context", BindingFlags.NonPublic Or BindingFlags.Instance)

                _context = contextField.GetValue(servicesObject)

            End If
        End If
    
        Return _context
    End Get
    Set(ByVal value As DataClasses1DataContext)

        _context = value

    End Set

End Property

请注意，如果对象当前附加到已打开 ChangeTracking 的上下文，则该对象只能找到它的 DataContext。此属性依赖于 DataContext 已订阅对象的 OnPropertyChanging 事件以监视对象生命周期内的更改这一事实。

如果这有帮助，请给这篇文章投票。

有关使用反射查找事件处理程序的更多信息：

于 2009-06-12T11:11:00.433 回答
0

我认为您将不得不简单地将 DataContext 传递给代码（手动）。对不起。

于 2008-11-25T12:52:39.930 回答