我继承了一个最近迁移到azure的数据库。数据库使用frameworkedi将健康数据转换为数据库中可读的内容。我最近收到“activex组件无法创建对象”错误，无法确定其原因的根源。我已经在visualstudio中引用了fredi.tlb，并且我相信我已经安装了所有依赖项。错误发生在'set oedidoc=new fredi.edidocument'行，如有任何帮助，将不胜感激！

Function TranslateEDI()
'Clear MyHTML
MyHTML = ""

'Translate an EDI file to an HTM file

    Dim sPath As String
    Dim sEntity As String
    Dim sQlfr As String
    Dim sEligQlfr As String
    Dim sSefFile As String
'    Dim sEdiFile As String
    Dim sOutputFile As String
    Dim sSegmentID As String
    Dim nArea As Integer
    Dim sLoopSection As String
    Dim nCount As Integer
    Dim i As Integer
    Dim MyEDI2 As String

    Dim oEdiDoc As Fredi.ediDocument
    Dim oWarnings As Fredi.ediWarnings
    Dim oWarning As Fredi.ediWarning

'    DoCmd.Hourglass True

    sPath = CurrentProject.Path & "\"

    sSefFile = "Z:\ROME\Billing\271_X092\271_X092\Tran27X092\271_X092.SEF"
'  sEdiFile = sPath & "271_x092.x12"
'    sOutputFile = sPath & "271.HTM"

    'instantiate edi document object
    Set oEdiDoc = New Fredi.ediDocument

    'change cursor type from dynamic (default) to ForwardOnly to improve performance
    oEdiDoc.CursorType = Cursor_ForwardOnly

    'disable the internal standard referene library so that component will use SEF files only
    'to obtain schema
    Set oSchemas = oEdiDoc.GetSchemas
    oSchemas.EnableStandardReference = False

    'load SEF file
    oEdiDoc.ImportSchema sSefFile, 0