Hallo Jungs und Mädels
ich sende diesen Print befehl an Access
oaccess.DoCmd.PrintOut(PrintRange:=Access.AcPrintRange.acSelection, Copies:=1, CollateCopies:=False)
es gibt doch die möglichkeit, ein PDF zu kreieren ohne einen Pdf Creator.
in Access Direkt verwende ich :
Dim stDocName As String
Dim stlinkcriteria As String
'Folgende Zeile gibt an was geöffnet werden soll.
stDocName = "Bestellungsformular"
'Folgenden 2 Zeilen bewirken, dass der aktuelle Datensatz im neuen
'Bericht auch als aktuell gesetzt wird.
'sorgt dafür, dass der Bericht "Meinbericht" an die E-Mail Adresse
'XXX@xxx.xx gesendet wird. Die optionalen Argumente sind z.B Kopie an usw.
DoCmd.SendObject acReport, "Bestellungsformular", "PDF Format", _
"e-mai@e-mail.ch", "", "", "Bestellung", _
"Bitte Bestellen!!!", True, ""
ich sende diesen Print befehl an Access
oaccess.DoCmd.PrintOut(PrintRange:=Access.AcPrintRange.acSelection, Copies:=1, CollateCopies:=False)
es gibt doch die möglichkeit, ein PDF zu kreieren ohne einen Pdf Creator.
in Access Direkt verwende ich :
Dim stDocName As String
Dim stlinkcriteria As String
'Folgende Zeile gibt an was geöffnet werden soll.
stDocName = "Bestellungsformular"
'Folgenden 2 Zeilen bewirken, dass der aktuelle Datensatz im neuen
'Bericht auch als aktuell gesetzt wird.
'sorgt dafür, dass der Bericht "Meinbericht" an die E-Mail Adresse
'XXX@xxx.xx gesendet wird. Die optionalen Argumente sind z.B Kopie an usw.
DoCmd.SendObject acReport, "Bestellungsformular", "PDF Format", _
"e-mai@e-mail.ch", "", "", "Bestellung", _
"Bitte Bestellen!!!", True, ""