2008-10-29
Как удалить все сообщения из почтового ящика?
Сегодня случилось удалять сообщения из POP3 почтового аккаунта в коем набралось больше шести тысяч писем спама. Конечно гораздо проще убить и заново создать ящик, но это слишком просто, гораздо интереснее написать небольшую программку, которая и убьет все сообщения, тем более что здесь нашел замечательную функцию на PHP. Вот ее код:
function deleteAllMessages($server,$username,$password){
$cmd = array();
$cmd[] = "USER $username\r\n";
$cmd[] = "PASS $password\r\n";
$cmd[] = "STAT\r\n";
$cmd[] = "QUIT\r\n";
// Server is your POP3 server, ie pop3.server.com
// Port is the port number ( should be 110 )
$port = 110;
$fp = fsockopen($server, $port);
if(!$fp)
{
print("Error connecting to server $server");
}
else
{
$ret = fgets($fp, 1024);
foreach($cmd as $ret)
{
fputs($fp,$ret);
$line = fgets($fp, 1024);
if($ret=="STAT\r\n")
{
$fields = explode(" ",$line);
print 'found '.$fields[1].' massages
'; $num_mails = $fields[1]; for($i=1;$i<=$num_mails;$i++) { set_time_limit(30); fputs($fp,"DELE $i\r\n"); $line = fgets($fp, 1024); flush(); } } } fclose($fp); } }
'; $num_mails = $fields[1]; for($i=1;$i<=$num_mails;$i++) { set_time_limit(30); fputs($fp,"DELE $i\r\n"); $line = fgets($fp, 1024); flush(); } } } fclose($fp); } }
здесь выложил работающий пример.
разрешены только теги br, font, span, p, strong, u, p, blockquote, a, div, img - остальные будут безжалостно удаляться
комментарии: