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

ASP
深入讲解 ASP+ 验证(一)
深入讲解 ASP+ 验证(二)
深入讲解 ASP+ 验证(三)
深入讲解 ASP+ 验证(四)
通过事例学习.net的WebForms技术(一)
通过事例学习.net的WebForms技术(二)
StripNonNumeric函数源程序
通过事例学习.net的WebForms技术(三)
通过事例学习.net的WebForms技术(四)
将HTML表单数据存储为XML格式 - 1
将HTML表单数据存储为XML格式 - 2
将HTML表单数据存储为XML格式 - 3
asp生日自动提醒小程式
WEB页面简单进度记时器
在主页中编制音频播放器
图片数据的存和取示例
用ASPMail组件实现E_mail自动反馈
读取目录下的所有文件(源码)
制作我们自己的Ebay(拍卖系统)(1)
制作我们自己的Ebay(拍卖系统)(2)

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


出处:互联网   整理: 软晨网(RuanChen.com)   发布: 2009-08-14   浏览: 112 ::
收藏到网摘: 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  
%>