Hallo
Hier mein Code:
DoCmd.OpenReport "rptHotelBuchung", acViewPreview, , "hotSes_Hotel_IDF = " & intHotel & " AND adresse_ID = " & Me.txtAdresse_ID & " AND adreTeilSes_TeilAnmeldeStatus_IDF >= 1 AND (adreTeilSes_TeilAnmeldeStatus_IDF <= 3 Or adreTeilSes_StornoBuch = True)", acHidden, Me.cboAdreSes_Session_IDF
Reports!rptHotelBuchung.Caption = "Gästeliste"
DoCmd.SendObject acSendReport, "rptHotelBuchung", "PDFFormat(*.pdf)", strEMail, , , "Gästeliste Session 2015", "Sie erhalten die aktuelle Gästeliste", True
DoCmd.Close acReport, "rptHotelBuchung"
Wenn ich nun das geöffnete EMail Fenster (Windows Live Mail) abbreche und nicht sende kommt die Fehlermeldung: Die Aktion SendObject wurde abgebrochen.
Wie kann ich den Code anpassen, dass es möglich ist das Fenster zu schliessen ohne das EMail zu senden?
Gruss Daniel
Hallo,
die Fehlermeldung stammt ja nicht vom zu schließenden Mail-Form, eher vom daher rührenden Abbruch der SendObject-Methode.
ein einfaches
On Error Resume Next
sollte helfen.
Ein vernünftiger Error-Handler, der den Fehlercode entspr. auswertet, ist aber vorzuziehen.
Hallo
Jetzt ist noch ein weiteres Problem aufgetaucht
strText = DLookup("textVorlage_Text", "tblCboTextVorlagen", "textVorlage_Typ = 'hotEinzelAend'")
DoCmd.SendObject acSendReport, "rptHotelBuchung", "PDFFormat(*.pdf)", strEMail, , , strBetrifft, strText, True
Bei der Variable strText gebe ich ein Memo Feld (Textformat Rich-Text) mit. Im EMail sieht dass dann so aus:
<div>Sehr geehrte Damen und Herren</div>
<div> </div>
<div>Sie erhalten eine Aenderung einer bestehenden Hotelreservation für die Session 2013.</div>
<div> </div>
<div>Mit freundlichen Grüssen</div>
An was liegt das?
Gruss Daniel
Hallo,
RTF ist kein HTML-Format...