Outllook via OLE mit Win10

[norwegen60]

Hallo

ich verwende folgenden Code um in Outlook ein HTML-Mail zu erzeugen:

Delphi-Quellcode:

procedure TfoedRepNr.Button1Click(Sender: TObject);
const
  olMailItem = 0;

var
  Outlook    : OleVariant;
  miMail     : Variant;

begin
  try
    Outlook := (GetActiveOleObject('Outlook.Application'));
  except
    Outlook := (CreateOleObject('Outlook.Application'));
  end;
  miMail := Outlook.CreateItem(olMailItem);

  miMail.Subject := 'Reparaturaufrag ';

  miMail.Body := 'REPARATURAUFTRAG' + #13 +
    'Folgender Reparaturaufrag muss bearbeitet werden';

  miMail.HTMLBody := '<span style=''font-size:11.0pt;font-family:"Arial",sans-serif''>Attached is the <b>list of email</b> addresses.'+
  '<p><a href="file:///D:\data\MsOffice\Privat\Betriebskostenrechnung.pdf">D:\data\MsOffice\Privat\Betriebskostenrechnung.pdf</a></p>' +
  '<p><a href="file:///D:\data\MsOffice\Privat\Betriebskostenrechnung.pdf">Betriebskostenrechnung.pdf</a></p>'+
  '<p><a href="file:///Z:\DoQMa\Reparatur\201600864ac.msg">Z:\DoQMa\Reparatur\201600864ac.msg</a></p>';

  miMail.Display;        // 160614 GPa: Hier kommt bei Aufruf in Win10 Meldung "Unzulässige Funktion"
end;

Unter Win7 wird

• bei geschlossenem Outlook Outlook gestartet und dann das Mail erzeugt
• bei bereits geöffnetem Outlook das Mail ebenfalls erzeugt.

Dass das erzeugte Mail in beiden Fällen nicht immer in den Vordergrund gebracht wird, ist eine andere Sache.

Bei Win10 kommt

• bei geschlossenem Outlook die Meldung "Vorgang abgebrochen"
• bei geöffnetem Outlook die Meldung "Funktion unzulässig". Das Mail wird aber korrekt erzeugt. Kommt aber auch nicht immer in den Vordergrund

Hat jemand eine Idee woran das liegen könnte

Vielen Dank
Gerd

[Bernhard Geyer]

Nimm doch die SimpleMAPI-Schnittstelle.
Dürfte auch unter Win10 "schmerzloser" sein als direkt mit den COM-Objekten zu arbeiten.

[mquadrat]

32bit Anwendung und 64bit Office?

[norwegen60]

Fehler tritt auf bei Win10 64bit und Office 2007 SP3 32bit

[TiGü]

Und deine Anwendung? 32- oder 64-Bit?

[norwegen60]

Die ist mit Delphi programmiert und 32 bit

[mquadrat]

Das sollte eigentlich gehen. Ich kenne die Meldung nur von 32bit Anwendung mit 64bit Office.

[norwegen60]

OK, beim Office bin ich nicht ganz sicher ob 32 oder 64 bit. Im Info-Fenster von Outlook steht weder 32 noch 64 bit aber der EDV'ler hat gesagt es sei 32bit
Und gibt es bei 64 bit eine Lösung?

[mm1256]

Zitat von norwegen60:

Und gibt es bei 64 bit eine Lösung?

Ja, 32-Bit-Version verwenden. Microsoft selber empfiehlt das. Mir fehlt gerade leider der Link.