Run-Time error '438': Object doesn't support this property or method

Hello!

I inherited an Access database and I am not a programmer at all. The person who created the database left and now when I try to open the database I get the run-time error 438. When I click on "debug", it highlights the line bolded below:

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
                   

Any ideas on how to solve the issue?

(Using Access 2010 and Acrobat XI Pro)

Any help would be greatly appreciated!