大侠救救我吧,刚学ASP(VBscript),下面代码哪里错了,怎么点击按钮没反应啊!
<html><head><title>测试</title><script><!--Subbutton1_OnClickDimform1Setform1=Document....
<html>
<head>
<title>测试</title>
<script>
<!--
Sub button1_OnClick
Dim form1
Set form1=Document.formname
If IsNumeric(form1.text1.Value) Then
If form1.text1.Value>=0 AND form1.text1.Value<=10 Then
MsgBox "谢谢!"
Else
MsgBox "请输入一个1-10之间的数!"
End If
Else
MsgBox "请输入数字"
End If
End Sub
-->
</script>
</head>
<body>
<form name="formname">
输入一个1-10之间的数:
<input type="text" name="text1" width="20px" />
<input type="button" value="检查" name="button1" />
</form>
</body>
</html> 展开
<head>
<title>测试</title>
<script>
<!--
Sub button1_OnClick
Dim form1
Set form1=Document.formname
If IsNumeric(form1.text1.Value) Then
If form1.text1.Value>=0 AND form1.text1.Value<=10 Then
MsgBox "谢谢!"
Else
MsgBox "请输入一个1-10之间的数!"
End If
Else
MsgBox "请输入数字"
End If
End Sub
-->
</script>
</head>
<body>
<form name="formname">
输入一个1-10之间的数:
<input type="text" name="text1" width="20px" />
<input type="button" value="检查" name="button1" />
</form>
</body>
</html> 展开
展开全部
<script>
<!--
Sub button1_OnClick
Dim form1
Set form1=Document.formname
If IsNumeric(form1.text1.Value) Then
If form1.text1.Value>=0 AND form1.text1.Value<=10 Then
MsgBox "谢如基伍谢!"
Else
MsgBox "请输入一个1-10之间的数!"
End If
Else
MsgBox "请输入数字"
End If
End Sub
-->
</script>
这里的代码写错了
应该如此写就对了
<html>
<head>
<title>测试</title>
<script>渣或
function checknum(){
var thenum=document.getElementById("text1").value;
if (thenum<=10&&thenum>=0){
alert("谢谢");
}else{
alert("请输入一个1-10之间的数");
return false;
}
}
</script>
</head>
<body>
<form name="formname">
输入一个1-10之间的数:
<input type="text" name="text1" id="text1" width="20px" />
<input type="button" onclick="return checknum();" value="检查" name="button1" />
</form>
<锋吵/body>
</html>
<!--
Sub button1_OnClick
Dim form1
Set form1=Document.formname
If IsNumeric(form1.text1.Value) Then
If form1.text1.Value>=0 AND form1.text1.Value<=10 Then
MsgBox "谢如基伍谢!"
Else
MsgBox "请输入一个1-10之间的数!"
End If
Else
MsgBox "请输入数字"
End If
End Sub
-->
</script>
这里的代码写错了
应该如此写就对了
<html>
<head>
<title>测试</title>
<script>渣或
function checknum(){
var thenum=document.getElementById("text1").value;
if (thenum<=10&&thenum>=0){
alert("谢谢");
}else{
alert("请输入一个1-10之间的数");
return false;
}
}
</script>
</head>
<body>
<form name="formname">
输入一个1-10之间的数:
<input type="text" name="text1" id="text1" width="20px" />
<input type="button" onclick="return checknum();" value="检查" name="button1" />
</form>
<锋吵/body>
</html>
AiPPT
2024-09-19 广告
2024-09-19 广告
随着AI技术的飞速发展,如今市面上涌现了许多实用易操作的AI生成工具1、简介:AiPPT: 这款AI工具智能理解用户输入的主题,提供“AI智能生成”和“导入本地大纲”的选项,生成的PPT内容丰富多样,可自由编辑和添加元素,图表类型包括柱状图...
点击进入详情页
本回答由AiPPT提供
展开全部
<html>
<head>
<title>测试</title>
<script>
<!--
Sub button1_OnClick
Dim form1
Set form1=Document.formname
If IsNumeric(form1.text1.Value) Then
If form1.text1.Value>=0 AND form1.text1.Value<=10 Then
MsgBox "谢谢!"
Else
MsgBox "请输入一个1-10之间的数消薯!"
End If
Else
MsgBox "请输入数字销桥猜"亏型
End If
End Sub
-->
</script>
</head>
<body>
<form name="formname">
输入一个1-10之间的数:
<input type="text" name="text1" width="20px" />
<input type="button" value="检查" name="button1" onclick="button1_OnClick()" />
</form>
</body>
</html>
<head>
<title>测试</title>
<script>
<!--
Sub button1_OnClick
Dim form1
Set form1=Document.formname
If IsNumeric(form1.text1.Value) Then
If form1.text1.Value>=0 AND form1.text1.Value<=10 Then
MsgBox "谢谢!"
Else
MsgBox "请输入一个1-10之间的数消薯!"
End If
Else
MsgBox "请输入数字销桥猜"亏型
End If
End Sub
-->
</script>
</head>
<body>
<form name="formname">
输入一个1-10之间的数:
<input type="text" name="text1" width="20px" />
<input type="button" value="检查" name="button1" onclick="button1_OnClick()" />
</form>
</body>
</html>
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询