我在一张ASP的网页里自动生成了许多个文本框,名字分别为a1 a2 ....a11
b1 b2 ...b11
那当我在文本框中输入数据后,点击确定按钮时我得判断一下是否是数字,也就是上面的程序,当我只写一个文本框时可以实现,但如果要判断许多个,比如说11个文本框,a1 a2 ...a11,这个应该怎么判断呢,

<script language="VBScript">
<!--
Sub adddt_OnClick
dim msg
dim i
i=1
if not IsNumeric(classform.a1.value) Then
msg="必须是数字"
else
if csng(classform.a1.value)>1.0 then
msg="扣分数字不能超过1"
end if
end if

If msg = "" Then
classform.submit

Else
Alert(msg)
End If
End Sub

-->
</script>

这样一个是可以的,但应该怎么表示好多个呢,如果用循环
for i=1 to 11
if not IsNumeric(classform.ai.value) Then
msg="必须是数字"
else
if csng(classform.ai.value)>1.0 then
msg="扣分数字不能超过1"
end if
end if
next
这样识别不出ai,大家也可以看看我的附件,就这个问题解决不了,太烦了.

n4ndWGKG.rar (13.98 KB) 关于自动生成的文本框里的数据,如何进行判断是不是数字.

[此贴子已经被作者于2007-5-30 11:04:12编辑过]

版主,你再帮我看一下,我用了你的这种方法,对于一列文本框是可以了,但当我加入第二列文本框的判断时,就不起作用了,错误出在哪里呢.我文本框的命名是第一列a1到a11,第二列b1到B11.
for i=1 to m
if document.getElementById("a"&i).value<>"" then
if not isnumeric(document.getElementById("a"&i).value) then
msg="必须是数字"
else
if csng(document.getElementById("a"&i).value)>1.0 then
msg="数字不能大于1"
end if
end if
end if
if msg<>"" then
document.getElementById("a"&i).value=""
document.getElementById("a"&i).focus
exit for
end if

if document.getElementById("b"&i).value<>"" then

if not isnumeric(document.getElementById("b"&i).value) then
msg="必须是数字"
else
if csng(document.getElementById("b"&i).value)>1.0 then
msg="数字不能大于1"
end if
end if
end if
if msg<>"" then
document.getElementById("b"&i).value=""
document.getElementById("b"&i).focus
exit for
end if
next

If msg = "" Then
classform.submit

Else
Alert(msg)
End If
End Sub

顶上去让人看到,呵呵