織夢在發布文章的時候，難免需要一些圖片等等讓文章更豐富，但是在刪除的時候也有了一定的復雜度。這次就分享一個很實用的功能，刪除織夢文章的同時刪掉該文章下的圖片與附件等文件，有效的節省了后期慢慢排除無用圖片和附件的時間還實時節省了一些不必要的存儲空間。

實現方法如下： 

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

//解析body數據，獲得所有圖片的絕對地址 
function GetPicsTruePath($body,$litpic) 
{
        $delfiles = array();
        //存儲圖片地址數據 
        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);//去掉網址部分 
    $path .=$picpath; 
    $delfiles[] = $path;//保存處理后的數據 
  } 
  return $delfiles; 
} 
//獲得文章Body數據  
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;  
} //mobantianxia.cn修改于2010.01.28 
//寫入日志文件  
function WriteToDelFiles($msg)//刪除文章的時候會通過此函數記錄日志  
{  
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);
//獲得執行時間  
$msg = " 文章標題：$arcRow[title]";
WriteToDelFiles($msg);
if(!empty($willDelFiles))  
{
        foreach($willDelFiles as $file)  
        {
                if(file_exists($file) && !is_dir($file))  
                {
                        if(unlink($file)) $msg = " 位置：$file 結果：刪除成功！ 時間：$executetime"; else $msg = " 位置：$file 結果：刪除失敗！ 時間：$executetime";
                }
                //mobantianxia.cn修改于2010.01.28 else $msg = " 位置：$file 結果：文件不存！ 時間：$executetime";
                WriteToDelFiles($msg);
        }
        //END foreach
} else  
{
        $msg = " 未在Body中解析到數據 Body原始數據：$arcBodyRow[body] 時間：$executetime";
        WriteToDelFiles($msg);
}

到此就結束了，刪除了文章會連帶當前文章的圖片和附件一氣刪除。