1 #include <infodrom.style>
4 <page title="Upcoming Events Calendar">
6 <h1 align=center>Upcoming Events Calendar</h1>
9 if ((strlen ($email) > 0)
10 &&(strlen ($name) > 0)
11 &&(strlen ($event) > 0)
12 &&(strlen ($date) > 0)
13 &&(strlen ($url) > 0)) {
15 $header = "From: $name <$email>";
16 $header = strtr($header, "\015\012", ' ');
18 $body = "Event : " . $event . "\n"
19 ."Date : " . $date . "\n"
20 ."URL : " . $url . "\n"
21 ."Description: " . $description . "\n"
23 ."HTTP_USER_AGENT: " . $HTTP_USER_AGENT . "\n"
24 ."REMOTE_ADDR : " . $REMOTE_ADDR . "\n"
25 ."REMOTE_HOST : " . $REMOTE_HOST . "\n";
27 mail ("joey@infodrom.org", "New event", $body, $header);
28 echo ("<p>Thanks for the note.</p><p>It'll be procesdsed soon.</p>");
30 echo ("<p><b>You haven't completed the form.</b></p><p>Please go back and fill out all fields.</p>.");
34 <p>Download <a href="calendar.ics">iCal</a> or <a href="calendar.rdf">RSS</a> calendar file.</p>