织梦源码如何禁止会员发布文章内容带超链接

/**
 *  删除非站内链接
 *
 * @access    public
 * @param     string  $body  内容
 * @param     array  $allow_urls  允许的超链接
 * @return    string
 */function Replace_Links( &$body, $allow_urls=array()  ){
    $host_rule = join('|', $allow_urls);
    $host_rule = preg_replace("#[\n\r]#", '', $host_rule);
    $host_rule = str_replace('.', "\\.", $host_rule);
    $host_rule = str_replace('/', "\\/", $host_rule);
    $arr = '';
    preg_match_all("#<a([^>]*)>(.*)<\/a>#iU", $body, $arr);    if( is_array($arr[0]) )
    {
        $rparr = array();
        $tgarr = array();        foreach($arr[0] as $i=>$v)
        {            if( $host_rule != '' && preg_match('#'.$host_rule.'#i', $arr[1][$i]) )
            {                continue;
            } else {
                $rparr[] = $v;
                $tgarr[] = $arr[2][$i];
            }
        }        if( !empty($rparr) )
        {
            $body = str_replace($rparr, $tgarr, $body);
        }
    }
    $arr = $rparr = $tgarr = '';    return $body;
}

//自动摘要

//删除非站内链接$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, $allow_urls);