Wir haben auf Office 365 umgestellt, zuvor lief die Datenbank auf Office 2016.
Aus unserer Datenbank werden E-Mails versendet, indem die Daten an Outlook übergeben werden (Empfänger, Betreff, ggf. eine PDF). Bisher war das kein Problem, in der neu erstellten Nachricht wurden immer die Empfängeradressen unterstrichen. Jetzt klappt das aber nicht mehr so gut, teilweise dauert es 10-15 Sekunden bis die Mail-Adressen erkannt werden.
Habt Ihr eine Idee, woran das liegen könnnte?
@thoco
Wenn du zeigen würdest, wie dies
Zitatindem die Daten an Outlook übergeben werden
codiert ist, und dann noch erklären würdest, was dies
Zitatwurden immer die Empfängeradressen unterstrichen
und dies
Zitatteilweise dauert es 10-15 Sekunden bis die Mail-Adressen erkannt werden
mit einander zu tun hat, findet sich evtl. jemand, der dir helfen kann.
Ich wahrscheinlich nicht, aber hier gibt genug Helfer, die sich mit Outlook
(-Automatisierung) auskennen.
gruss ekkehard
Public Function EmailVersenden2(Datei As String, MailSubject As String)
Dim olApp As Outlook.Application
Dim olNamespace As NameSpace
Dim objMailItem As MailItem
Dim objFolder As MAPIFolder
'Dim MailSubject As String deaktiviert und oben zur Übergabe eingefügt'
'Dim Mailbody As String ebenso'
Set olApp = CreateObject("Outlook.Application")
Set olNamespace = olApp.GetNamespace("MAPI")
Set objFolder = olNamespace.GetDefaultFolder(olFolderInbox)
Set objMailItem = objFolder.Items.Add(olMailItem)
With objMailItem
.Subject = MailSubject
If Datei <> "" Then .Attachments.Add Datei
.Display
End With
olApp.ActiveWindow
End Function
Mit unterstreichen meinte ich, die Zeit die Outlook braucht um die Mailadresse zu erkennen.
Hallo,
ist das späte Unterstreichen überhaupt ein Problem? Kann die Mail nicht versendet werden, bevor die EMail-Adresse unterstrichen ist?
Und wo befindet sich die Adresse (in welchem Kontakt, lokal oder auf dem MS-Server)?