| 网站首页 | 业界新闻 | 小组 | 威客 | 人才 | 下载频道 | 博客 | 代码贴 | 在线编程 | 编程论坛
欢迎加入我们,一同切磋技术
用户名:   
 
密 码:  
共有 1181 人关注过本帖
标题:关于猜数字游戏asp代码的疑问???
取消只看楼主 加入收藏
cainiao158
Rank: 1
等 级:新手上路
威 望:1
帖 子:157
专家分:0
注 册:2007-9-14
收藏
 问题点数:0 回复次数:2 
关于猜数字游戏asp代码的疑问???

guessnumber.asp内如下!!!

<%@ LANGUAGE = VBScript %>
<% Option Explicit %>
<Html>
<title>猜数字游戏</title>
<body>
<%
Response.Expires = 0
%>
<%
dim GuessNum
on error resume next
GuessNum=Request("Number")
if GuessNum="" then GuessNum="0" End if
GuessNum=Clng(GuessNum)

Session("Count")=Session("Count") + 1
if Session("Count") < 10 and GuessNum <> session("Number") then

%>

<form action="guessNumber.asp">
<input type="text" name="Number">
<input type="submit" value="提交">
</form>
<hr>
<%
end if
if GuessNum<0 or guessNum>100 then
Response.write "请输入1~100之间的整数"
elseif GuessNum=0 then
session("Count") = 0
Randomize
session("Number") = Int(rnd * 100 + 1)
Response.write "请输入1~100之间的整数"
elseif GuessNum > session("Number") then
response.write "你猜的太大了"
elseif GuessNum < session("Number") then
response.write "你猜的太小了"
elseif GuessNum = session("Number") then
response.write "祝贺你,猜对了"
end if

Response.write "<br>共猜了" & Session("Count") & "次"
if Session("Count")=10 then
Response.write "答案是" & Session("Number")
end if
%>
<a href="guessnumber.asp?Number=0">重新猜</a>
</body>
</html>

本人是asp的初学者,在网上的一个教程上看到的这段代码,首先第一次标示红色的那段代码有什么作用???,我觉得他没有起到什么作用??,然后第二次标红色代码的那段??我不明白为什么要用那样的算法??有什么作用
然后就是最后了,number=0有什么作用????不像是传递数值?????

搜索更多相关主题的帖子: 数字游戏 GuessNum 疑问 asp 
2007-10-14 23:39
cainiao158
Rank: 1
等 级:新手上路
威 望:1
帖 子:157
专家分:0
注 册:2007-9-14
收藏
得分:0 
if Session("Count") < 10 and GuessNum <> session("Number") then 这个确实是让它猜10次!!!可是他没有执行任何语句,就end if了,本人是菜鸟,谁能给我解释,希望老鸟完整的看完代码再给我解释??谢谢

要想飞的更高,就把地平线忘掉!
2007-10-15 12:16
cainiao158
Rank: 1
等 级:新手上路
威 望:1
帖 子:157
专家分:0
注 册:2007-9-14
收藏
得分:0 
哦,明白点了,谢谢,还有那个<a href="guessnumber.asp?Number=0">重新猜</a> 那个NUmber=0,有什么作用!!!

要想飞的更高,就把地平线忘掉!
2007-10-15 12:25
快速回复:关于猜数字游戏asp代码的疑问???
数据加载中...
 
   



关于我们 | 广告合作 | 编程中国 | 清除Cookies | TOP | 手机版

编程中国 版权所有,并保留所有权利。
Powered by Discuz, Processed in 0.016836 second(s), 8 queries.
Copyright©2004-2024, BCCN.NET, All Rights Reserved