织梦dedecms删除文章的同时删除该文章下的图片和附件以及缩略图的方法

有时候我们删除文章的时候，文章的图片还是会留存在你的图片文件夹上面，这样很占服务器的内存，程序也会变得很大，所以我们需要删除文章的同时把文章里的图片、缩略图也对应的删掉。

但织梦本身是不支持的，需要经过二次开发才可以，互联网上有很多方法，本人测过有些虽然能删除文章内的图片，但是并不能删除缩略图；有些虽然可以达到效果，但修改处太多，影响网站的一些功能失效。

本人是用织梦dedecms5.7的后台开发网站，以下是经过测试可以用的，这种方法最简单，也是最有用，又不影响网站的其它功能。其它版本的后台没有测试过，不确定别的版本能不能用这种方法，使用前最好在本地做下测试。

一、首先在修改前把需要修改的php文件备份好！

二、找到 /include/extend.func.php

复制以下的全部代码直接覆盖到 extend.func.php 文件

<?php

function GetPicsTruePath($body,$litpic) //解析body数据，获得所有图片的绝对地址

{

$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;

}

function WriteToDelFiles($msg)//删除文章的时候会通过此函数记录日志

{

if(empty($msg)) $savemsg="未获得消息";

else $savemsg = $msg;

$errorFile = dirname(__FILE__).'/../data/del_body_file.txt';//删除记录文件

$fp = @fopen($errorFile, 'a');

@fwrite($fp,"\r\n{$savemsg}");

@fclose($fp);

}

//获得文章Body数据

function GetArcBody($aid)

{

global $dsql;

$query = "SELECT dede_addonarticle.body FROM dede_addonarticle WHERE dede_addonarticle.aid = '$aid'";

$row = $dsql->GetOne($query);

if(is_array($row)) return $row;

else return false;

}

function litimgurls($imgid=0){

global $lit_imglist;

$dsql = new DedeSql(false);

//获取附加表

$row = $dsql->GetOne("SELECT c.addtable FROM dede_archives AS a LEFT JOIN dede_channeltype AS c ON a.channel=c.id where a.id='$imgid'");

$addtable = trim($row['addtable']);

//获取图片附加表imgurls字段内容进行处理

$row = $dsql->GetOne("Select imgurls From `$addtable` where aid='$imgid'");

//调用inc_channel_unit.php中ChannelUnit类

$ChannelUnit = new ChannelUnit(2,$imgid);

//调用ChannelUnit类中GetlitImgLinks方法处理缩略图

$lit_imglist = $ChannelUnit->GetlitImgLinks($row['imgurls']);

//返回结果

return $lit_imglist;

}

?>

三、找到\dede\inc\inc_batchup.php

复制以下的全部代码直接覆盖 到 inc_batchup.php 文件，\dede\为默认的后台目录，如路径已修改，根据自己网站路径找对应的路径。

<?php

function DelArc($aid,$type='ON',$onlyfile=false)

{

global $dsql,$cfg_cookie_encode,$cfg_multi_site,$cfg_medias_dir;

global $cuserLogin,$cfg_upload_switch,$cfg_delete,$cfg_basedir;

global $admin_catalogs, $cfg_admin_channel;

if($cfg_delete == 'N') $type = 'OK';

if(empty($aid)) return ;

$aid = ereg_replace("[^0-9]", '', $aid);

$arctitle = $arcurl = '';

//查询表信息

$query = "Select ch.maintable,ch.addtable,ch.nid,ch.issystem From `dede_arctiny` arc

left join `dede_arctype` tp on tp.id=arc.typeid

left join `dede_channeltype` ch on ch.id=arc.channel where arc.id='$aid' ";

$row = $dsql->GetOne($query);

$nid = $row['nid'];

$maintable = (trim($row['maintable'])=='' ? 'dede_archives' : trim($row['maintable']));

$addtable = trim($row['addtable']);

$issystem = $row['issystem'];

//查询档案信息

if($issystem==-1)

{

$arcQuery = "Select arc.*,tp.* from `$addtable` arc left join `dede_arctype` tp on arc.typeid=tp.id where arc.aid='$aid' ";

}

else

{

$arcQuery = "Select arc.*,tp.*,arc.id as aid from `$maintable` arc left join `dede_arctype` tp on arc.typeid=tp.id where arc.id='$aid' ";

}

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

$arcBodyRow = GetArcBody($aid);

//检测权限

if(!TestPurview('a_Del,sys_ArcBatch'))

{

if(TestPurview('a_AccDel'))

{

if( !in_array($arcRow['typeid'], $admin_catalogs) && (count($admin_catalogs) != 0 || $cfg_admin_channel != 'all') )

{

return false;

}

}

else if(TestPurview('a_MyDel'))

{

if($arcRow['mid'] != $cuserLogin->getUserID())

{

return false;

}

}

else

{

return false;

}

}

//$issystem==-1 是单表模型，不使用回收站

if($issystem == -1) $type = 'OK';

if(!is_array($arcRow)) return false;

/** 删除到回收站 **/

if($cfg_delete == 'Y' && $type == 'ON')

{

$dsql->ExecuteNoneQuery("Update `$maintable` set arcrank='-2' where id='$aid' ");

$dsql->ExecuteNoneQuery("Update `dede_arctiny` set `arcrank` = '-2' where id = '$aid'; ");

}

else

{

//删除数据库记录

if(!$onlyfile)

{

//删除缩略图

if($arcRow['litpic']!=""){

$dsql->ExecuteNoneQuery("Delete From dede_uploads where url='$arcRow[litpic]'");

$truedir = GetTruePath($arcRow['siterefer'],$arcRow['sitepath']);

$litpicfile = $truedir.$arcRow['litpic'];

@unlink($litpicfile);

}

//删除相关附件

if($cfg_upload_switch == 'Y')

{

$dsql->Execute("me", "SELECT * FROM `dede_uploads` WHERE arcid = '$aid'");

while($row = $dsql->GetArray('me'))

{

$addfile = $row['url'];

$aid = $row['aid'];

$dsql->ExecuteNoneQuery("Delete From `dede_uploads` where aid = '$aid' ");

$upfile = $cfg_basedir.$addfile;

if(@file_exists($upfile)) @unlink($upfile);

}

}

$dsql->ExecuteNoneQuery("Delete From `dede_arctiny` where id='$aid'");

if($addtable != '')

{

$dsql->ExecuteNoneQuery("Delete From `$addtable` where aid='$aid' ");

}

if($issystem != -1)

{

$dsql->ExecuteNoneQuery("Delete From `dede_archives` where id='$aid' ");

}

$dsql->ExecuteNoneQuery("Delete From `dede_feedback` where aid='$aid' ");

$dsql->ExecuteNoneQuery("Delete From `dede_member_stow` where aid='$aid' ");

$dsql->ExecuteNoneQuery("Delete From `dede_taglist` where aid='$aid' ");

$dsql->ExecuteNoneQuery("Delete From `dede_erradd` where aid='$aid' ");

}

//删除文本数据

$filenameh = DEDEDATA."/textdata/".(ceil($aid/5000))."/{$aid}-".substr(md5($cfg_cookie_encode),0,16).".txt";

if(@is_file($filenameh)) @unlink($filenameh);

}

if(empty($arcRow['money'])) $arcRow['money'] = 0;

if(empty($arcRow['ismake'])) $arcRow['ismake'] = 1;

if(empty($arcRow['arcrank'])) $arcRow['arcrank'] = 0;

if(empty($arcRow['filename'])) $arcRow['filename'] = '';

//删除HTML

if($arcRow['ismake']==-1 || $arcRow['arcrank']!=0 || $arcRow['typeid']==0 || $arcRow['money']>0)

{

return true;

}

//强制转换非多站点模式，以便统一方式获得实际HTML文件

$GLOBALS['cfg_multi_site'] = 'N';

$arcurl = GetFileUrl($arcRow['aid'],$arcRow['typeid'],$arcRow['senddate'],$arcRow['title'],$arcRow['ismake'],

$arcRow['arcrank'],$arcRow['namerule'],$arcRow['typedir'],$arcRow['money'],$arcRow['filename']);

if(!ereg("\?", $arcurl))

{

$htmlfile = GetTruePath().str_replace($GLOBALS['cfg_basehost'],'',$arcurl);

if(file_exists($htmlfile) && !is_dir($htmlfile))

{

@unlink($htmlfile);

$arcurls = explode(".", $htmlfile);

$sname = $arcurls[count($arcurls)-1];

$fname = ereg_replace("(\.$sname)$", "", $htmlfile);

for($i=2; $i<=100; $i++)

{

$htmlfile = $fname."_{$i}.".$sname;

if( @file_exists($htmlfile) ) @unlink($htmlfile);

else break;

}

}

}

//解析Body中的资源，并删除

$willDelFiles = GetPicsTruePath($arcBodyRow['body'],$arcRow['litpic']);

$nowtime = time();

$executetime = MyDate('Y-m-d H:i:s',$nowtime);//获得执行时间

$msg = "\r\n文章标题：$arcRow[title]";

WriteToDelFiles($msg);

if(!empty($willDelFiles))

{

foreach($willDelFiles as $file)

{

if(file_exists($file) && !is_dir($file))

{

if(unlink($file)) $msg = "\r\n位置：$file\r\n结果：删除成功！\r\n时间：$executetime";

else $msg = "\r\n位置：$file\r\n结果：删除失败！\r\n时间：$executetime";

}

else $msg = "\r\n位置：$file\r\n结果：文件不存！\r\n时间：$executetime";

WriteToDelFiles($msg);

}//END foreach

}

else

{

$msg = "\r\n未在Body中解析到数据\r\nBody原始数据：$arcBodyRow[body]\r\n时间：$executetime";

WriteToDelFiles($msg);

}

return true;

}

//获取真实路径

function GetTruePath($siterefer='', $sitepath='')

{

$truepath = $GLOBALS['cfg_basedir'];

return $truepath;

}

?>

 到这里就结束了 ， 我们再去试着删除一篇文章 ，你会发现你删除这篇文章以后，这篇文章内容上的图片以及缩略图都同时删除了！

四、删除后，会在/data/目录下,产生日志记录文件:del_body_file.txt。

 

参考资料：

1、dedecms 删除文章同时删除图片的方法http://www.dede58.com/a/dedejq/11279.html

2、Dede5.7删除文章会删除文章里图片却不删除略图解决方法 http://www.qbxcn.com/bao_news/zhishi/347.html

3、织梦删除文章时候同步删除缩略图和正文图片 https://www.tx83.cn/article-759.html