急求ASP文本数字型判断处理，在线等~！~！~！

[aspxx112]

文本输入判断为数字型，小数点之后只能保留两位,鼠标离开后系统将自动截段保留小数点后两位，怎么实现？？

[KimSoft]

<input id="test" type="text" onmouseover="this.select();" onmouseout="check(this)">
<script language="vbscript">
sub check(t)
If Trim(t.value) = "" Then t.value = "0.00"
If Not IsNumeric(t.value) Then
alert("不是数字")
end if
t.value = formatnumber(t.value,2,true)
End Sub
</script>


用VBS写的，为的是方便，另：用onmouseover事件不是很好。楼主自己把握用什么吧。

[aspxx112]

我录的是89523 怎么变成是89,523.00 啦
？？？？
还有更好的方法吗？

[opolmzy]

<input id="test" type="text" onmouseover="this.select();" onmouseout="check(this)">
<script language="vbscript">
sub check(t)
If Trim(t.value) = "" Then t.value = "0.00"
If Not IsNumeric(t.value) Then
alert("不是数字")
end if
t.value = round(t.value,2)
End Sub
</script>

[aspxx112]

？？？？？？？？？？？？？？？？？？？？？？？？？？？？？？/

[aspxx112]

楼上的用你的根本没反映
谁来帮忙，分不够再加

[aspxx112]

急~！~！~！~！

[KimSoft]

你一下formatnumber的参数就知道了。


<input id="test" type="text" onmouseover="this.select();" onmouseout="check(this)">
<script language="vbscript">
sub check(t)
If Trim(t.value) = "" Then t.value = "0.00"
If Not IsNumeric(t.value) Then
alert("不是数字")
end if
t.value = formatnumber(t.value,2,True,False,false)
End Sub
</script>