Ergebnis der Suchanfrage

• Forum: Netzwerke

  AW: Mails versenden über Live Mail

   
    by schaumermal, 7. Okt 2012
  Auf diesen Rechnern ist KEIN Outlook installiert und trotzdem lief diese Funktion reibungslos.
  Da natürlich nicht sichergstellt ist, dass Outlook läuft versuche ich dieses ja zu starten (CreateOleObject) falls nicht aktiv.
  
  begin
  try
  OutlookApplication := GetActiveOleObject('Outlook.Application');
  except
  try
  OutlookApplication := CreateOleObject('Outlook.Application');
  ...
• Forum: Netzwerke

  AW: Mails versenden über Live Mail

   
    by schaumermal, 7. Okt 2012
  Hi,
  
  ja es handelt sich um die gleichen PC's (also mehrere) bei denen nun dies Problem auftritt.
  Was in der Zwischenzeit passiert ist, ist dass ich das Programm weiterentwickelt habe OHNE jedoch diesen Teil des Codes zu verändern.
  
  Aber nun erhalte ich diese Meldung beim erstellen der Mail.
  
  Es sieht also so aus, als ob durch die Neucompileierung nun das Problem entstanden ist :(
  Nur kann...
• Forum: Netzwerke

  AW: Mails versenden über Live Mail

   
    by schaumermal, 7. Okt 2012
  Hi,
  
  danke für Deine Rückmeldung. Mit der Fehlerbehandlung hast Du natürlich Recht!
  
  Allerdings verstehe ich nicht, warum diese Fehlermeldung "auf einmal" kommt.
  Bisher lief dieser Programmcode einwandfrei und ich konnte über LiveMail auch Mails erstellen.
• Forum: Netzwerke

  Mails versenden über Live Mail

   
    by schaumermal, 7. Okt 2012
  Hallo zusammen,
  
  kann mir jemand bei folgendem Problem helfen:
  
  Mit dem folgenden Code erstelle ich eine Email:
  
  function EMailErstellen(EMail, Betreff, EMailTextHTML:String; Anhang:TStrings):Boolean;
  Var OutlookApplication: Variant;
  Mailitem, ObjectInspector, WordEditor: OleVariant;
  s:string;