| 网站首页 | 业界新闻 | 小组 | 威客 | 人才 | 下载频道 | 博客 | 代码贴 | 在线编程 | 编程论坛
欢迎加入我们,一同切磋技术
用户名:   
 
密 码:  
共有 464 人关注过本帖
标题:[求助]这段程序哪里出错了啊,不管是多少都显示最后一条
只看楼主 加入收藏
hwqde
Rank: 1
等 级:新手上路
帖 子:33
专家分:0
注 册:2007-10-7
收藏
 问题点数:0 回复次数:7 
[求助]这段程序哪里出错了啊,不管是多少都显示最后一条
<%
if score*5=100 then
%>
你太厉害了,可是不要骄傲哦100分

<%
else if 100>score*5>=80 then
%>
厉害,可是不要骄傲哦
<%
else if 80>score*5>=60 then
%>
再接再厉哦<%=score*5% 分!
<%
else if 60>score*5>=30 then
%>
需要努力加油<%=score*5%>分!
<%
else if 30>score*5>=0 then
%>
老师很生气,后果很严重<%=score*5%>分!
<% end if %>
<% end if %>
<% end if %>
<% end if %>
<% end if %>
2007-10-17 15:31
yms123
Rank: 16Rank: 16Rank: 16Rank: 16
等 级:版主
威 望:209
帖 子:12488
专家分:19042
注 册:2004-7-17
收藏
得分:0 
<%
With Response
Dim ReFalse,tScore
ReFalse=False
tScore=score*5
If tScore=100 then
.Write "你太厉害了,可是不要骄傲哦100分"
ReFalse=True
End IF
IF ReFalse=False Then
if tScore<100 Or tScore>=80 then
.Write "厉害,可是不要骄傲哦"
ReFalse=True
End IF
End IF
IF ReFalse=False Then
if tScore<80 Or tScore>=60 then
.Write "再接再厉哦"&tScore&"分!"
ReFalse=True
End IF
End IF
IF ReFalse=False Then
if tScore<60 Or tScore>=30 then
.Write "需要努力加油"&tScore&"分!"
ReFalse=True
End IF
End IF
IF ReFalse=False Then
if tScore<30 Or tScore>=0 then
.Write "老师很生气,后果很严重"&tScore&"分!"
ReFalse=True
End IF
End IF
End With
%>
2007-10-17 15:51
hwqde
Rank: 1
等 级:新手上路
帖 子:33
专家分:0
注 册:2007-10-7
收藏
得分:0 
经过版主的指教,我调试出来了
十分感谢~




2007-10-17 16:07
hwqde
Rank: 1
等 级:新手上路
帖 子:33
专家分:0
注 册:2007-10-7
收藏
得分:0 

如果我是输出的是图片怎么办呢
我试了几次都不行
If tScore=100 then
.Write "图片"
ReFalse=True
End IF


2007-10-17 17:13
yms123
Rank: 16Rank: 16Rank: 16Rank: 16
等 级:版主
威 望:209
帖 子:12488
专家分:19042
注 册:2004-7-17
收藏
得分:0 

输出图片的话用
<img src="图片URL">
就可以
比如
.Write "<img src=图片URL >"

2007-10-17 17:24
hwqde
Rank: 1
等 级:新手上路
帖 子:33
专家分:0
注 册:2007-10-7
收藏
得分:0 
谢谢版主

2007-10-17 20:54
cainiao158
Rank: 1
等 级:新手上路
威 望:1
帖 子:157
专家分:0
注 册:2007-9-14
收藏
得分:0 

楼主原先那个地方错了???


要想飞的更高,就把地平线忘掉!
2007-10-17 21:23
yeshirow
Rank: 4
等 级:贵宾
威 望:10
帖 子:854
专家分:0
注 册:2006-6-8
收藏
得分:0 
else if
elseif

原來朋友仔感情再天真, 亦是我永遠也會愛惜的人, 明日愛他人, 也記住學會不要緊; 原來朋友比戀人更高分, 亦讓我開始懂得不記恨, 若大家都敏感, 我更要永遠記得拒絕再因小事怪人, 爲何沒有這條校訓...Twins-朋友仔 MCSD Training
2007-10-19 07:33
快速回复:[求助]这段程序哪里出错了啊,不管是多少都显示最后一条
数据加载中...
 
   



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

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