Gästebuch - eMails ohne Formatierung - warum ?

[Ingo Siemon]

Hallo

das bringt uns leider auch nicht weiter (abgesehen von der Erkenntnis, dass Du "Perl" nicht schreiben kannst *g*). Hilfreich wäre der Quellcode(!) einer Mail (inkl. Header!), und natürlich das Code-Schnipselchen, welches diese aus der Text-Datei generiert. Die Datei selbst ist vermutlich unerheblich; schau sie Dir aber bitte auch noch mal an.

OK, hier also die beiden Teile des Scripts, welche die
eMails genaerieren:

------------------------------------------------------------------
  ##########################
  #Send E-mail to Recipient
  ##########################

open (MAIL, "|$mailprog -t") || die "Can't open $mailprog!\n";
   print MAIL "To: $VALUE{'MAILTO'} ($VALUE{'RECIPIENT'})\n";
   print MAIL "From: $VALUE{'MAILFROM'} ($VALUE{'SENDER'})\n";
   print MAIL "Subject: $VALUE{'RECIPIENT'}, $subject1\n\n";

open(TEMPLATE,"$email1");
   &template;
   print MAIL $template;

#print MAIL ".\n" ;
   close(MAIL);

$deletes = "$cards$DATE.dat";

if(-e $deletes){
   }
   else{
     open(DATA, ">>$deletes");
     close(DATA);
     &delete;
   }
   exit;
}
------------------------------------------------------------------

und

------------------------------------------------------------------

############################################
   #Makes Postcards and Sends Thank You E-mail
   ############################################
   $create_card = "$cards$ENV{'QUERY_STRING'}.dat";

if(-e $create_card){
    open(DATA, "$create_card");
    @data = <DATA>;
    close(DATA);

foreach $temp (@data){
    chop($temp);
    ($SENDER, $MAILFROM, $RECIPIENT, $MAILTO, $MESSAGE, $PICTURES, $COUNT) = split(/|/, $temp);

$VALUE{'SENDER'} = $SENDER;
       $VALUE{'MAILFROM'} = $MAILFROM;
       $VALUE{'RECIPIENT'} = $RECIPIENT;
       $VALUE{'MAILTO'} = $MAILTO;
       $VALUE{'MESSAGE'} = $MESSAGE;
       $VALUE{'MESSAGE'} =~ s/  /  /g;
       $VALUE{'PICTURES'} = "$basepicurl$PICTURES";
       $VALUE{'LINK'} = "$link$LINK";
       $VALUE{'PICTURE'} = "$basepicurl$PICTURES";
    }

unlink("$create_card");

open(DATA, ">>$create_card");
    $COUNT++;
    print DATA "$SENDER|$MAILFROM|$RECIPIENT|$MAILTO|$MESSAGE|$PICTURES|$COUNT\n";
    close(DATA);

print "Content-type: text/html\n\n";
      open(TEMPLATE,"$makecard");
      &template;
      print $template;

$template = '';

if($COUNT eq '1'){
   open (MAIL, "|$mailprog -t") || die "Can't open $mailprog!\n";
   print MAIL "To: $VALUE{'MAILFROM'} ($VALUE{'SENDER'})\n";
   print MAIL "From: $VALUE{'MAILTO'} ($VALUE{'RECIPIENT'})\n";
   print MAIL "Subject: $subject2\n\n";

open(TEMPLATE,"$email2");
   &template;
   print MAIL $template;

print MAIL ".\n" ;
   close(MAIL);
  }
     }
   else {
      print "Content-type: text/html\n\n";
      open(TEMPLATE,"$error");
      &template;
      print $template;
     }
exit;
}

------------------------------------------------------------------

Die beiden eMail-TXT-Dateien heissen:

mail1.txt
mail2.txt

uns sehen folgendermassen aus:

------------------------------------------------------------------
Hallo %%%RECIPIENT%%%,

%%%SENDER%%% hat Ihnen eine SPACEart-Internet-ePostkarte geschickt.
Um sich die ePostkarte anzusehen, klicken Sie bitte einfach auf folgenden Link:

%%%url_of_card%%%

Die ePostkarte wurde erstellt am %%%SHORTDATE%%%,
und wird nun %%%MAX_DAYS%%% Tage für Sie gespeichert.

++++++++++++++++++++++++++++++++++++++++++++++
SPACEart  - Science Fiction + Erotik Modellbau
Grosser Online-Shop mit über 1300 Artikeln

Telefon:  02 51 - 379 40 58
Telefax:  02 51 - 379 40 63
Internet: http://www.SPACEart.info
eMail:    [e-mail]
------------------------------------------------------------------

und

------------------------------------------------------------------

Hallo %%%SENDER%%%,

Dies ist nur eine kurze info-eMail,
dass die SPACEart-Internet-ePostkarte,
welche Sie an %%%RECIPIENT%%% geschickt hatten,
am %%%SHORTDATE%%% abgerufen wurde.

Wenn Sie noch weitere SPACEart-Internet-ePostkarten versenden möchten,
besuchen Sie uns wieder:
http://www.SPACEart.info
(klicken Sie auf "ePostkarten")

Vielen Dank und Gruß aus Münster
Ingo Siemon

++++++++++++++++++++++++++++++++++++++++++++++
SPACEart  - Science Fiction + Erotik Modellbau
Grosser Online-Shop mit über 1300 Artikeln

Telefon:  02 51 - 379 40 58
Telefax:  02 51 - 379 40 63
Internet: http://www.SPACEart.info
eMail:    [e-mail]

------------------------------------------------------------------

Ausprobieren lässt sich das ganze auf: http://www.SPACEart.info
(Einfach links auf "ePaostkarten" klicken und eine Karte an sich selber schicken)

Über weitere Hilfe würde ich mich wie immer riesig freuen :)

Gruß aus Münster
Ingo Siemon