ich möchte einen Bericht per E-Mail senden. Jedoch möchte ich mit
einer E-Mail
den gleichen Bericht einmal als SnapShot und als RichText Format
senden.
Wie mache ich das ?
Private Sub Befehl70_Click()
On Error GoTo Err_Befehl70_Click
Dim stDocName As String
stDocName = "B_ToDo_02"
DoCmd.SendObject acReport, stDocName, acFormatSNP, "ma...@test.de"
Exit_Befehl70_Click:
Exit Sub
Err_Befehl70_Click:
MsgBox Err.Description
Resume Exit_Befehl70_Click
End Sub
Beck, Alwin wrote:
> Hallo,
>
> ich möchte einen Bericht per E-Mail senden. Jedoch möchte ich mit
> einer E-Mail
> den gleichen Bericht einmal als SnapShot und als RichText Format
> senden.
> Wie mache ich das ?
[Snip]
Mit SendObject gar nicht; lies mal hier ( Punkt 2 )
http://www.granite.ab.ca/access/email/sendobject.htm
In der E-Mail FAQ dort kannst Du Dich auch über mögliche Alternativen
informieren; solltest Du nichts passendes finden, melde Dich noch einmal,
oder google einmal nach entsprechenden Stichworten.
--
Gruss
Jens
______________________________
FAQ: http://www.donkarl.com