asp的onclick问题

xxjmz_78 2002-05-17 10:54:11
请看下面代码:
<HTML>
<HEAD><TITLE>简单验证</TITLE>
<SCRIPT LANGUAGE="VBScript">
<!--
Sub Submit_OnClick
Dim TheForm
Set TheForm = Document.ValidForm
If IsNumeric(TheForm.Text1.Value) Then
If TheForm.Text1.Value<1 Or TheForm.Text1.Value>10 Then
MsgBox "请输入一个 1 到 10 之间的数字。"
Else
MsgBox "谢谢。"
'TheForm.Submit
End If
Else
MsgBox "请输入一个数字。"
End If
End Sub
-->
</SCRIPT>
</HEAD>
<BODY>
<H3>简单验证</H3><HR>
<FORM NAME="ValidForm">
请输入一个 1 到 10 之间的数字:
<INPUT NAME="Text1" TYPE="TEXT" SIZE="2">
<INPUT NAME="Submit" TYPE="BUTTON" VALUE="提交" >
</FORM>
</BODY>
</HTML>
如果我在<INPUT NAME="Submit" TYPE="BUTTON" VALUE="提交" >变成<INPUT NAME="Submit" TYPE="BUTTON" VALUE="提交" ONCLICK="Submit_OnClick">后的运行结果是不一样的,同一个MSGBOX回出现两次。为什么?
...全文
15 点赞 收藏 4
写回复
4 条回复
切换为时间正序
当前发帖距今超过3年,不再开放新的回复
发表回复
coffee_cn 2002-05-17
vb你应该知道吧;;因为<INPUT NAME="Submit" TYPE="BUTTON" VALUE="提交" >有了个名字为submit的对象了呀,很象vb中的
Private Sub Command1_Click()

End Sub
这个呀,
不过你可以不这样用;
这样改就可以呀:
<HTML>
<HEAD><TITLE>简单验证</TITLE>
<SCRIPT LANGUAGE="VBScript">
<!--
Sub CheckIt
Dim TheForm
Set TheForm = Document.ValidForm
If IsNumeric(TheForm.Text1.Value) Then
If TheForm.Text1.Value<1 Or TheForm.Text1.Value>10 Then
MsgBox "请输入一个 1 到 10 之间的数字。"
Else
MsgBox "谢谢。"
'TheForm.Submit
End If
Else
MsgBox "请输入一个数字。"
End If
End Sub
-->
</SCRIPT>
</HEAD>
<BODY>
<H3>简单验证</H3><HR>
<FORM NAME="ValidForm">
请输入一个 1 到 10 之间的数字:
<INPUT NAME="Text1" TYPE="TEXT" SIZE="2">
<INPUT NAME="Submit" TYPE="BUTTON" VALUE="提交" onclick="CheckIt">
</FORM>
</BODY>
</HTML>
回复
wangfei2428 2002-05-17
<...ONCLICK="check()">

<SCRIPT LANGUAGE="VBScript">

sub check()
...
end sub
</SCRIPT>
回复
cmsoft 2002-05-17
建议用JS
<SCRIPT LANGUAGE="VBScript">
<!--
Sub Submit_OnClick()
Dim TheForm
Set TheForm = Document.ValidForm
If IsNumeric(TheForm.Text1.Value) Then
If TheForm.Text1.Value<1 Or TheForm.Text1.Value>10 Then
MsgBox "请输入一个 1 到 10 之间的数字。"
exit sub
Else
MsgBox "谢谢。"
exit sub
'TheForm.Submit
End If
Else
MsgBox "请输入一个数字。"
exit sub
End If
End Sub
-->
</SCRIPT>

回复
silentlamb 2002-05-17
submit_onclick本来就已经调用了方法,不用onclick再显式调用了
回复
相关推荐
发帖
ASP
创建于2007-09-28

2.8w+

社区成员

ASP即Active Server Pages,是Microsoft公司开发的服务器端脚本环境。
申请成为版主
帖子事件
创建了帖子
2002-05-17 10:54
社区公告
暂无公告