Formmailer umstellen auf SMTP

Dieses Thema Formmailer umstellen auf SMTP im Forum "Windows XP Forum" wurde erstellt von Luigi_Tirol, 20. Dez. 2006.

Thema: Formmailer umstellen auf SMTP hallo leute. hab da ein problem. mein provider hat mir den versand meiner formulare über sendmail gesperrt, da...

  1. hallo leute.
    hab da ein problem.
    mein provider hat mir den versand meiner formulare über sendmail gesperrt, da anscheinend spam
    mit meinem script versendet wird.
    jetzt hat er mir gesagt ich soll auf SMTP zum versand der daten umsteigen... ???

    was muss ich da machen? wie geht das??

    hier mal das script:

    Code:
    #!/usr/bin/perl -w
    
    # -------> SMTP-Programm zum Versenden der Mail:
    $Sendmail_Prog = /usr/sbin/sendmail;
    
    # -------> Modul für CGI-Scripts einbinden:
    use CGI;
    
    # -------> Modul für CGI-Scripts zum Einlesen der Formulardaten anwenden:
    $query = new CGI;
    @names = $query->param;
    
    # -------> interne Daten aus den erwarteten hidden-Feldern auslesen:
    $delimiter = $query->param('delimiter'); # ---> Begrenzerzeichen zwischen name und value
    # $mailto = $query->param('mailto');    # ---> Empfängeradresse
    $mailto =->info@XXX.at';    # ---> Empfängeradresse
    $returnhtml = $query->param('return');  # ---> URL für Dankeseite
    $subject = $query->param('subject');   # ---> E-Mail-Subject
    $emailadress = $query->param('E-mail');	# Email Gast
    $gastname = $query->param('Name');	# Name Gast
    $gastanrede = $query->param('button');	# Anrede Gast
    
    # -------> Text der E-Mail aus den Formulardaten ermitteln:
    $mailtext = ;
    foreach(@names) {
     $name = $_;
     @values = ;
     @values = $query->param($name);
     if($name ne mailto && $name ne return && $name ne subject && $name ne delimiter) {
      foreach $value (@values) {
       $mailtext = $mailtext.$name;
       $mailtext = $mailtext.$delimiter;
       $mailtext = $mailtext.$value.\n;
      }
     }
    }
    
    # -------> E-Mail versenden:
    open(MAIL,|$Sendmail_Prog -t) || print STDERR Mailprogramm konnte nicht gestartet werden\n;
    print MAIL To: $mailto\n;
    print MAIL From: $emailadress\n;
    print MAIL Return-Path: $emailadress\n;
    print MAIL Subject: $subject\n\n;
    print MAIL $mailtext\n;
    close(MAIL);
    
    # -------> E-Mail an Gast
    open(MAIL,|$Sendmail_Prog -t) || print STDERR Mailprogramm konnte nicht gestartet werden\n;
    print MAIL To: $emailadress\n;
    print MAIL From: $mailto\n;
    print MAIL Return-Path: $mailto\n;
    print MAIL Subject: Ihre Nachricht an Hotel Reitlwirt\n\n;
    print MAIL Liebe(r) $gastanrede $gastname,
    vielen Dank für Ihr Interesse an unserem Hotel! Wir werden Ihre Anfrage umgehend bearbeiten!
    
    Dies ist eine Kopie Ihrer Nachricht an uns. Sie brauchen darauf nicht zu antworten.
    Die Antwort auf Ihre Anfrage erhalten Sie in einer separaten Email.
    
    
    $mailtext\n;
    close(MAIL);
    
    
    # ---------> E-Mail-Adress von Gast an Dankeseite übergeben
    open (FILE, >daten/gastmail_anfrage.dat);
    flock (FILE, 2);
    print FILE $emailadress\n;
    close FILE;
    
    print Location: $returnhtml\n\n;
    oder könnt ihr mir ein anderes script empfehlen das sicher ist.

    :verschoben1: Gehört zwar irgendwie zur Webentwicklung, aber Perl bzw. CGI wird seperat behandelt ;)
     
Die Seite wird geladen...

Formmailer umstellen auf SMTP - Ähnliche Themen

Forum Datum
Suche Formmailer Webentwicklung, Hosting & Programmierung 27. Aug. 2010
Formmailer mit SMTP Auth Windows XP Forum 4. Aug. 2008
einfachen Formmailer mit JS Webentwicklung, Hosting & Programmierung 2. Okt. 2006
Formmailer Webentwicklung, Hosting & Programmierung 7. Sep. 2006
Formmailer bei 1und1 Windows XP Forum 24. Mai 2006