[急]提交表单检查

[xiaoxiaowoxing]

规定只能是字母和数字的组合（而且必须是字母开头），如果包含其他的字符或者汉字就会报错

[moodboy1982]

这个问题天天有人在问，你搜一下就有一堆。
这是正则表达式的事，给你这方面的资料吧，以后还有用。
http://oo8h.51.net/docs/regular_expression.htm

[text44]

str=request.form("text")
Dim re,str2
Set re=new RegExp
re.IgnoreCase =True
re.Global=True
re.Pattern="(^[a-z][a-z0-9]*?)"
str2=re.replace(str,"")
if str<>str2 then
response.write ("错误")
end if

试试 手写的没测试

[text44]

哦 最后一句写错了 改正如下
str=request.form("text")
Dim re
Set re=new RegExp
re.IgnoreCase =True
re.Global=True
re.Pattern="(^[a-z][a-z0-9]*?)"
str=re.replace(str,"")
if str<>"" then
response.write ("错误")
end if

[xiaoxiaowoxing]

一时正则表达式还没看明白，楼上这位的好像不能执行

[king_shadow]

<script>
function isletter(str)
{
return(new RegExp(/^([a-zA-z_]{1})([\w]*)$/g.test(str));
}
</script>

[xiangyx]

JAVASCRIPT过滤函数：
function chk_account(Account,Len)
{
//本过程用于对帐号进行合法性检测
//Account参数用于接受帐号输入框名称
//Len参数用于设定限制帐号最少位数
// var Len=3 //允许注册帐号的最小位数
var strings="abcdefghijklmnopqrstuvwxyz1234567890"
for (i=0;i<Account.value.length;i++)
{
var checkChar=Account.value.charAt(i);
checkChar=checkChar.toLowerCase();
if (strings.indexOf(checkChar)==-1) //如果checkChar字符没有在strings中出现则提示
{
alert("帐号中含有非法字符。");
Account.focus();
return false;
} //if
} //for

if (Account.value=='')
{
alert("请填写帐号。")
Account.focus()
return false
} //if (frm_register.r_account.value=='')
else
{
if (Account.value.length<Len)
{
alert("帐号不能少于"+Len+"位。")
Account.focus()
return false
} //if (frm_register.r_account.value.length<4)
//判断用户名的第一个字符是否为非法字符，注意，第一个字符号为0
if (!(Account.value.charAt(0).toLowerCase()>='a' && Account.value.charAt(0).toLowerCase()<='z'))
{
alert("用户名必须以字母开头，请重新输入。")
Account.focus()
return false
} //if
} //else
return true
} //chk_account()

[starytx]

我给你来个只能输字母和数字可以吧
onkeyup="value=value.replace(/[\W]/g,'') "onbeforepaste="clipboardData.setData('text',clipboardData.getData('text').replace(/[^\d]/g,''))"
贴到你的<input>中即可
判断首字符是不是字母，小弟还不会，呵呵