Ergebnis der Suchanfrage

• Forum: Betriebssysteme

  AW: Email über Outlook Express direkt (ohne Fenster) versenden

   
    by KodeZwerg, 19. Aug 2018
  Ohhh, das wusste ich nicht das Microsoft da anders vorgeht. Hmmmm weder ShellExecute noch über OLE klappts.
  Nach ein wenig lesen über Express bin ich nicht wirklich schlauer geworden um Deine Anfrage zufrieden stellend beantworten zu können. Es lautet überall ein Nein zum Hintergrund Senden mit der Express.
  Da Du eine Console-Application hast die das ja anscheinend kann, frag ich einfach mal...
• Forum: Betriebssysteme

  AW: Email über Outlook Express direkt (ohne Fenster) versenden

   
    by KodeZwerg, 19. Aug 2018
  Klappt es so ohne Fenster bei Dir?
  procedure TForm1.Button2Click(Sender: TObject);
  var
  Outlook, Mailitem: OLEVariant;
  begin
  try
  Outlook := GetActiveOleObject('Outlook.Application');
  except
  Outlook := CreateOleObject('Outlook.Application');
  end;
• Forum: Betriebssysteme

  AW: Email über Outlook Express direkt (ohne Fenster) versenden

   
    by KodeZwerg, 19. Aug 2018
  So sendest Du über Standard Mail Client ohne Fenster.
  procedure TForm1.Button1Click(Sender: TObject);
  var
  s: String;
  begin
  s := 'mailto:MaxMuster@mann.de';
  s := s + '?Subject=Delphi-PRAXiS';
  s := s + '&Body=Inhalt';
  s := s + '&Attach=""C:\TestDate.txt""';
  ShellExecute(handle, 'open', PChar(s), nil, nil, SW_SHOWNORMAL);