clearubb.asp

用ASP实现的论坛开发

<SCRIPT LANGUAGE=javascript RUNAT=Server>
//for Microsoft(R) Windows(R) Script 5.6
//2004-9-5 修订
//UBB代码Clear 函数，为生成LastPost和标题等所用
function ClearUBBtext(content){
	if (content=="")
        return("");
	var re;
	content=ClearLimitReturns(content); //合并多个回车换行
	content=ClearConvertReturns(content); //转换回车换行为空
	content=ClearSmilies(content);
	content=ClearPostUBB(content); //清除特殊帖标签
	content=ClearTitleUBB(content); //清除标题专用标签
	re=/(\[html\])(.+?)(\[\/html\])/ig;
    content=content.replace(re,"$2");
	re=/(\[URL\])(http|https|ftp)(:\/\/\S+?)(\[\/URL\])/ig;
    content=content.replace(re,"$2$3");
    re=/(\[URL\])(\S+?)(\[\/URL\])/ig;
    content=content.replace(re,"$2");
    re=/(\[URL=)(http|https|ftp)(:\/\/\S+?)(\])(.+?)(\[\/URL\])/ig;
    content=content.replace(re,"$5");
    re=/(\[download=)(http|https|ftp)(:\/\/\S+?)(\])(.+?)(\[\/download\])/ig;
    content=content.replace(re,"$5");
    re=/(\[URL=)(\S+?)(\])(.+?)(\[\/URL\])/ig;
    content=content.replace(re,"$4");
    re=/(\[EMAIL=)(\S+\@\S+?)(\])(.+?)(\[\/EMAIL\])/ig;
    content=content.replace(re,"$4");
    re=/(\[EMAIL\])(\S+\@\S+?)(\[\/EMAIL\])/ig;
    content=content.replace(re,"$2");
	re=/(\[code\])(.+?)(\[\/code\])/ig;
    content=content.replace(re,"$2");

	re=/(\[IMG\])(\S+?)(\[\/IMG\])/ig;
    content=content.replace(re,"$2");
	
	re=/(\[IMG W=)(\d+)( B=)(\d+)(\])(\S+?)(\[\/IMG\])/ig;
    content=content.replace(re,"$6");
	
	re=/(\[SOUND\])(\S+?)(\[\/SOUND\])/ig;
	content=content.replace(re,"$2");

	re=/(\[c\])/ig;
    content=content.replace(re,"");
    re=/(\[hr\])/ig;
    content=content.replace(re,"");
	re=/(\[hr=)(\S+?)(\])/ig;
    content=content.replace(re,"");

	re=/(\[i\])(.+?)(\[\/i\])/ig;
    content=content.replace(re,"$2");
    re=/(\[u\])(.+?)(\[\/u\])/ig;
    content=content.replace(re,"$2");
    re=/(\[b\])(.+?)(\[\/b\])/ig;
    content=content.replace(re,"$2");
    re=/(\[list\])(.+?)(\[\/list\])/ig;
    content=content.replace(re,"$2");
    re=/(\[list=)(A|1)(\])(.+?)(\[\/list\])/ig;
    content=content.replace(re,"$4");
    re=/(\[\*\])/ig;
    content=content.replace(re,"");
	re=/(\[font=)(\S+?)(\])(.+?)(\[\/font\])/ig;
    content=content.replace(re,"$4");
	re=/(\[size=)(\S+?)(\])(.+?)(\[\/size])/ig;
    content=content.replace(re,"$4");
	re=/(\[color=)(\S+?)(\])(.+?)(\[\/color\])/ig;
    content=content.replace(re,"$4");
	re=/(\[bgcolor=)(\S+?)(\])(.+?)(\[\/bgcolor\])/ig;
    content=content.replace(re,"$4");
    re=/(\[h1\])(.+?)(\[\/h1\])/ig;
    content=content.replace(re,"$2");
    re=/(\[h2\])(.+?)(\[\/h2\])/ig;
    content=content.replace(re,"$2");
    re=/(\[h3\])(.+?)(\[\/h3\])/ig;
    content=content.replace(re,"$2");
    re=/(\[h4\])(.+?)(\[\/h4\])/ig;
    content=content.replace(re,"$2");
    re=/(\[h5\])(.+?)(\[\/h5\])/ig;
    content=content.replace(re,"$2");
    re=/(\[h6\])(.+?)(\[\/h6\])/ig;
    content=content.replace(re,"$2");
    re=/(\[sup\])(.+?)(\[\/sup\])/ig;
    content=content.replace(re,"$2");
    re=/(\[sub\])(.+?)(\[\/sub\])/ig;
    content=content.replace(re,"$2");
    re=/(\[center\])(.+?)(\[\/center\])/ig;
    content=content.replace(re,"$2");
    re=/(\[left\])(.+?)(\[\/left\])/ig;
    content=content.replace(re,"$2");
    re=/(\[right\])(.+?)(\[\/right\])/ig;
    content=content.replace(re,"$2");
    re=/(\[pre\])(.+?)(\[\/pre\])/ig;
    content=content.replace(re,"$2");
    re=/(\[w\])(http|https|ftp)(:\/\/\S+?)(\[\/w\])/ig;
    content=content.replace(re,"$2$3");
	re=/(\[w h=)(\d+)(\])(http|https|ftp|mms)(:\/\/\S+?)(\[\/w\])/ig;
    content=content.replace(re,"$4$5");
    re=/(\[flash\])(http|https|ftp)(:\/\/\S+?)(\[\/flash\])/ig;
    content=content.replace(re,"$2$3");
	re=/(\[flash W=)(\d+)( H=)(\d+)(\])(http|https|ftp)(:\/\/\S+?)(\[\/flash\])/ig;
    content=content.replace(re,"$6$7");
    re=/(\[flash W=)(\d+)( H=)(\d+)(\])(\S+?)(\[\/flash\])/ig;
    content=content.replace(re,"$6");
	re=/(\[shock\])(http|https|ftp)(:\/\/\S+?)(\[\/shock\])/ig;
    content=content.replace(re,"$2$3");
	re=/(\[shock W=)(\d+)( H=)(\d+)(\])(http|https|ftp)(:\/\/\S+?)(\[\/shock\])/ig;
    content=content.replace(re,"$6$7");
	re=/(\[qt W=)(\d+)( H=)(\d+)(\])(http|https|ftp)(:\/\/\S+?)(\[\/qt\])/ig;
    content=content.replace(re,"$6$7");
	re=/(\[mp W=)(\d+)( H=)(\d+)(\])(http|https|ftp)(:\/\/\S+?)(\[\/mp\])/ig;
    content=content.replace(re,"$6$7");
	re=/(\[rm W=)(\d+)( H=)(\d+)(\])(http|https|ftp)(:\/\/\S+?)(\[\/rm\])/ig;
    content=content.replace(re,"$6$7");
	return(content);
}
function ClearSmilies(content){
	var re;
	re=/(\[:)(V[0-9][0-9])(\])/ig;
    content=content.replace(re,"");
	re=/(\[:)(Ve[0-9][0-9])(\])/ig;
    content=content.replace(re,"");
	re=/\?\:\(/ig;
    content=content.replace(re,"");
    re=/\:\(\)/ig;
    content=content.replace(re,"");
    re=/\:\)/ig;
    content=content.replace(re,"");
    re=/\:\(/ig;
    content=content.replace(re,"");
    re=/\:o/ig;
    content=content.replace(re,"");
    re=/:D/ig;
    content=content.replace(re,"");
    re=/:i/ig;
    content=content.replace(re,"");
    re=/:Q/ig;
    content=content.replace(re,"");
    re=/:P/ig;
    content=content.replace(re,"");
    re=/:j/ig;
    content=content.replace(re,"");
    re=/:l/ig;
    content=content.replace(re,"");
    re=/:k/ig;
    content=content.replace(re,"");
    re=/:st/ig;
    content=content.replace(re,"");
    re=/:ns/ig;
    content=content.replace(re,"");

	return(content);
	}

function ClearConvertReturns(content) {
    var re;
    re=/\n\r\n/ig;
    content=content.replace(re,"");
    re=/\n/ig;
    content=content.replace(re,"");
    
	re=/\r/ig;
    content=content.replace(re,"");
    
    re=/(<p>){2,}/ig;
    content=content.replace(re,"");
    re=/(<br><br>){2,}/ig;
    content=content.replace(re,"");
    return (content);
}

//多个回车合并
function ClearLimitReturns(content) {
    var re;
    re=/\n{2,}/ig;
    content=content.replace(re,"");
    re=/(\n\r\n){2,}/ig;
    content=content.replace(re,"");
    re=/\r{2,}/ig;
    content=content.replace(re,"");
    return (content);
}

function ClearPostUBB(content){
	var re;
	//特殊帖
	re=/(\[points=)(\d+)(\])(.+?)(\[\/points\])/ig;
    content=content.replace(re,"");
	re=/(\[score=)(\d+)(\])(.+?)(\[\/score\])/ig;
    content=content.replace(re,"");
	re=/(\[iworks=)(\d+)(\])(.+?)(\[\/iworks\])/ig;
    content=content.replace(re,"");
	re=/(\[article=)(\d+)(\])(.+?)(\[\/article\])/ig;
    content=content.replace(re,"");
	re=/(\[logins=)(\d+)(\])(.+?)(\[\/logins\])/ig;
    content=content.replace(re,"");
	re=/(\[name=)(\S+?)(\])(.+?)(\[\/name\])/ig;
    content=content.replace(re,"");
	re=/(\[unhide=)(\S+?)(\])(.+?)(\[\/unhide\])/ig;
    content=content.replace(re,"");
	re=/(\[umoney=)(\d+)(\])(.+?)(\[\/umoney\])/ig;
    content=content.replace(re,"");
	re=/(\[view=)(\S+?)(\])(.+?)(\[\/view\])/ig;
    content=content.replace(re,"");
	//标题UBB
	re=/(\[b\])(.+?)(\[\/b\])/ig;
	//re=/(\[b\])(.[^\[]*)(\[\/b\])/ig; //5.1
	content=content.replace(re,"$2")
	re=/(\[#)(\S+?)(\])(.+?)(\[\/#\])/ig;
	//re=/(\[#)(.[^\[]*)(\])(.[^\[]*)(\[\/#\])/ig; //5.1
	content=content.replace(re,"$4")
	return (content);
}
function ClearTitleUBB(content){
	var re;
	//标题UBB
	re=/(\[t\])(.+?)(\[\/t\])/ig;
	//re=/(\[t\])(.[^\[]*)(\[\/t\])/ig; //5.1
	content=content.replace(re,"$2")
	re=/(\[#)(\S+?)(\])(.+?)(\[\/#\])/ig;
	//re=/(\[#)(.[^\[]*)(\])(.[^\[]*)(\[\/#\])/ig; //5.1
	content=content.replace(re,"$4")
	return (content);
}
</script>