IMAP login
$protocol = $_POST['protocol'];
$server = $_POST['server'];
$username = $_POST['username'];
$password = $_POST['password'];
echo "Protocol=".$protocol;
echo ", server=".$server;
echo ", username=".$username;
echo ", password=".$password;
echo "
\n";
if (! function_exists("imap_open")) {
echo("IMAP is not available on this server\n");
// die("IMAP is not available on this server");
} else {
$mbox = imap_open("\{$server/$protocol}", "$username", "$password",
OP_READONLY);
//#$mbox = imap_open("{$server}", "$username", "$password", OP_READONLY);
echo "Mailboxes
\n";
$folders = imap_listmailbox ($mbox, "\{$server/$protocol}", "*");
if ($folders == false) {
echo "I couldn't list your $protocol mailboxes on $server\n";
} else {
echo "";
while (list($key, $val) = each($folders)) {
echo "- $val\n";
}
echo "
\n";
}
echo "INBOX
\n";
$headers = imap_headers ($mbox);
if ($headers == false) {
echo "I couldn't list messages in your INBOX\n";
} else {
echo "";
while (list($key, $val) = each($headers)) {
echo "- $val\n";
}
echo "
\n";
}
imap_close($mbox);
}
?>
David Horton
Last modified: Thu Jul 6 13:23:59 EST 2000