用php得到163的邮件信息2009-11-05
<?
$host="pop.163.com";
$port=110;
$user="******";
$password="******";
if(!($sock=fsockopen(gethostbyname($host),$port,$errno,$errstr)))
exit($errno.": ".$errstr);
set_socket_blocking($sock,true);
$msg=fgets($sock);
echo $msg;
$command="user ".$user."
";
fwrite($sock,$command);
$msg=fgets($sock);
echo $msg;
$command="pass ".$password."
";
fwrite($sock,$command);
$msg=fgets($sock);
echo $msg;
$command="stat
";
fwrite($sock,$command);
$msg=fgets($sock);
echo $msg;
$command="list
";
fwrite($sock,$command);
while(true)
{
$msg=fgets($sock);
echo $msg;
if(preg_match("/^./",$msg))
break;
}
$command="retr 1
";
fwrite($sock,$command);
while(true)
{
$msg=fgets($sock);
echo $msg;
if(preg_match("/^.(
)$/",$msg))
break;
}
$command="quit
";
fwrite($sock,$command);
$msg=fgets($sock);
echo $msg;
?>