28,391
社区成员
发帖
与我相关
我的任务
分享请发表友善的回复…
发表回复
sfar 2004-07-27
- 打赏
- 举报
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN">
<html>
<head>
<title></title>
</head>
<script language="VbScript">
<!--
Function Test
Dim regEx , result
Set regEx = new RegExp
regEx.Pattern ="^\w+$"
regEx.IgnoreCase = True
result = regEx.Test( document.all.txtNum.value )
msgbox( result )
End Function
//-->
</script>
<script language="JavaScript">
<!--
function Test2()
{
var re = /^\w+$/;
var result = re.test( document.all.txtNum.value );
alert( result );
}
//-->
</script>
<body>
<form method=post action="">
<input type="text" name="txtNum">
<input type="button" onclick="VbScript:Test" value="vb检测">
<input type="Button" onclick="javascript:Test2();" value="js检测">
</form>
</body>
</html>
<html>
<head>
<title></title>
</head>
<script language="VbScript">
<!--
Function Test
Dim regEx , result
Set regEx = new RegExp
regEx.Pattern ="^\w+$"
regEx.IgnoreCase = True
result = regEx.Test( document.all.txtNum.value )
msgbox( result )
End Function
//-->
</script>
<script language="JavaScript">
<!--
function Test2()
{
var re = /^\w+$/;
var result = re.test( document.all.txtNum.value );
alert( result );
}
//-->
</script>
<body>
<form method=post action="">
<input type="text" name="txtNum">
<input type="button" onclick="VbScript:Test" value="vb检测">
<input type="Button" onclick="javascript:Test2();" value="js检测">
</form>
</body>
</html>
rumeng1106 2004-07-27
- 打赏
- 举报
<%
tempstr="1234567890a...zA...Z_"//省略
str//待检测字符串
dim myarray(100)
myarray=str
for i=0 to ubound(myarray)
pos=instr(tempstr,myarray(i))
if pos=0 then
return=0//有一个不是字符或下划线就跳出循环并返回0
exit for
else
return=1
end if
next
tempstr="1234567890a...zA...Z_"//省略
str//待检测字符串
dim myarray(100)
myarray=str
for i=0 to ubound(myarray)
pos=instr(tempstr,myarray(i))
if pos=0 then
return=0//有一个不是字符或下划线就跳出循环并返回0
exit for
else
return=1
end if
next
Clove 2004-07-27
- 打赏
- 举报
正则分析法
一堆高手啊
一堆高手啊
valu 2004-07-27
- 打赏
- 举报
搞什么飞机啊？
mynamelj 2004-07-27
- 打赏
- 举报
修正:
<script language=javascript>
function FiltrateStr(str)
{
if (str != "")
{
reg =/[^A-Za-z0-9_]/g;
if(reg.test(str))
{
alert("字符串不合法!");
return false;
}
}
return true;
}
//然后直接调用FiltrateStr()该涵数即可.
</script>
<script language=javascript>
function FiltrateStr(str)
{
if (str != "")
{
reg =/[^A-Za-z0-9_]/g;
if(reg.test(str))
{
alert("字符串不合法!");
return false;
}
}
return true;
}
//然后直接调用FiltrateStr()该涵数即可.
</script>
mynamelj 2004-07-27
- 打赏
- 举报
<script language=javascript>
function FiltrateStr(str)
{
if (str != "")
{
reg = new Array(2)
reg[0]=/[^0-9-]/g;
reg[1]=/[^a-z-]/g;
reg[2]=/[^A-Z-]/g;
if(reg[0].test(str))
{
alert("验证0-9失败!");
return false;
}
if(reg[1].test(str))
{
alert("验证a-z失败!");
return false;
}
if(reg[2].test(str))
{
alert("验证A-Z失败!");
return false;
}
}
return true;
}
</script>
function FiltrateStr(str)
{
if (str != "")
{
reg = new Array(2)
reg[0]=/[^0-9-]/g;
reg[1]=/[^a-z-]/g;
reg[2]=/[^A-Z-]/g;
if(reg[0].test(str))
{
alert("验证0-9失败!");
return false;
}
if(reg[1].test(str))
{
alert("验证a-z失败!");
return false;
}
if(reg[2].test(str))
{
alert("验证A-Z失败!");
return false;
}
}
return true;
}
</script>
skyboy0720 2004-07-27
- 打赏
- 举报
/^\w/
mjpclab 2004-07-27
- 打赏
- 举报
再改正
str="abcddd125454_adfsads"
dim re
set re = new RegExp
re.pattern="^[A-Za-z0-9_]+$"
if re.test(str) then response.write "合法字符"
str="abcddd125454_adfsads"
dim re
set re = new RegExp
re.pattern="^[A-Za-z0-9_]+$"
if re.test(str) then response.write "合法字符"
mjpclab 2004-07-27
- 打赏
- 举报
改正
str="abcddd125454_adfsads"
dim re as new RegExp
re.pattern="^[A-Za-z0-9_]+$"
if re.test(str) response.write "合法字符"
str="abcddd125454_adfsads"
dim re as new RegExp
re.pattern="^[A-Za-z0-9_]+$"
if re.test(str) response.write "合法字符"
mjpclab 2004-07-27
- 打赏
- 举报
str="abcddd125454_adfsads"
dim re as new RegExp
re.pattern="^[A-Za-z0-9_]*$"
if re.test(str) response.write "合法字符"
dim re as new RegExp
re.pattern="^[A-Za-z0-9_]*$"
if re.test(str) response.write "合法字符"
