Opened by piero at 2004-03-30 12:56
User since
2004-03-03
98 Artikel
BenutzerIn
![[default_avatar]](/battie/theme/default/default_avatar.gif)
2004-03-03
98 Artikel
BenutzerIn
Hallo,
habe eine Sendmail-Funktion eingebaut. Das Formular wird auch verschickt, aber ohne Inhalt. Habe mir dabei die Dokumentation aus dem Wiki durchgelesen, aber leider ohne Erfolg.
Könnte mir jemand vielleicht bitte sagen, wo der Fehler liegt?
Vielen Dank im Voraus.
--
Gruß
Piero
Hier kommt der Code:
edit renee: schließendes [code]-Tag eingefügt...\n\n
<!--EDIT|renee|1080638931-->
habe eine Sendmail-Funktion eingebaut. Das Formular wird auch verschickt, aber ohne Inhalt. Habe mir dabei die Dokumentation aus dem Wiki durchgelesen, aber leider ohne Erfolg.
Könnte mir jemand vielleicht bitte sagen, wo der Fehler liegt?
Vielen Dank im Voraus.
--
Gruß
Piero
Hier kommt der Code:
Code: (dl
)
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
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
#!/usr/bin/perl -w
use MIME::Base64;
use strict;
use warnings;
use CGI;
use CGI::Carp qw(fatalsToBrowser);
open(M, "|/usr/sbin/sendmail -t");
print M "To: Piero <gior\@imap>\n";
print M "Subject: Test\n";
my ($Feld, $Name, $Wert);
my %Formular;
my $cgi=CGI->new();
print $cgi->header(-type=>'text/html');
%Formular=$cgi->Vars();
#print "Nicht formatierte Ausgabe:\n\n";
print '<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01//EN">', "\n";
print "<html><head><title>CGI-Feedback</title></head>\n";
print "<body><h1>Kundenerfassung</h1>\n";
print "<p><b>Art:</b> $Formular{ART}";
print "<b>
mular{NUMMER}\n";
print "<p><b>Kurzname:</b> $Formular{KURZNAME}</p>\n";
print "<p><b>Name1:</b> $Formular{NAME1}</p>\n";
print "<p><b>Name2:</b> $Formular{NAME2}</p>\n";
print "<p><b>Name3:</b> $Formular{NAME3}</p>\n";
print "<p><b>Straße:</b> $Formular{STRASSE}</p>\n";
print "<p><b>Land:</b> $Formular{LAND}</p>\n";
print "<p><b>PLZ:</b> $Formular{PLZ}</p>\n";
print "<p><b>Ort:</b> $Formular{ORT}</p>\n";
print "<p><b>Postfach:</b> $Formular{POSTFACH}</p>\n";
print "<p><b>Postfach-Plz:</b> $Formular{POSTFACH_PLZ}</p>\n";
print "<p><b>Telefon:</b> $Formular{TELEFON}</p>\n";
print "<p><b>Fax:</b> $Formular{FAX}</p>\n";
print "<p><b>Mobil:</b> $Formular{MOBIL}</p>\n";
print "<p><b>Klassifizierung:</b> $Formular{Klasse}</p>\n";
print "<p><b>MwSt:</b> $Formular{MWST}</p>\n";
print "<p><b>UST_IDENT_NR:</b> $Formular{UST_IDENT_NR}</p>\n";
print "<p><b>Abteilung1:</b> $Formular{Abteilung1}</p>\n";
print "<p><b>Abteilung2:</b> $Formular{Abteilung2}</p>\n";
print "<p><b>Abteilung3:</b> $Formular{Abteilung3}</p>\n";
print "<p><b>VK:</b> $Formular{VK}</p>\n";
print "<p><b>Lieferbedingung:</b> $Formular{LIEFERBEDINGUNG}</p>\n";
print "<p><b>Zahlungsbedingungen:</b> $Formular{ZAHLUNGSBEDINGUNGEN}</p>\n";
print "<p><b>Kreditlimit:</b> $Formular{KREDITLIMIT}</p>\n";
print "<p><b>Ansprech_Name:</b> $Formular{ANSPRECH_NAME}</p>\n";
print "<p><b>Ansprech_Vorname:</b> $Formular{ANSPRECH_VORNAME}</p>\n";
print "<p><b>Ansprch_Abt:</b> $Formular{ANSPRECH_ABT}</p>\n";
print "<p><b>Ansprech_Funktion:</b> $Formular{ANSPRECH_FUNKT}</p>\n";
print "<p><b>Vertriebsgebiet:</b> $Formular{VERTRIEBSGEBIET}</p>\n";
print "<p><b>Produktzielgruppe:</b> $Formular{PRODUKTZIELGRUPPE}</p>\n";
print "<p><b>Verfasser:</b> $Formular{VERFASSER}</p>\n";
print "<p><b>Bemerkung:</b> $Formular{BEMERKUNGEN}</p>\n";
print "---------------------------------------------------------------------
----------------------------------------------------------------------------
---\n\n";
#print "Formatierte Ausgabe:\n\n";
print '<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01//EN">', "\n";
print "<html><head><title>CGI-Feedback</title></head>\n";
print "<body><h1>Kundenerfassung</h1>\n";
print "$Formular{KURZNAME}<br />";
print "$Formular{NAME1}<br />";
print "$Formular{NAME2}<br />";
print "$Formular{NAME3}<br />";
print "$Formular{STRASSE}<br />";
print "$Formular{LAND}<br />";
print "$Formular{PLZ}<br />";
print "$Formular{ORT}<br />";
print "$Formular{POSTFACH}<br />";
print "$Formular{POSTFACH_PLZ}<br />";
close(M);
edit renee: schließendes [code]-Tag eingefügt...\n\n
<!--EDIT|renee|1080638931-->