Sie sind nicht angemeldet.
Lieber Besucher, herzlich willkommen bei: Aqua Computer Forum. Falls dies Ihr erster Besuch auf dieser Seite ist, lesen Sie sich bitte die Hilfe durch. Dort wird Ihnen die Bedienung dieser Seite näher erläutert. Darüber hinaus sollten Sie sich registrieren, um alle Funktionen dieser Seite nutzen zu können. Benutzen Sie das Registrierungsformular, um sich zu registrieren oder informieren Sie sich ausführlich über den Registrierungsvorgang. Falls Sie sich bereits zu einem früheren Zeitpunkt registriert haben, können Sie sich hier anmelden.
![]() |
Quellcode |
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 |
#!/usr/bin/perl -w use strict; use CGI; use CGI::Carp qw(fatalsToBrowser); my $cgi = new CGI; print $cgi->header(-type =>'text/html', -expires =>'+1h'), $cgi->start_html(-title =>'Formularverarbeitung', -author =>'e-mail adresse', -base =>'true', -target =>'_blank', -BGCOLOR=>'#FFFFCC', -TEXT =>'#000000', -LINK =>'red', -VLINK =>'blue', -ALINK =>'black'), $cgi->end_html(); |
![]() |
Quellcode |
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 |
<p style="width: 489px;"><span style="font-weight: bold;" class="style4"> Kontaktformular</span><br> </p> <span style="font-weight: bold;"><br> </span> <form action=""> <table border="0" cellpadding="3" cellspacing="0"> <tbody> <tr> <td style="color: rgb(192, 192, 192); font-weight: normal;" align="right">Name:</td> <td><input name="Vorname" class="Feld" size="30" maxlength="30" type="text"></td> </tr> <tr> <td style="color: rgb(192, 192, 192); font-weight: normal;" align="right">eMail:</td> <td><input name="eMail" class="Feld" size="30" maxlength="30" type="text"></td> </tr> <tr> <td style="color: rgb(192, 192, 192); font-weight: normal;" align="right">Website:</td> <td><input name="Website" class="Feld" size="30" maxlength="30" type="text"></td> </tr> <tr> <td style="color: rgb(192, 192, 192); font-weight: normal;" align="right" valign="top">Mitteilung:</td> <td><textarea name="Text" class="Bereich" rows="10" cols="50"></textarea></td> </tr> <tr> <td style="color: rgb(192, 192, 192); font-weight: normal;" align="right">Formular:</td> <td> <input class="Button" value="Absenden" type="submit"><input class="Button" value="Abbrechen" type="reset"></td> </tr> </tbody> </table> </form> |
giantnine
Junior Member
![]() |
Quellcode |
1 2 3 4 5 6 7 8 9 10 11 |
my $sendmail = "/usr/lib/sendmail -t"; my $subject = "Betreff"; my $content = "Text"; my $send_to = "mail\@domain.de"; my $from = "from\@domain.de"; open(MAIL, "|$sendmail") or die "Cannot open $sendmail: $!"; print MAIL "To: $send_to\n"; print MAIL "From: $from\n"; print MAIL "Subject: $subject\n\n"; print MAIL "$content\n"; close(MAIL); |
![]() |
Quellcode |
1 |
<form action="script.cgi" method="post"> |
![]() |
Quellcode |
1 2 3 4 5 6 7 |
read(STDIN, my $Daten, $ENV{'CONTENT_LENGTH'}); my @Formularfelder = split(/&/, $Daten); my %Formular; foreach $Feld (@Formularfelder) { (my $Name, my $Wert) = split(/=/, $Feld); $Formular{$Name} = $Wert; } |
![]() |
Quellcode |
1 |
$Formular{Vorname} |
Jeder Browser stellt es anders da![]()
Zitat
<?php // wenn das Formular übermittelt wurde
if(isset($_POST['abschicken'])){
while(list($feld,$wert)=each($HTTP_POST_VARS)){
// übermittelte Inhalte "entschärfen"
$wert=preg_replace("/(content-typebcc
cc
to
from
/im", "",$wert);
$$feld=$wert;
// die übermittelten Variablen werden zum "Text der Email" zusammengefasst
if($feld!="abschicken"){
$mailnachricht.=ucfirst($feld).": $wert\n";
}
}
$mailnachricht.="\nDatum/Zeit: ". date("d.m.Y H:i:s");
// Überprüfen ob alle Pflichtfelder gefüllt sind
empty($nachname) ? $err[] = "<p>- Bitte den Nachnamen angeben.</p>" : false;
empty($vorname) ? $err[] = "<p>- Bitte den Vornamen angeben.</p>" : false; empty($email) ? $err[] = "<p>- Bitte die Email-Adresse angeben.</p>" : false; empty($text) ? $err[] = "<p>- Welchen Wunsch haben Sie? Bitte den Text eingeben.</p>" : false; // wenn nicht, werden die Fehlermeldungen ausgegeben und das "halbgefüllte" Formular angezeigt
if(!empty($err)) {
echo "<p>Bitte korrigieren Sie folgende Fehler:</p>";
foreach($err as $fehler){
echo $fehler;
} ?>
giantnine
Junior Member
giantnine
Junior Member
Das würde ich aus der Schilderung heraus auch mal vermuten. Guck mal in deinen Vertrag, was genau du abgeschlossen hast. Es gibt auch Hoster, die Programmcode-Ausführung nur erlauben, wenn die Code-Dateien in speziellen Ordnern liegen.Dein Webspace hat scheinbar keine PHP-Unterstützung.
Zitat
Mit welcher Technik sind Ihre Server ausgestattet?
Unsere Server sind Dual Pentium III 500 -Systeme mit Linux-Betriebssystem und Apache-Server. Alle Rechner besitzen zum Schutz Ihrer Daten RAID5-Systeme.
giantnine
Junior Member
![]() |
Quellcode |
1 |
body, table, tr, td, li, a {color:#5B8FBE;font-family:Arial,Helvetica,sans-serif;font-size:12px;} |
-