| 网站首页 | 业界新闻 | 小组 | 威客 | 人才 | 下载频道 | 博客 | 代码贴 | 在线编程 | 编程论坛
欢迎加入我们,一同切磋技术
用户名:   
 
密 码:  
共有 1262 人关注过本帖
标题:如何用ASP代码能实现最近一两天的新闻后面加一个"new"标识
只看楼主 加入收藏
bjmj
Rank: 1
等 级:新手上路
帖 子:12
专家分:0
注 册:2007-9-17
收藏
得分:0 
ding
2007-09-29 11:39
zjcwg
Rank: 1
等 级:新手上路
帖 子:40
专家分:0
注 册:2007-9-29
收藏
得分:0 
很简单:

<%if DateValue(rs("datetime"))=>DateValue(date()-2) then
Response.Write "<img src=""images/new0.gif"">"
%>

2007-09-29 12:00
angerzl
Rank: 1
等 级:新手上路
帖 子:122
专家分:0
注 册:2007-8-20
收藏
得分:0 

加上后,出现:

错误类型:
Microsoft VBScript 编译器错误 (0x800A040E)
'loop' 语句缺少 'do'
/test/公司网站_测试网/双赢招标投标/index.asp, line 262
loop

2007-09-29 12:12
finaly
Rank: 1
来 自:广州
等 级:新手上路
帖 子:80
专家分:0
注 册:2006-6-5
收藏
得分:0 
呵呵,看来楼主跟俺一样哦,大侠说的话都不明白

http://
2007-09-29 12:17
angerzl
Rank: 1
等 级:新手上路
帖 子:122
专家分:0
注 册:2007-8-20
收藏
得分:0 

我都急死了,谁叫自己太笨了呢~!~!~!~!~

2007-09-29 12:19
zjcwg
Rank: 1
等 级:新手上路
帖 子:40
专家分:0
注 册:2007-9-29
收藏
得分:0 
数据库的表中一定要有时间的字段(AddDate),才能判断所增加的新闻信息是否属最新的。
以下试试看:

<td width="41%" style='BORDER-bottom: #999999 1px dotted'><font color="#999999" >[<%=rs_news("AddDate")%>]</font><%if DateValue(rs("AddDate"))=>DateValue(date()-2) then
Response.Write "<font color=red>new</font>"%><%end if%></td>

或者:

<td width="41%" style='BORDER-bottom: #999999 1px dotted'><font color="#999999" >[<%=rs_news("AddDate")%>]</font><%if DateValue(rs("AddDate"))=date() then%>
<font color=red>new</font><%end if%></td>



[此贴子已经被作者于2007-9-29 13:01:57编辑过]


2007-09-29 12:48
angerzl
Rank: 1
等 级:新手上路
帖 子:122
专家分:0
注 册:2007-8-20
收藏
得分:0 

谢谢楼上的朋友,不过加上那段代码以后,没有时间限制啊,全部都有小图标~!~!~

www.masztb.com

2007-09-29 13:11
zjcwg
Rank: 1
等 级:新手上路
帖 子:40
专家分:0
注 册:2007-9-29
收藏
得分:0 
回复:(angerzl)谢谢楼上的朋友,不过加上那段代码以...
一个地方有小错误,再试试!

<td width="41%" style='BORDER-bottom: #999999 1px dotted'><font color="#999999" >[<%=rs_news("AddDate")%>]</font><%if DateValue(rs_news("AddDate"))=date() then%>
<font color=red>new</font><%end if%></td>

2007-09-29 13:20
angerzl
Rank: 1
等 级:新手上路
帖 子:122
专家分:0
注 册:2007-8-20
收藏
得分:0 

还是不行,要么都显示,要么一个都没有~!~!

2007-09-29 13:34
angerzl
Rank: 1
等 级:新手上路
帖 子:122
专家分:0
注 册:2007-8-20
收藏
得分:0 
<%if DateValue(rs_news("AddDate"))=>DateValue(date()-2) then
Response.Write "<img src=""image/new1.gif"">"
%><%end if%>
这段结果是不显示


<%if DateValue(rs_news("Datetime"))=>DateValue(date()-2) then
Response.Write "<img src=""image/new1.gif"">"
%><%end if%>

这段结果显示,但是全部


究竟哪里错了啊
2007-09-29 13:55
快速回复:如何用ASP代码能实现最近一两天的新闻后面加一个"new"标识
数据加载中...
 
   



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

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