|
Member
Beiträge: 6
| Hallo,
mit dem nachfolgenden Code öffne ich in Access den Inhalt des Email-Bodys mit der zugehörigen EntryID
Kann mir jemand sagen, welchen Befehl ich ausführen muss, um die Email zu öffnen, um sie beantworten zu können, oder den Anhang zu sehen etc...
Vielen Dank für Eure Hilfe
Harry
Private Sub cmdEmailAufrufen_Click()
If Me.EntryID <> "" Then
Set App = CreateObject("Outlook.Application")
Set NS = App.GetNamespace("MAPI")
NS.Logon
Set Msg = NS.GetItemFromID(Me.EntryID)
MsgBox Msg.Body
Else
MsgBox "Keine Verknüpfung zu Outlook vorhanden"
End If
End Sub | |
|
Outlook Email aus Access öffnen