再谈vbscript 提交表单问题 ???（在线）

[wangfox]

看了大家的意见，我进行了改进，如下：<SCRIPT ID=clientEventHandlersVBS LANGUAGE=vbscript>
<!--
Function form1_onsubmit()
if form1.text1.value=empty then
alert("text1值不能为空！")
form1_onsubmit = false
end if
if not isnumeric( form1.text2.value) then
alert("text2值不能为字符！")
form1_onsubmit = false
end if

End Function
-->
</SCRIPT>

////////////////////////////////////////
<FORM action="1.htm" method=POST name=form1 onsubmit="form1_onsubmit()">
<input type=text name=text1><br>
<input type=text name=text2><br>
<input type=submit value="提交" >
</FORM>

提交时连续出现两次错误提示，如下：
1：text1值不能为空！
text2值不能为字符！
2：text1值不能为空！
text2值不能为字符！
请问如何改正

再给分20

[cmsoft]

用JS吧@_@

[孟子E章]

<SCRIPT>

function form1_onsubmit()
{
if (document.form1.text1.value == "")
{
alert("text1值不能为空！")
return false
}
if (!num(document.form1.text2.value))
{
alert("text2值不能为字符！")
return false
}
return true
}
</SCRIPT>
<script language="vbscript">
Function num(s)
num = false
IF IsNumeric(s) Then num = True
End Function
</script>
////////////////////////////////////////
<FORM action="1.htm" method=POST name=form1 onsubmit="return form1_onsubmit()">
<input type=text name=text1><br>
<input type=text name=text2><br>
<input type=submit value="提交" >
</FORM>

[meizz]

<SCRIPT ID=clientEventHandlersVBS LANGUAGE=vbscript>
<!--
Function form1_onsubmit()
if form1.text1.value=empty then
alert("text1值不能为空！")
form1_onsubmit = false
exit function
end if
if not isnumeric( form1.text2.value) then
alert("text2值不能为字符！")
form1_onsubmit = false
exit function
end if
End Function
-->
</SCRIPT>

////////////////////////////////////////
<FORM action="1.htm" method=POST name=form1>
<input type=text name=text1><br>
<input type=text name=text2><br>
<input type=submit value="提交" >
</FORM>

你出错的原因：VBScript里已经定义了表单的提交动作，页你的HTML代码里又写上了一句onsubmit，因此这里就相当于两次检查了表单的值了。

[ehom]

两种改法:
1:
<SCRIPT ID=clientEventHandlersVBS LANGUAGE=vbscript>
<!--
Function form1_onsubmit()
if form1.text1.value=empty then
alert("text1值不能为空！")
form1_onsubmit = false
end if
if not isnumeric( form1.text2.value) then
alert("text2值不能为字符！")
form1_onsubmit = false
end if
End Function
-->
</SCRIPT>

////////////////////////////////////////
<FORM action="1.htm" method=POST name=form1>
<input type=text name=text1><br>
<input type=text name=text2><br>
<input type=submit value="提交" >
</FORM>

2:
<SCRIPT ID=clientEventHandlersVBS LANGUAGE=vbscript>
<!--
Function check()
if form1.text1.value=empty then
alert("text1值不能为空！")
check = false
end if
if not isnumeric( form1.text2.value) then
alert("text2值不能为字符！")
check = false
end if
End Function
-->
</SCRIPT>

////////////////////////////////////////
<FORM action="1.htm" method=POST name=form1 onsubmit="javascript:return check();">
<input type=text name=text1><br>
<input type=text name=text2><br>
<input type=submit value="提交" >
</FORM>
或者全部用javascript写!

[尘雨]

<SCRIPT ID=clientEventHandlersVBS LANGUAGE=vbscript>
<!--
Function form1_onsubmit()
if form1.text1.value=empty then
alert("text1值不能为空！")
form1_onsubmit = false
exit function


end if
if not isnumeric( form1.text2.value) then
alert("text2值不能为字符！")
form1_onsubmit = false
exit function

end if

End Function
-->
</SCRIPT>