织梦会员中心发布文章自动过滤外部外部链接，保留本站站内链接。这个织梦默认后台本身带有这样的功能的，只是会员模块里没有而已。

(此图片来源于网络，如有侵权，请联系删除! )

我们可以L B \ D s J把功能嫁接到会员模块里去使用，实现自动过滤外部链接

实现教程

打开 /member/inc2 c N ?/inc_archives_functions.php 在文件– X L $ z的最下面插件

/**
*  删除非站内链接
*
* @~ 9 o t % *access    public
* @param     string  $body  内容
* @param     array  $allow_urls  允许的超链接
* @return    string
*/
function Replace_Links(O O } &$body, $allow_urls=array()  )
{
$host_rule = join('|', $allow_urls);
$host_rule = preg_replace("#[\n\r]#"y P E \, '', $host_rule);
$host_rule = str_replace('.', "\\.", $host_rulU r : 7 . k ee);
$host_rule = strF e $ E $ t ^_replace('/', "\\/", $host_rule);
$arr = '';
preg_match_all(L b s P 3 s { Y :"#&ld ^ f st;a([^>]*)>(.*)<\/a>#iU", $body,c t ] ~ D m d $arr);
if( is_array, ? B($arr[0]) )
{
$rp` s .arr = array();
$tgarr = array();
foreach($arr[0] as $i=>$v)
{
ifA + 0 l O T( $host_R - % C 9 0 Rrule != '' &ami ; y d s T & ` Dp;& preg_match('#'.$host_rule.'#i', $arr[1][$i]) )
{
conR Z R t c g \ ]tinue;
} else {
$rparr[] = $v;
$tgarr[] = $arr[2][$i];
}
}
if( !empty($rparr) )
{
$body = str_replace($rparr, $tgarr, $body);
}
}
$arr = $rparr = $tgarr = '';
return $body;
}

继续在这个文` r 4 \ e y J件中找到，大概在329行

//自动摘要

在它上面加入

//删除非站[ ] \ ) 0内链接
$allow_urls = array($_SERVER['HTTP_HOST']);
// 读取允许的超链接设置
if(file_exists(DEDEDATd 8 IA."/admin/allowurl.txt"))
{
$allow_urls = array_merge($allow_urls, file(DEDEDATA3 8 G $."/admin/allowurl.txt"));
}
$body = ReplaceQ g U = * O T p_Links($body, $allow_urls);

如图

(此图片来源于网络，7 v C N如有侵权，请联系删除! )

完成