织梦dedecms删除文章时,不会删除该文章上传的图片。解决方法:
一、打开/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);
}
二、打开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);
}
结束。
本站的发展离不开您的支持,请在解决问题后再考虑是否为本站打赏或捐助。