Код:
Private Sub Command455_Click()
Dim filename As String
Dim filepath As String
filename = Me.LAST_NAME & "," & " " & Me.FIRST_NAME & "," & " " & Me.STUDENT_ID
filepath = "C:\Users\ddennis1\Desktop\" & filename & ".pdf"
DoCmd.OpenReport "Humanities_MiniDips", acViewPreview, , "[Student_ID]=Forms!DIPLOMAS_EXPRESS!STUDENT_ID"
DoCmd.OutputTo acOutputReport, "Humanities_MiniDips", acFormatPDF, filepath
MsgBox "Graduate exported", vbInformation, "Save confirmed"
End sub
Приведенная выше кодировка прекрасно работает, но экспортирует только один PDf за раз на основе идентификатора студента, отображаемого в форме.
Я хочу экспортировать несколько назвал PDF из базы данных на основе вышеуказанного кодирования с помощью другой кнопки.
Отчет называется "Humanities_Minidips", а источник записи называется "Humanites"
Я считаю, что существует какая-то Для выполнения этой задачи требуется sh.
У кого-нибудь есть идеи, как двигаться дальше в этом направлении?