<% 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 Response.Write cutbadchar("中国不阿斗发射点发明") %>

　　推荐阅读

　　asp javascript picasa相册外链批量导出

来与大家分享。稍加改造就可以实现更强大的功能了。用下面的代码就可以简单的批量导出picasa相册的外链了。 复制代码 代码如下:<%@LANGUAGE="VBSCRIPT" CODEPAGE="65001"%> <% dim xmlget,xmlhttp,email,paswd>>>详细阅读

本文标题：asp 过滤非法字符函数

地址：http://www.17bianji.com/kaifa2/ASP/32047.html

 1/2    1