我們在做網(wǎng)站發(fā)布文章的時候，難免需要一些圖片等等讓文章更豐富，但是在刪除的時候卻發(fā)現(xiàn)只能刪除文章內(nèi)容，里面曾經(jīng)上傳的圖片和附件確實還保留在服務(wù)器中，占用著我們有限的空間。

今天織夢模板網(wǎng)就分享一個很實用的功能，刪除織夢文章的同時刪掉該文章下的圖片與附件等文件，有效的節(jié)省了后期慢慢排除無用圖片和附件的時間還實時節(jié)省了一些不必要的存儲空間。

實現(xiàn)方法如下：

1.打開/include/extend.func.php文件，在最后加入如下代碼

//解析body數(shù)據(jù)，獲得所有圖片的絕對地址 
function GetPicsTruePath($body,$litpic) 
{
        $delfiles = array();
        //存儲圖片地址數(shù)據(jù) 
        if(!empty($litpic)) 
          {
                $litpicpath = GetTruePath();
                $litpicpath .= $litpic;
                $delfiles[] = $litpicpath;
                //縮略圖地址
        }
        preg_match_all("/src=[\"|'|\S|\s]([^ |\/|>]*){0,}(([^>]*)\.(gif|jpg|png))/isU",$body,$tmpdata); 
  $picspath = array_unique($tmpdata[2]);//body中所有圖片的地址 
  foreach($picspath as $tmppath) 
  { 
    $path = GetTruePath();//獲得絕對路徑 
    $picpath = preg_replace("/[a-zA-z]+:\/\/[^ |\/|\s]*/",'',$tmppath);//去掉網(wǎng)址部分 
    $path .=$picpath; 
    $delfiles[] = $path;//保存處理后的數(shù)據(jù) 
  } 
  return $delfiles; 
} 
//獲得文章Body數(shù)據(jù)  
function GetArcBody($aid)  
{  
global $dsql;  
$query = "SELECT js_addonarticle.body FROM xmzy_addonarticle WHERE xmzy_addonarticle.aid = '$aid'";  
$row = $dsql->GetOne($query);  
if(is_array($row))  
return $row;  
else  
return false;  
} 
//修改于2010.01.28 
//寫入日志文件  
function WriteToDelFiles($msg)//刪除文章的時候會通過此函數(shù)記錄日志  
{  
if(empty($msg)) $savemsg="未獲得消息";  
else $savemsg = $msg;  
$errorFile = dirname(__FILE__).'/../data/del_body_file.txt';//刪除記錄文件  
$fp = @fopen($errorFile, 'a');  
@fwrite($fp," {$savemsg}");  
@fclose($fp);  
}

2.打開dede/inc/inc_batchup.php文件，找到：

$arcRow = $dsql->GetOne($arcQuery);

在下邊添加：

$arcBodyRow = GetArcBody($aid);

最后找到：

return TRUE;

在這句話上邊添加：

//解析Body中的資源，并刪除  
$willDelFiles = GetPicsTruePath($arcBodyRow['body'],$arcRow['litpic']);
$nowtime = time();
$executetime = MyDate('Y-m-d H:i:s',$nowtime);
//獲得執(zhí)行時間  
$msg = " 文章標題：$arcRow[title]";
WriteToDelFiles($msg);
if(!empty($willDelFiles))  
{
        foreach($willDelFiles as $file)  
        {
                if(file_exists($file) && !is_dir($file))  
                {
                        if(unlink($file)) $msg = " 位置：$file 結(jié)果：刪除成功！ 時間：$executetime"; else $msg = " 位置：$file 結(jié)果：刪除失?。?時間：$executetime";
                }
                else $msg = " 位置：$file 結(jié)果：文件不存！ 時間：$executetime";
                WriteToDelFiles($msg);
        }
        //END foreach
} else  
{
        $msg = " 未在Body中解析到數(shù)據(jù) Body原始數(shù)據(jù)：$arcBodyRow[body] 時間：$executetime";
        WriteToDelFiles($msg);
}

然后保存，這樣處理后就實現(xiàn)了刪除文章連帶當前文章的圖片和附件一同刪除。

下面是其他網(wǎng)友的補充

首先添加兩個函數(shù)

/*
根據(jù)文檔id獲取文檔的body部分
*/
function getArcBody($arcid)
{
global $dsql;
if(empty($arcid)) return ;
$body = '';
$query = "select arc.*,ch.addtable,ch.fieldset from `dede_arctiny` as arc left join `dede_channeltype` as ch on arc.channel=ch.id where arc.id=$arcid";
$row = $dsql->GetOne($query);
if(empty($row)) return ;
$addtable = $row['addtable'];
$fieldset = $row['fieldset'];
include_once(DEDEINC.'./dedetag.class.php');
$dtp = new DedeTagParse();
$dtp->SetNameSpace('field','<','>');
$dtp->LoadSource($fieldset);
if(is_array($dtp->CTags))
{
foreach($dtp->CTags as $tid=>$tag)
{
if($tag->GetAtt('type')=='htmltext')
{
$body = $tag->GetName();
break;
}
}
}
if(!empty($body))
{
$query = "select $body from `$addtable` where aid=$arcid";
$row = $dsql->GetOne($query);
$body = $row[$body];
return $body;
}
return ;
}
/*
解析文檔內(nèi)容的本地圖片圖片
*/
function get_img_from_body($body)
{
$result = array();
if(empty($body))
return $result;
preg_match_all('/\ssrc=([\"|\'])([^\1]*?)\.(gif|jpg|jpeg|png)\1/',$body,$res);
if(!empty($res[2]))
{
foreach($res[2] as $k=>$v)
{
$result[] = $v.'.'.$res[3][$k];
}
}
return $result;
}
[/code]
把這段代碼貼到include/common.func.php后面，
接著打開后臺（假設(shè)使用默認的dede作為后臺）dede/inc/inc_batchup.php文件，
在第22行添加代碼如下：
$body = getArcBody($aid);
接在在第139行，就是在
return true;
上面一行加上下面的代碼

復(fù)制代碼代碼如下:

if($body)
{
$img_arr = get_img_from_body($body);
if(!empty($img_arr))
{
foreach($img_arr as $v)
{
$img_file = GetTruePath().str_replace($GLOBALS['cfg_basehost'],'',$v);
if(file_exists($img_file) && !is_dir($img_file))
@unlink($img_file);
}
}
}

這樣就可以實現(xiàn)刪除文檔的時候刪除字段為“htmltext”類型的中的本地圖片了。