Probelm mit CGI-Anwendung

[thomasdrewermann]

Hi,
ich hab eine CGI-Anwendung nach dem Tut erstellt. Es hat folgenden Code:

Delphi-Quellcode:

unit uMainWeb;

interface

uses
  Windows, Messages, SysUtils, Classes, HTTPApp, HTTPProd;

type
  TWebModule1 = class(TWebModule)
    pgpDefault: TPageProducer;
    procedure pgpDefaultHTMLTag(Sender: TObject; Tag: TTag;
      const TagString: String; TagParams: TStrings;
      var ReplaceText: String);
  private
    { Private-Deklarationen }

  public
    { Public-Deklarationen }
  end;

var
  WebModule1: TWebModule1;



implementation

{$R *.DFM}

procedure TWebModule1.pgpDefaultHTMLTag(Sender: TObject; Tag: TTag;
  const TagString: String; TagParams: TStrings; var ReplaceText: String);
begin
  if TagString = 'generator' then
    ReplaceText := 'Web CGI App - Hello World v1'
  else if TagString = 'now' then
    ReplaceText := DateTimeToStr(Now)
  else
    ReplaceText :=
      '<font color="red">[b]Unknown Tag:[/b]</font><font color="blue"> &#' +
        TagString + ' ' + TagParams.Text +
      '&</font>';
end;

end.

Nur leider konnte ich das Prog nicht aufrufen er bietet es nur zu download an. Wenn ich das Prog im 1 und 1 Portal teste sagt er folgendes:

Zitat:

CGI-Monitorausgabe-Ausgabe:

- 126 CGI returned nonzero status
e /usr/bin/nice: /kunden/homepages/26/d72535032/htdocs/temp/demo.exe: Permission denied
- STDOUT OK STDERR OK

Meine Frage warum?

Wäre für Antworten sehr dankbar!!!

MFG
Thomas