3 $mail_to="short@ucw.cz,karel.kratochvil@centrum.cz";
7 .italic { font-style: italic; }
8 .quote { font-family: monospace; }
10 include("common.php");
12 $out="stamp:\t".date("r")."\n";
16 foreach ($HTTP_POST_VARS as $key => $value) {
17 if (!ereg("^want_",$key))
19 if (ereg("[^0-9]",$value)) {
20 print("<h1 class=\"red\">Jako poèet je mo¾no povoleno zadat jen èíselnou hodnotu!</h1>\n"
21 ."<blockquote><p>Opravte prosím polo¾ku "
22 ."<span class=\"italic\">".htmlspecialchars($key)."</span>: "
23 ."<span class=\"quote\">".htmlspecialchars($value)."</span>"
24 ."</p></blockquote>\n");
30 $out.="$key:\t$value\n";
34 if (!$err && !$total) {
35 print("<h1 class=\"red\">Musíte si objednat alespoò jeden èasopis, napi¹te 1 do dané polo¾ky!</h1>\n");
39 function out_addr($title,$pfx)
41 global $HTTP_POST_VARS;
58 $pretty=array_shift($fields);
59 $var=$pfx.array_shift($fields);
60 if (!isset($HTTP_POST_VARS[$var]))
62 if (""==($value=trim($HTTP_POST_VARS[$var])))
68 $r.="\t$pretty:\t$value\n";
73 if (""==($addr1=out_addr("Adresa pro vystavení a zaslání faktury","addr1_"))) {
74 print("<h1 class=\"red\">Nebyla zadána ¾ádná fakturaèní adresa!</h1>\n");
78 $out.=out_addr("Adresa pro zasílaní èasopisu" ,"addr2_");
80 if (isset($HTTP_POST_VARS["comments"])) {
81 $comments=trim(ereg_replace("[\r\n]+","\n",$HTTP_POST_VARS["comments"]));
83 $out.="Jiné sdìlení:".ereg_replace("\n","\\0\t","\n".$comments)."\n";
86 // Data acquision error checking:
89 print("<p>Nyní se prosím ");
91 print("<input type=\"button\" value=\"");
94 print("\" onclick=\"history.back()\" />");
97 .""<span class=\"quote\">Zpìt</span>" èi "
98 .""<span class=\"quote\">Back</span>" prohlí¾eèe)");
99 print(" na pøedchozí stránku a chybu zadaných dat opravte.</p>\n");
103 // Successful data acquisition, write&send:
105 $out_file=$out.str_repeat("-",78)."\n\n";
106 if (!($f=fopen("objednavka.txt","a")) || strlen($out_file)!=fputs($f,$out_file) || !fclose($f))
107 fatal("Nepodaøilo se zapsat objednávku");
109 // 5th mail argument is supported from PHP-4.0.5
110 if (!mail($mail_to,"EnergieWeb: objednavka",$out,
111 "From: EnergieWeb <$admin_mail>
113 Content-Type: text/plain; charset=iso-8859-2
114 Content-Disposition: inline
115 Content-Transfer-Encoding: 8bit
117 fatal("Chyba pøi odesílání upozornìní na objednávku, data objednávky ji¾ ale byla úspì¹nì ulo¾ena");
120 <h1>Objednávka byla úspì¹nì pøijata</h1>
121 <p>V nejbli¾¹ích dnech Vám bude zaslána faktura a po jejím zaplacení i objedané zbo¾í.</p>
122 <p>Nyní se mù¾ete vrátit na <a href="<?php print(dirname($HTTP_SERVER_VARS["SCRIPT_NAME"])."/"); ?>">úvodní stránku</a>.</p>