当前位置: 首页 > 图文教程 > 网络编程 > ASP > asp过滤不文明字符的函数

ASP
WSH实用讲座---第四讲 配置目录权限
ASP个人上手指南
正则表达式简介(1-3)
正则表达式简介(4)
正则表达式简介(5-8)
正则表达式简介(9-10)
正则表达式简介(11)
正则表达式简介(12)
正则表达式简介(13)
正则表达式简介(14)
索引和索引调整向导
Microsoft SQL Server 查询处理器的内部机制与结构(1)
Microsoft SQL Server 查询处理器的内部机制与结构(2)
Microsoft SQL Server 7.0数据库设置与数据结构
Microsoft SQL Server 7.0数据库的创建与管理
Microsoft SQLServer安装示例
Microsoft SQL Server 7.0安装问题(一)
Microsoft SQL Server 7.0安装问题(二)
Microsoft 脚本编码器(1) --- 概述
Microsoft 脚本编码器(2) --- 使用脚本编码器

ASP 中的 asp过滤不文明字符的函数


出处:互联网   整理: 软晨网(RuanChen.com)   发布: 2009-08-14   浏览: 146 ::
收藏到网摘: n/a

经常在一些大型的论坛上看到一些带有不文明字符的贴子,这些不文明字符被自动替换成***。这里这个函数用来实现这样的功能的,这里这些不文件的字符可以从数据库中读取,这样就可以实现添加这些数据了  
<%  
Function cutbadchar(str)  
badstr="不|文|明|字|符|列|表|格|式"  
badword=split(badstr,"|")  
For i=0 to Ubound(badword)  
If instr(str,badword(i)) > 0 then  
str=Replace(str,badword(i),"***")  
End If  
Next  
cutbadchar=str  
End Function  
%>