IDHttp 403 Forbidden

[Punica]

Guten Tag,

ich programmiere ein Script um eine Datenbank zu fillen.

Man ruft diese Seite auf mit "http://Seite.de/add.php?s=" dann kommt ein Randomstring.

Delphi-Quellcode:

procedure TForm1.Button1Click(Sender: TObject);
var
x,y:integer;
zahl1, zahl2, ergebnis:real;
begin
while x<>y do begin
 Application.ProcessMessages;
 zahl1 := strtofloat(label2.caption);
 zahl2 := strtofloat('1');
 ergebnis := zahl1+zahl2;
if Radiobutton1.Checked then
begin
idhttp1.Get('http://seite.de/add.php?s='+RandomDigitString(strtoint(labelededit2.text)));
end;
if Radiobutton2.Checked then
begin
idhttp1.Get('http://seite.de/add.php?s='+Randomstring(StrToInt(Labelededit2.Text)));
end;
if Radiobutton3.Checked then
begin
idhttp1.Get('http://seite.de/add.php?s='+Randomstring(strtoint(labelededit2.text), labelededit1.text));
end;
Label2.Caption := floatToStr(ergebnis);
end;
end;

Wenn ich das so ausführen lasse, dann kommt immer bei dem 11ten Eintrag ein HTTP Error 403 Forbidden.

Wie kann ich diesen Fehler beheben?

Mfg