Ms access dataTable=jso.getPortfolio（）

我继承了Access数据库，而我根本不是程序员。创建数据库的人离开了，现在当我尝试打开数据库时，出现运行时错误438:对象不支持此属性或方法。当我单击debug时，它会突出显示dataTable=jso.getPortfolio下面的粗体行：

fileName = myfile.name
newFileName = Replace(fileName, ".pdf", ".txt")
fileStump = Replace(fileName, ".pdf", "")
fileStump = Replace(fileStump, "_responses", "")
'end path functions
Set oFile = fso.CreateTextFile(CurrentProject.Path & "\" & newFileName)
Set gApp = CreateObject("AcroExch.App")
Set gPDDoc = CreateObject("AcroExch.PDDoc")
    If gPDDoc.Open(myfile.Path) Then
       Dim dataTable As String
       Set jso = gPDDoc.GetJSObject
       **dataTable = jso.getPortfolio()**
    Else

---

Access数据库以前工作正常。一旦它被移动到另一个位置，也就是问题开始的时候。关于如何解决这个问题有什么想法吗

听起来你好像错过了一份推荐信

打开数据库 打开VBA编辑器窗口[ALT-F11] 转到“工具、参考”菜单 查找缺少的adobe引用并选中复选框。 它可能会在引用列表顶部的AcroExch.PDDoc引用旁边显示“missing”[或类似内容]，或者您可能需要向下滚动才能在可用引用列表中按字母顺序找到它

它可能不完全被称为AcroExch.PDDoc。。。所以，如果你没有立即看到它，请寻找“Adobe…”或者“杂技演员…”引用，单击它们，然后朝窗口底部看，它可能会显示“AcroExch.PDDoc”

如果这些都不能解决您的问题，并且由于数据库已移动到其他位置，您可能需要在新工作站上安装Adobe产品，然后才能获得参考。如果是这样，请安装Adobe产品并从步骤1重新开始