Ergebnis der Suchanfrage

• Forum: Netzwerke

  Re: Email direkt aus Program mraus

    Delphi
    by marabu, 22. Apr 2008
  Hallo René,
  
  kann es sein, dass du früher OL98 oder OL2000 installiert hattest? Seither hat sich die Welt etwas verändert. Insbesondere hatte Microsoft es leid, dass Viren die MAPI.DLL recht einfach zur Reproduktion benutzt haben. Der bei dir auftretende Fehler MAPI_E_FAILURE (2) ist typisch für die verschärfte Sicherheit der neueren Outlook-Versionen.
  
  Dieser Thread zeigt Wege aus dem...
• Forum: Netzwerke

  Re: Email direkt aus Program mraus

    Delphi
    by marabu, 15. Jan 2006
  Zwei bugs habe ich gefunden:
  
  
  if Recipients.Count > 0 then
  begin
  SetLength(recips, Recipients.Count);
  ZeroMemory(@recips, SizeOf(MapiRecipDesc) * Recipients.Count);
  for i := Low(recips) to High(recips) do
  with recips do
  begin
• Forum: Netzwerke

  Re: Email direkt aus Program mraus

    Delphi
    by marabu, 14. Jan 2006
  Hallo René,
  
  na klar kannst du deine Empfänger auch als Feldliste in einem String an deine SendMail-Funktion übergeben. Du musst sie dann aber zerlegen und für jeden einzelnen eine MapiRecipDesc-Struktur ausfüllen. In deinem Code darfst du dann aber nicht lpszName und lpszAddress mit dem gleichen Wert beschicken. Ist es ein DisplayName, dann weise ihn nur lpszName zu und MAPI-intern wird die...
• Forum: Netzwerke

  Re: Email direkt aus Program mraus

    Delphi
    by marabu, 13. Jan 2006
  Entschuldige René,
  
  
  lpszName := PChar(Trim(Before(Recipients, '<')));
  lpszAddress := PChar(Trim(Between(Recipients, '&lt;', '>')));
  
  mit den beiden Funktionen zerlege ich das von mir gewählte Eingabeformat für die mail recipients - sie tun genau das was ihr Name suggeriert:
  
  
  const
• Forum: Netzwerke

  Re: Email direkt aus Program mraus

    Delphi
    by marabu, 13. Jan 2006
  Hallo René,
  
  ich habe mir eine Testanwendung gebaut und dann einige Dinge an deiner Funktion SendMail() abgeändert, da ich den Eindruck hatte, dass du sie noch nicht ganz fertige hattest. Sie sieht jetzt bei mir so aus:
  
  
  function SendMail(const Subject, Body, FileName, SenderName,
  SenderEMail: String; Recipients: TStrings): Integer;
  var
  msg: TMapiMessage;
  lpSender: TMapiRecipDesc;
• Forum: Netzwerke

  Re: Email direkt aus Program mraus

    Delphi
    by marabu, 27. Dez 2005
  Hi René,
  
  du willst also einen eigenen MAPI-Client entwickeln, nur damit du unabhängig von Outlook bist? Wahrscheinlich kannst du dir noch nicht vorstellen, was das für ein Aufwand ist. Nimm doch einen fertigen Client, wie Eudora. Wenn du es aber unbedingt willst, dann solltest du dich mal intensiv mit dem MAPI SDK auseinandersetzen. Und irgendwie musst du MAPI ja auf die Zielmaschine bringen....
• Forum: Netzwerke

  Re: Email direkt aus Program mraus

    Delphi
    by marabu, 27. Dez 2005
  Outlook ist nicht notwendig um per MAPI eine mail zu verschicken - aber du brauchst einen account auf einem MAPI-Server.
  
  Grüße vom marabu
• Forum: Netzwerke

  Re: Email direkt aus Program mraus

    Delphi
    by marabu, 15. Dez 2005
  Hallo René,
  
  erstmal zu deinem Problem mit mehreren Empfängern - so stelle ich mir das vor - ungetestet:
  
  
  var
  MapiMessage: TMapiMessage;
  recips: array of MapiRecipDesc;
  rl: TStrings;
  i: integer;