sayın husem,

bahsettiğiniz talebinize yönelik olarak;

GONDER adlı butonun içeriğini,

DoCmd.SetWarnings (False)



Dim RpAdi As String

RpAdi = "İrsaliye"

DoCmd.OpenReport RpAdi, acViewPreview, , , acHidden

'DoCmd.SendObject acSendReport, RpAdi, acFormatPDF, Me.MAIL, , , "Konuyu Yaz", "iletilecek mesaji yaz", False

DoCmd.SendObject acSendReport, RpAdi, acFormatPDF, Me.MAIL, , , "Konuyu Yaz", "iletilecek mesaji yaz", True

DoCmd.Close acReport, RpAdi



DoCmd.SetWarnings (True)

kodları ile değiştirerek kullanmayı deneyiniz.

bilginize...iyi çalışmalar,saygılar.