// Debug Flag
$debug = False;
$reportemail = 'report@emailaddress.com';
$presidentemail = 'president@bemailaddress.com';
$webmasteremail = 'webmaster@emailaddress.com';
//$pwd = 'password';
//check for new messages
$mailbox = imap_open("{localhost/pop3:110}INBOX", 'email@emailaddress.com', 'password');
if ($mailbox)
{
// Check messages
$check = imap_check($mailbox);
if ($debug) {
print("");
print(" ");
print(" imap_check");
print(" ");
print(" ");
print(" ");
print(" Date most recent message : " . $check->Datum);
Druck („ ");
Druck („ Verbindungstyp: “. $check->Driver);
Druck („ ");
Druck („ Name des Briefkastens: “. $check->Mailbox);
Druck („ ");
Druck („ Zahl der Mitteilungen: “. $check->Nmsgs);
Druck („ ");
Druck („ Zahl der neuen Mitteilungen: “. $check->Recent);
Druck („ ");
Druck („ "); } //, das geht die neuen Mitteilungen schlingen und finden zu müssen die //, das wir nicht noch analysiert. die letzte Mitteilung numerisches // in einer Textdatei speichern. // öffnen die Gegenakte und erhalten die letzte Mitteilung überprüft. // schlingen dann durch die Mitteilungen, die an der überprüften Letzt-//-Mitteilung + 1. $lastmsg = file_get_contents anfangen („msgcounter.dat ") + 1; // erhalten Überschrift für Mitteilungen für ($index = $lastmsg-1; $index <>Nmsgs; $index++) {$games = Reihe (); $recips = Reihe (); $header = imap_header ($mailbox, $index); wenn ($debug) {Druck (“
");
Druck („ Überschrift-Datum: “. $header->Date. „ ");
$toname = $header->to [0] - >personal;
$toaddress = „<“. $header->to [0] - >mailbox. „@“. $header->to [0] - >host. „>“;
Druck („Überschrift: “. $toname. „„. $toaddress. “ ");
$fromname = $header->from [0] - >personal;
$fromaddress = „<“. $header->from [0] - >mailbox. „@“. $header->from [0] - >host. „>“;
Druck („Überschrift von: “. $fromname. „„. $fromaddress. “ ");
Druck („ Überschrift cm: “. $header->cc. „ ");
Druck („ Überschrift ReplyTo: “. $header->ReplyTo. „ ");
Druck („ Überschrift-Thema: “. $header->Subject. „
"); Druck (“ ");
Druck ( htmlspecialchars (quoted_printable_decode (imap_body ($mailbox, $index))));
Druck („ "); } sonst {//-aufspaltete Score-221-4-0-42 Liste ($sub, $gamenum, $visitorscore, $homescore, $teamnum) = (“ - „, $header->Subject); // aktualisieren jetzt die Spieltabelle NUR wenn das vaiable $sub = „Kerbe“ wenn (strcasecmp ($sub, „KERBE ") == 0) {$sql = „Updatespiele \ n“; $sql. = „visitorscore einstellen =“. $visitorscore. “, homescore = „. $homescore. “ \ n "; $sql. = „wo gamenum =“. $gamenum. „und \ n“; $sql. =“ (\ n "; $sql. = „(homeid =“. $teamnum.") \ n“; $sql. =“ oder \ n "; $sql. = „(visitorid =“. $teamnum.") \ n“; $sql. = ") \ n "; // tun Druck des DB-Materials hier… ($sql); // hinzufügen $games Reihe für neueres Bericht array_push icht ($games, Reihe ($gamenum, $visitorscore, $homescore)); // hinzufügen den Absender dieser eMail $recips Reihe // für neuere sendende Bestätigungs-eMail $fromname = $header->from [0] - >personal; $fromaddress = „<>[0] - vom >mailbox. „@“. $header->from [0] - >host. „>“; array_push ($recips, $fromname.“ „. $fromaddress); } imap_close ($mailbox); //-Speicher die letzte überprüfte Nachrichtennummer zur Gegenakte. Druck ($index. “ \ n "); //file_put_contents („msgcounter.dat“, $index); wenn (! $handle = fopen („msgcounter.dat“, „w ")) {Echo „kann nicht geöffnete Akte („msgcounter.dat ")“; Ausgang; } schreiben // $index zu unserer geöffneten Akte. wenn (fwrite ($handle, $index) === FALSCH) {Echo „kann nicht zur Akte („msgcounter.dat ") schreiben“; Ausgang; } fclose ($handle); }} schicken // Mitteilung-Absender, Liga-Präsident und dem Webmaster jetzt Bestätigungen $headers = „Pantomime-Version: 1.0 \ n“; $headers. = „Inhalt-Art: Text/normales; charset=iso-8859-1 \ n“; $headers. = „X-Priorität: 3 \ n“; $headers. = „X-MS-Mail-Priorität: Normal \ n“; $headers. = „X-Werbung: PHP \ n“; $headers. = „von: \ „automatisierte Kerben \“ <>\ n "; $message = „die Kerbe für diese Spiele berichtet worden: \ n“; für ($i = 0; $i <>Thema, $message, $headers); Post ($webmasteremail, „Kerbe berichtet“ + $header->Subject, $message, $headers); für ($i = 0; $i <>Thema, $message, $headers); }} sonst {Druck („kann Briefkasten nicht öffnen“); }? >
|