Почему мой Access vba открывает PDF-файл, но затем закрывает его через несколько секунд?

При нажатии кнопки мой code использует Application.FollowHyperlink для открытия PDF-файла, который находится на удаленном сервере. Папка, содержащая этот файл, была предоставлена ​​всем, и полный доступ был предоставлен всем. Файл открывается с помощью Adobe Acrobat, что странно, поскольку программой по умолчанию для открытия PDF-файлов на локальном сервере является Chrome. Затем файл закрывается примерно через 4 секунды, не знаю почему. Я могу перейти в папку, где находится файл на локальном сервере, и открыть его с помощью Chrome. Я также могу подключиться по RDP к удаленному серверу и открыть файл там с помощью Edge по умолчанию без проблем. На удаленном сервере не установлен Adobe Acrobat.

Private Sub btnOpenCert_Click()
   
   Dim WO As String
   Dim CoCFolder As String
   Dim CustPO As String
   Dim FilePath As String

   WO = FieldOnForm

   '...run a stored procedure using an ADODB connection, then interpret results...
   
   CoCFolder = GetCoCFolder()
   CustPO = GetPropertyFromWO(WO, 1)
   FilePath = CoCFolder & CustPO & "_" & WO & ".pdf"
   Application.FollowHyperlink FilePath
   
ExitLabel:
   Exit Sub
   
ErrLabel:
   ErrHandler Err.Number, Err.Description
   Resume ExitLabel

End Sub
Евфросиния
Вопрос задан7 февраля 2024 г.

1 Ответ

2
Мариан
Ответ получен16 сентября 2024 г.

Ваш ответ

Загрузить файл.