只做了一半,

注册做了,登陆做了,个人信息做了,基本的发贴,回复,修改,收藏做了,在线人数做了(没做显示,在TOOO表里)

防护:凡是互交的不管是啥,都用正则表达式过滤了一遍,

本人对这个程序不满意,但懒的去重写,CSS做的也不好.哎~~~~~`

不错

下载了 好东西但是不会忘记顶一下！LZ好厉害

下载下来看看..支持

下载下来看看..纯支持

“盗取”一下楼主的劳动成果呀！有机会也发个让大家给我评评

[此贴子已经被作者于2007-9-16 0:26:10编辑过]

不错的！昨天下了，今天打开来看看，看得出楼主的正则表达式用得很熟练啊！有机会一定我一定用用！先谢谢了。

不错了拉~```刚好我需要做个论坛....就拿楼主的修改一下~``谢谢楼主的分享了哈~```

Function CheckExp(patrn,strng,tagstr)
Dim regEx
Set regEx=New RegExp
regEx.Pattern=patrn
regEx.IgnoreCase=true
regEx.Global=True
CheckExp=regEx.replace(strng,tagstr)
End Function

wenti=checkexp("[^\w]",request.form("wenti"),"")

红字的不太明白 能不能给讲下呢？

[此贴子已经被作者于2007-9-17 11:03:39编辑过]