网页资讯视频图片知道文库贴吧地图采购
进入贴吧全吧搜索
asp吧 关注：33,695贴子：111,009
  • 12回复贴，共1页

作业上遇到困难啦，不知道哪里有问题，求指教~~~

<html>
<head>
<script language="vbscript">
sub tj_onclick()
bg.submit
dim a,b
a=request.querystring("text1")
b=isnumeric(a)
if b=1 then
if a>0 and a<51 then
alert"提交成功"
else
alert"请输入1到50之间的数字"
end if
else
alert"请输入数字!(不是字符!)"
end if
end sub
</script>
</head>
<body>
<h1>请输入1到50之间的数字</h1>
<br>
<form name="bg" method="get" action="">
<input type="text" name="text1" size="10">
<input type="button" value="提交" name="tj">
</form>
</body>
</html>

点了提交就是不出提示，找不着哪里出问题了，，菜鸟求大神指点~~


我，我的QQ2247309330


有的alert都修改成msgbox 可以继续学习，请联系我我的QQ 2247309330


按照你的意思，我写了一下，你可以去试试，但不知道是不是你要的结果。
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312" />
<title>服务器端与客户端</title>
</head>
<body>
<h1>请输入1到50之间的数字</h1>
<br />
<form name="bg" method="get" action="">
<input type="text" size="10" name="text1" />
<input type="submit" value="提交" />
</form>
<%
a = request.QueryString("text1")
b = 0
if a="" then
b=false
else
b = isnumeric(a)
end if
%>
<script language="vbscript">
if <%=b%> then
a = <%=a%>
if a<0 or a>51 then
a = "请输入0到50之间的数字。"
end if
else
a = "您输入的不是数字。请输入0~50的数字"
end if
msgbox(a)
bg.text1.focus()
</script>
</body>
</html>



<%@ Language="VBScript" %> <!DOCTYPE html> <html lang="en"> <head> <meta charset="utf-8" /> <title>请输入1到50之间的数字</title> </head> <body> <h1>请输入1到50之间的数字</h1> <form name="bg" method="get" action=""> <input type="text" name="text1" size="10"> <input type="submit"> </form> <% dim a, b a = request.querystring("text1") b = isNumeric(a) response.write("<br>") if b then if (a > 0 and a < 51) then response.write "提交成功" response.write "<br>" response.write a else response.write "请输入1到50之间的数字" end if else response.write"请输入数字!(不是字符!)" end if %> </body> </html>


在错程序的时候 检查错误可以逐行检查！
简单来说
比如 你设置一个 alert"1111" 这样的代码
sub tj_onclick()
从这一行之后每一行这样的后面 加一个这样的代码
你一行一行的实验 你就会知道那一行代码有问题了！
你这个代码的问题 是使用了 Request对象
百度 或者翻书 看看 这个对象具体用法！


zhaoyuking 明显不是他要的！他要的html的页面 你的是asp的！


今天吃完饭 没事做 就帮你改了一下！
你这个代码有2个问题
1.就是之前说的那个 关于怎么接收数据的
2.就是判断是否为数字返回值为true，不要写为1
正确代码如下：
<html>
<head>
<script language="vbscript">
sub tj_onclick()
bg.submit
dim a,b
a=Document.bg.text1.value
b=isnumeric(a)
if b=true
then if a>0 and a<51 then
alert"提交成功"
else alert"请输入1到50之间的数字"
end if
else alert"请输入数字!(不是字符!)"
end if
end sub
</script>
</head>
<body>
<h1>请输入1到50之间的数字</h1><br>
<form name="bg" method="get" action="">
<input type="text" name="text1" size="10">
<input type="button" value="提交" name="tj">
</form>
</body>
</html>


其实我楼上写的 不符合我平时的为人！
给你这个其实是害你呢！
好好看看我6楼讲的方法
对你写程序很受用的！
唉 又后悔把正确的东西给你了！
下次不做这样的事情了！


哦 刚才看了一下！
是我拷贝过来的时候 这个百度录入框把格式打乱了 我重分的时候 有个地方 没分好！
if b=true
then if a>0 and a<51 then
这里应该是
if b=true then
if a>0 and a<51 then
这里这个格式错了！



扫二维码下载贴吧客户端

下载贴吧APP
看高清直播、视频！
  • 12回复贴，共1页
分享到: