echo "<PRE>Message ", Key($result), ", Unique ID - \"", $result[Key($result)], "\"</PRE>\n"; } if ($messages > 0) { if (($error = $pop3->RetrieveMessage(1, $headers, $body, 2)) == "") { echo "<PRE>Message 1:\n---Message headers starts below---</PRE>\n"; for ($line = 0; $line < count($headers); $line++) { echo "<PRE>", HtmlSpecialChars($headers[$line]), "</PRE>\n"; } echo "<PRE>---Message headers ends above---\n---Message body starts below---</PRE>\n"; for ($line = 0; $line < count($body); $line++) { echo "<PRE>", HtmlSpecialChars($body[$line]), "</PRE>\n"; } echo "<PRE>---Message body ends above---</PRE>\n"; if (($error = $pop3->DeleteMessage(1)) == "") { echo "<PRE>Marked message 1 for deletion.</PRE>\n"; if (($error = $pop3->ResetDeletedMessages()) == "") { echo "<PRE>Resetted the list of messages to be deleted.</PRE>\n"; } } } } if ($error == "" && ($error = $pop3->Close()) == "") { echo "<PRE>Disconnected from the POP3 server "" . $pop3->hostname . "".</PRE>\n"; } } else { $error = $result; } } else { $error = $result; } }