piotke
Legacy Member
maybe kan iemand me hiermee helpen:
dit werkt, maar nu zou ik graag in die mail 2 bijlagen gooien ipv steeds 2 of meer afzonderlijke mails te hebben. Want ik kan blijkbaar geen report met subreport erin mailen, hij neemt dat subreport niet mee.
DoCmd.OpenReport "rpt_A", acViewPreview, , strwere
DoCmd.SendObject acSendReport, "rpt_A", acFormatHTML, strmail, , , "testmail Ahlers", "No messagetest", 2
zou er bv bij moeten in die ene mail
Iemand een idee ?
If ((SysCmd(acSysCmdGetObjectState, acForm, "frm_personal_data_file") And acObjStateOpen) <> False) Then
strwere = "[Employee ID]=[Forms]![frm_personal_data_file]![Employee ID]"
DoCmd.Close
DoCmd.OpenForm "frm_sea_experience", acViewPreview, , strwere
DoCmd.SendObject acSendForm, "frm_sea_experience", acFormatHTML, strmail, , , "testmail Ahlers", "No messagetest", 1
End If
dit werkt, maar nu zou ik graag in die mail 2 bijlagen gooien ipv steeds 2 of meer afzonderlijke mails te hebben. Want ik kan blijkbaar geen report met subreport erin mailen, hij neemt dat subreport niet mee.
DoCmd.OpenReport "rpt_A", acViewPreview, , strwere
DoCmd.SendObject acSendReport, "rpt_A", acFormatHTML, strmail, , , "testmail Ahlers", "No messagetest", 2
zou er bv bij moeten in die ene mail
Iemand een idee ?