Доступ к OutPutTo к папке - PullRequest
       3

Доступ к OutPutTo к папке

0 голосов
/ 07 февраля 2020

Я изо всех сил пытался вывести отчет в формате PDF в соответствующую папку на сервере. Отображаемая ошибка:

RunTime error 3201, запись не найдена.

Не могли бы вы помочь мне решить эту проблему?

Dim RFQNumber As String
Dim InNumber As String
Dim FullReportName As String
Dim path1 As String

RFQNumber = [Forms]![RFQ_Database]![RFQ_ExNumber]
InNumber = [Forms]![RFQ_Database]![RFQ_InNumber]
path1 = "\\AZBAK-FP02\Work\Old Server Data\V&C\" & RFQNumber & "\" & RFQNumber & " " & InNumber & ".pdf"

MsgBox (path1)

DoCmd.OutputTo acOutputReport, "AOrderFCAVienna", "PDFFormat(*.pdf)", path1, False

1 Ответ

0 голосов
/ 08 февраля 2020

Я считаю, что проблема заключается в амперсанде в пути к каталогу.

ath1 = "\\AZBAK-FP02\Work\Old Server Data\V&C\" & RFQNumber & "\" & RFQNumber & " " & InNumber & ".pdf"
                                          ^^^

вам может понадобиться добавить код chr

ath1 = "\\AZBAK-FP02\Work\Old Server Data\V" & Chr(38) & "C\" & RFQNumber & "\" & RFQNumber & " " & InNumber & ".pdf"

Вставка формулы, содержащей амперсанд, в ячейку

Добро пожаловать на сайт PullRequest, где вы можете задавать вопросы и получать ответы от других членов сообщества.
...