Email per AUTH SMTP versenden

[webby]

Hallo,
wie kann ich eine Email per AUTH SMTP versenden?
(Also das wo man sich per SMTP einloggen kann...)

Die Komponenten sind mir egal, also entweder Indy oder FastNet.

Ich wüsste zwar wie ich das Protokoll selber machen müsste, aber das wäre der letzte Schritt denn ich machen würde. Mit Indy oder FastNet ist es ja eigentlich bequemer :lol:.

[sakura]

Hier mal ein kleines Beispiel (Indy 9.x TSMTP Komponente namens SMTP)

Code:

  
  {authentication settings}
  SMTP.AuthenticationType := atLogin; {Simple Login}
  SMTP.Username := 'derNameZumAnmelden';
  SMTP.Password := 'dasDazugehörigePassword';

- Der Rest ist wie normal´ohne AuthSMTP...

...:cat:...

[webby]

Ich hab jetzt einen solchen Code im meinem Proggy stehen:

Code:

procedure TForm1.Button2Click(Sender: TObject);
var Email: TIdMessage;
    i: integer;
begin
  Gauge1.MaxValue := ListBox1.Items.Count;
  Gauge1.Progress := 0;
  Gauge1.MaxValue := ListBox1.Items.Count;
  ListBox2.Clear;

  ListBox2.Items.Add('Setze alle Login-Daten...');
  smtp.Host := Edit1.Text;
  smtp.UserId := Edit2.Text;
  smtp.Password := Edit3.Text;

  ListBox2.Items.Add('Kontaktiere zum Mailserver...');
  smtp.Connect;

  Email := TIdMessage.Create(nil);

  ListBox2.Items.Add('Starte zum Emailsenden...');

  for i := 0 to ListBox1.Items.Count-1 do begin
    Email.Recipients.Clear;
    Email.Recipients.Add.Address := ListBox1.Items.Strings[i];
    Email.Subject := Edit6.Text;
    Email.Body.Text := Memo2.Lines.Text;

    smtp.Send(Email);

    ListBox2.Items.Add('Newsletter wurde erfolgreich an "'+ListBox1.Items.Strings[i]+'" versandt.');
    Gauge1.Progress := i+1;
  end;
end;

(AuthenticationType ist im ObjectManager schon gesetzt.)

Jetzt bekomm ich immer folgenden Error:

Zitat:

Socket Error # 11001

Was mach ich jetzt da falsch?

[Christian Seehase]

Moin Webby,

Fehler 11001 sagt aus:

Zitat:

Zitat von PSDK Mai 2002

No such host is known.

bzw. WSAHOST_NOT_FOUND

Da wird wohl ein Rechner nicht gefunden.

[webby]

Ups, stimmt ich hab ja "smtp.gmx.de" statt "mail.gmx.de" angegeben.:oops:

Naja, ich hab jetzt den Host verbessert aber jetzt kommt trotzdem folgende Fehlermeldung:

Zitat:

553 {mp010-rz3} Only registrated user are allowed to use this system - Dieser Dienst ist eingetragenen Mitgliedern vorbehalten.

Die Logindaten stimmen aber, denn wenn ich den falschen UserID eingebe oder das falsche Passwort kommt:

Zitat:

535 {mp013-rz3} auth failure.

Was mach ich jetzt schon wieder falsch?

[sakura]

Auf Anhieb finde ich keinen Fehler - aber schau Dir mal aus den aktuellen Indy-Demos die Demo MailClient2 an, vielleicht findest Du ja noch einen grundlegenden Unterschied. (Notfalls stelle einfach noch einmal den AuthenticationType im Code ein)...

[webby]

Ok, ich werde es mir das Demo danach einmal anschauen...

[webby]

Hab gerade das Demo doch noch schnell ausprobiert.
Leider kommt da der gleicher Error.:cry:

Ich glaub mir bleibt nichts anderes übrig als selber eine Komponente zu programmieren.
(Ich hab ja schon sowas Programmiert allerdings in PHP und da hat man halt den vorteil das alles Schritt für Schritt abläuft und nicht so "quer" wie in Delphi ;))

[Luckie]

Eventuell liegt es auch an GNX. hats du es mal mit Outlook oder etwas ähnlichem probiert?

[webby]

Wie schon mal gesagt über PHP klappt es super.
Wenn der Quelltext brauchbar wäre, könnte ich ihn hier posten...

Und über Outlook Express funktionierts auch...