谁知道这段代码具体怎么用啊
Function CheckName(str)
If str="" Then Exit Function
Dim re
Set re=New RegExp
re.IgnoreCase=true
re.Global=true
re.pattern="[~!@#$%^&*()+|<>\\ ]"
CheckName=re.test(str)
Set re=nothing
End Function

是检查是否包含非法字符的

在线等

&lt;%=checkname(request.form("表单内name的名称"))%&gt;

<%
if CheckName(str) then
.....'通过验证
.....
else '没有通过验证
.....
end if
%>

谢谢了 我就是不知道返回什么值 现在知道了 谢谢

不行 类型不匹配: 'CheckName'
/6/CheckUserName.asp, 第 98 行

Set re=New RegExp
是什么东东了