织梦会员中心发布文章自动过滤外部外部链接,保留本站站内链接。这个织梦默认后台本身带有这样的功能的,只是会员模块里没有而已。
(此图片来源于网络,如有侵权m L -,请联系删除! )
我们可以把功能嫁接到会员模块里去使用,实现自7 \ K动过滤外q F f 3 | K h部链接
实现教程
打开 /member/inc/inc_archives_functions.php 在文件的最下面插入
/** * 删除非站内链接 * * @access public * @param string $body 内容 * @param array $allow_urls 允许的超链接 * @return string *4 8 c i \ J/ function Replace_Links( &$body, $allow_urls=arr& W [ u 4 9 h r =ay() ) { $host_rule = join('|', $allow_urls); $host_rule = preg_replace("#[nr]#", '', $host_rule); $hoA 5 * F A = ;st_rule = str_replace('.', "\.", $host_rule); $host_rule = str_replace('/', "\/",h 5 : 2 + $host_rule)x r z ] t X; $arr = ''; preg_match_all("#<a([^>]*)>(.6 i Y B*)</a>#iU", $body, $arr); if( is_array($arr[0]) ) { $rparr = array(); $A Z Vtgarr =| \ [ % S t 6 z g array(); foreach($arr[0] as $i=>$v) { if( $host_rule != 'J + x } * z @ :' && preg_match('#'.$host_rule.'#i', $arr[1][$i]) ) { continue; } else {F o M h $rparr[] = $v; $tgarr[] = $arr[2][$i]; } } if( !empty($rparr) ) { $body = str_replace($rparr, $tgarr, $body); } } $a- g ( = z _ ! ` Err = $rparr = $W f 3tgarr = ''; return $body; }
继续在这个文件中找到,大概在329行
//自动摘要
在它上q ` % w ^ {面加入
//删除非站内链接
$allow_urls = array($_SERVER['HTTP_HOST']);
// 读取允许的超链接设置
if(file_exists(DEDEDATA."/admin/allowurl.txt"))
{
$allow_urls = array_merge($allow_urls, file(DEDEDATA."/admin/allowurl.txt"));
}
$body = Replace_Links($body! + f O I N K, $allow_urls);
如图
(此图片来源于网络,如有侵权,请联系删除! )
完成