MEF部分无法导入Autofac自动生成的工厂

Question

这是一个（对我来说）非常奇怪的问题，因为它已经完美运行，但在一些不相关的更改之后完全南下。

我有一个 Repository，它通过 Autofacs MEF 集成在其构造函数中导入 IExtensions 列表。这些扩展之一包含对 Repository 的反向引用，作为 Lazy(Of IRepository) （因为会发生循环引用而延迟）。

但是，一旦我尝试使用存储库，Autofac 就会抛出 ComponentNotRegisteredException ，并显示消息“请求的服务‘ContractName=Assembly.IRepository()’尚未注册。”

然而，这并不完全正确，因为当我在容器构建后立即中断并探索服务列表时，它就在那里 - Exported() 并具有正确的 ContractName。

如果有任何帮助，我将不胜感激...
Michael

[编辑] 这是代码的精简版本：

Repository

Public Class DocumentRepository
    Implements IDocumentRepository

    Private _extensions As IEnumerable(Of IRepositoryExtension)
    
    Public Sub New(ByVal extensions As IEnumerable(Of IRepositoryExtension))
        _extensions = extensions
    End Sub

    Public Sub AddDocument(ByVal document As Contracts.IDocument) Implements Contracts.IDocumentRepository.AddDocument
        For Each extension In _extensions
            extension.OnAdded(document.Id)
        Next
    End Sub
End Class

Plugin

<Export(GetType(IRepositoryExtension))>
<PartCreationPolicy(ComponentModel.Composition.CreationPolicy.Shared)>
Public Class PdfGenerator
    Implements IRepositoryExtension

    Private _repositoryFactory As Lazy(Of IDocumentRepository)
    
    Public Sub New(ByVal repositoryFactory As Lazy(Of IDocumentRepository))
        _repositoryFactory = repositoryFactory
    End Sub

    Public Sub CreatePdf(ByVal id As Guid) Implements Contracts.IRepositoryExtension.OnAdded
        Dim document = _repositoryFactory.Value.GetDocumentById(id)
    End Sub
End Class

Bootstrapper

Public Class EditorApplication
    Inherits System.Web.HttpApplication

    Sub Application_Start(ByVal sender As Object, ByVal e As EventArgs)
        Dim builder As New ContainerBuilder()
        
        Dim catalog1 As New TypeCatalog(GetType(DataRepositoryScheme))
        Dim catalog2 As New DirectoryCatalog(HttpContext.Current.Server.MapPath("/Plugins"))
        builder.RegisterComposablePartCatalog(New AggregateCatalog(catalog1, catalog2))
        
        builder.RegisterType(Of DocumentRepository).As(Of IDocumentRepository).SingleInstance().Exported(Function(x) x.As(Of IDocumentRepository)())
        
        AutofacServiceHostFactory.Container = builder.Build()
    End Sub
End Class

Answer 1

啊，在我发布最后一条评论后，我想我明白了：

The requested service 'ContractName=ConsoleApplication7.IDocumentRepository()'
has not been registered.

请注意，合约名称后面有一对括号 - 这是因为合约是一个函数，即该消息是由以下构造函数生成的，即与示例中的稍有不同：

Public Sub New(ByVal repositoryFactory As Func(Of IDocumentRepository))
    _repositoryFactory = repositoryFactory
End Sub

请注意其中的“Func”。 MEF 与 Autofac 不同，它并不将 Func 视为特殊类型，因此不会将其转换为与 Lazy 相同的合约。

如果要向 MEF 组件提供 Func，则需要将其作为 Func 从 Autofac 导出。这有点棘手：

builder.RegisterType(Of DocumentRepository).As(Of IDocumentRepository)

builder.Register(Function(c) c.Resolve(Of Func(Of IDocumentRepository))) _
    .As(New UniqueService()) _
    .Exported(Function(x) x.As(Of Func(Of IDocumentRepository))

您可能需要稍微调整一下语法，我的 VB.NET 相当不稳定。

我的猜测是 /Extensions 目录中存在过时的二进制文件，这些二进制文件会干扰调试。

希望这是正确的！

缺口