Veröffentlicht 3. September 200322 j Hy zusammen, ich hab da ein kleines Problem. Ich will, über die Komponentenpalette IndyClients und da speziell, über die Komponente SMTP mails verschicken. Das mit den Mails klappt ja schon mal ganz gut, jetzt aber mal meine Frage: Wie kann ich Anhänge an meine Mails anfügen???? :confused: :confused:
9. September 200322 j Hi, versuch's mal mit folgendem Befehl: TIdAttachment.Create(IdMessage1.MessageParts, Dateiname);
9. September 200322 j Autor Danke für die Hilfe, hab aber in zwischen anderweitig eine Lösung gefunden
10. September 200322 j Morgen, kannst du bitte den Delphicode mal posten. ich muss nämlich auch emails verschicken, programmiere allerdings erst seit einer woche in delphi!! Ciao Antibiotik
10. September 200322 j Autor hmmm hatte mir die seite seinerzeit auch angesehen ABER war nicht hilfreich da im grunde da nur sowas steht wie:"ja klar kann man dateien mittels INDY verschicken und klar kann man einen anhang dran haengen" ABER es stand nicht drin wie!!!
10. September 200322 j Original geschrieben von lichtbringer hmmm hatte mir die seite seinerzeit auch angesehen ABER war nicht hilfreich da im grunde da nur sowas steht wie:"ja klar kann man dateien mittels INDY verschicken und klar kann man einen anhang dran haengen" ABER es stand nicht drin wie!!! Sorry, ich meinte auch Antibiotik damit.
10. September 200322 j Autor Original geschrieben von Antibiotik Morgen, kannst du bitte den Delphicode mal posten. ich muss nämlich auch emails verschicken, programmiere allerdings erst seit einer woche in delphi!! Jep da is er auch schon: procedure TForm1.Senden var Email : TIdMessage; begin try nSMTP.Connect; //nSmtp = Name der Indy SMTP Komponente EMail.Clear; EMail.Date := Now; EMail.From.Name := 'AbsenderName'; EMail.From.Address := 'AbsenderAdresse'; EMail.ReplyTo.Add.Address := 'AbsenderAdresse'; EMail.Recipients.Add.Address := 'Empfaenger'; EMail.Subject := 'Betreff'; TIdAttachment.Create(EMail.MessageParts,'Pfad und Dateiname c:\test.txt')');//Anhang EMail.Body.Text := meText.Text; nSMTP.Send(EMail); nSMTP.Disconnect; except end end; Was du auch noch machen musst, ist der Komponente SMTP zu sagen, welche SMTP Daten sie benötigt: nSMTP.Host := 'mail.gmx.net'; nSMTP.AuthenticationType := atLogin; //Steck in den INDY Komponenten und Sagt aus das eine Authentifizierung beim Senden Benötigt wird. nSMTP.Username := 'xyz@gmx.de'; nSMTP.Password := '*********'; kannst du Theoretisch vor den TRY EXCEPT Block klatschen:D
10. September 200322 j Autor Original geschrieben von Stevie Sorry, ich meinte auch Antibiotik damit. :D Nur wird es Ihm wohl auch nicht so richtig weiter Helfen :D
10. September 200322 j Also, ich hab mir das auch zuerst angeschaut. Bis darauf, dass die Erklärung fehlt, wie man Anhänge verschickt, ist das doch sehr gut zu verstehen. Ich hab's jedenfalls verstanden! *stichel*
11. September 200322 j hallo, Original geschrieben von lichtbringer :D Nur wird es Ihm wohl auch nicht so richtig weiter Helfen :D da ich keine anhänge verschicke, hat mir des schon geholfen!! Ciao Antibiotik
11. September 200322 j Autor OK OK zugegeben, wenn man nicht grad Anhänge verschickt ist das Toutorial gut
Archiv
Dieses Thema wurde archiviert und kann nicht mehr beantwortet werden.