用ASP如何验证接收的内容是在数字,26个英文字母,下划线范围内,并且区分大小写.

[lingzi]

用ASP如何验证接收的内容是在数字,26个英文字母,下划线范围内,并且区分大小写.

[puppet]

用正则表达式,search一下

[lingzi]

具体些好吗？

[lingzi]

能具体说一下语句吗

[puppet]

1 、判断数字的正确性
<script language="javascript" runat="server">
function isNumeric(strNumber) { '数字
return (strNumber.search(/^(-¦\+)?\d+(\.\d+)?$/) != -1);
}
function isUnsignedNumeric(strNumber) { '非负数字
return (strNumber.search(/^\d+(\.\d+)?$/) != -1);
}
function isInteger(strInteger) { '整数
return (strInteger.search(/^(-¦\+)?\d+$/) != -1);
}
function isUnsignedInteger(strInteger) { '非负整数
return (strInteger.search(/^\d+$/) != -1);
}
</script>

2、判断Email格式的正确性
<%
Function isemail(strng)
isemail = false
Dim regEx, Match
Set regEx = New RegExp
regEx.Pattern = "^\w+((-\w+)¦(\.\w+))*\@[A-Za-z0-9]+((\.¦-)[A-Za-z0-9]+)*\.[A-Za-z0-9]+$"
regEx.IgnoreCase = True
Set Match = regEx.Execute(strng)
if match.count then isemail= true
End Function
%>

3.UBB论坛
Function ReplaceTest(patrn,str,replStr)
Dim regEx, str1 " 建立变量。
str1=trim(str)
Set regEx = New RegExp " 建立正则表达式。
regEx.Pattern = patrn " 设置模式。
regEx.IgnoreCase = true " 设置是否区分大小写。
ReplaceTest = regEx.Replace(str1, replStr) " 作替换。
set regEx=nothing ‘销毁正则表达式对象
End Function

ReplaceTest("(\[img])(\S+)(\[/img])",temp,"<img src=""$2"">")

[puppet]

用vbscript可以这样写
<%
Function isemail(strng)
isemail = false
Dim regEx, Match
Set regEx = New RegExp
regEx.Pattern = "[A-Za-z0-9_]+"
regEx.IgnoreCase = True
Set Match = regEx.Execute(strng)
if match.count then isemail= true
End Function
%>
模式你可以自己改

[lingzi]

我给你加分了，小虎