小学生猜数也不行了

来源:百度知道 编辑:UC知道 时间:2024/09/21 10:49:55
<script language="vbscript">
sub init()
frm1.number.focus
frm1.number.select
end sub
</script>
<html>

<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>小学生猜数游戏</title>
</head>

<body onload=init>
<a href='45.asp' number=0>重新猜</a>
<center><font size=6 face="" color=blue>小学生猜数游戏

</font></center>
<hr><form name=frm1 action="45.asp">
<%
if not isnumeric(request("number")) then
guessnum=0
else
guessnum=cint(request("number"))
endif
session("count")=count
if guessnum=0 then
session("count")=0
randomize
session("number")=int(10*rnd())
endif
response.write"请输入1-10之间

改好了。。。
注:带有'*,是我改过的,记住,下次发点分上来,要不少有人会作的。

<script language="vbscript">
sub init()
frm1.number.focus
frm1.number.select
end sub
</script>
<html>

<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>小学生猜数游戏</title>
</head>

<body onload=init>
<a href='45.asp' number=0>重新猜</a>
<center><font size=6 face="" color=blue>小学生猜数游戏

</font></center>
<hr><form name=frm1 action="45.asp">
<%
if not isnumeric(request("number")) then
guessnum=0
else
guessnum=cint(request("number"))
end if

'session("count")=count '*删除这一句
if guessnum=0 then
session("count")=0
randomize