| 网站首页 | 业界新闻 | 小组 | 威客 | 人才 | 下载频道 | 博客 | 代码贴 | 在线编程 | 编程论坛
欢迎加入我们,一同切磋技术
用户名:   
 
密 码:  
共有 1439 人关注过本帖
标题:如何实现asp在最近新闻上加闪动"news"标志(问题已解决)
只看楼主 加入收藏
towering
Rank: 7Rank: 7Rank: 7
等 级:黑侠
威 望:1
帖 子:261
专家分:507
注 册:2007-10-9
结帖率:100%
收藏
 问题点数:0 回复次数:6 
如何实现asp在最近新闻上加闪动"news"标志(问题已解决)
请问各位大虾,怎么实现用asp在一个月内的新闻后面加上闪动的"news"标志?急~~~~
谢谢~~~

[[it] 本帖最后由 towering 于 2008-4-3 11:05 编辑 [/it]]
搜索更多相关主题的帖子: news quot asp 
2008-02-20 23:47
smlx9807
Rank: 1
等 级:新手上路
帖 子:9
专家分:0
注 册:2005-8-4
收藏
得分:0 
加入一个冷却的new gif动画图片就好了啊~看看下面代码
'最新主题
<%
sub bbs5
set rs=server.CreateObject("adodb.recordset")
sql="select top 10 title,boardid,topicid from dv_topic  order by dateandtime desc"
rs.open sql,conn,1,1
if rs.eof then
response.Write "<table width='100%' border='0' cellspacing='0' cellpadding='0'><tr><td>当前没有主题</td></tr></table>"
else
do while not rs.eof
 response.Write"<table width='100%' border='0' cellspacing='0' cellpadding='0' style='padding:3px;'><tr>"
 response.Write"<td ><img src='images/dian.gif' width='2' height='2' align='absmiddle'>?"
 response.write "<a  title='"&rs("title")&"' target='_blank' href='bbs1/dispbbs.asp?boardid="&rs("boardid")&"&id="&rs("topicid")&"&page=1'>"
 response.write cutstr(rs("title"),12,"")
 response.write "</a><img src='images/新标志.gif' width='2' height='2' align='absmiddle'></td>"
 response.Write "<tr></table>"  
rs.movenext
if rs.eof then exit do
loop
rs.close
set rs=nothing
end if
end sub
%>
2008-02-21 14:12
yms123
Rank: 16Rank: 16Rank: 16Rank: 16
等 级:版主
威 望:209
帖 子:12488
专家分:19042
注 册:2004-7-17
收藏
得分:0 
楼上的是一种办法,新闻读取时按时间进行排序前几条就是最新的。
也可以利用datediff函数来判断。
2008-02-21 15:01
towering
Rank: 7Rank: 7Rank: 7
等 级:黑侠
威 望:1
帖 子:261
专家分:507
注 册:2007-10-9
收藏
得分:0 
如果是想在最近一个月的新闻标题后加,
应该怎么做呢?
谢谢!!!!
2008-02-21 16:29
smlx9807
Rank: 1
等 级:新手上路
帖 子:9
专家分:0
注 册:2005-8-4
收藏
得分:0 
你把你的代码发上来让大家看看啊~
用Datediff这个函数可以实现你说的要求。你可以去查阅一下这个函数的参数。
2008-02-21 21:02
towering
Rank: 7Rank: 7Rank: 7
等 级:黑侠
威 望:1
帖 子:261
专家分:507
注 册:2007-10-9
收藏
得分:0 
我还是应该学习一下Datediff先,呵呵!
谢谢!
2008-02-22 19:08
towering
Rank: 7Rank: 7Rank: 7
等 级:黑侠
威 望:1
帖 子:261
专家分:507
注 册:2007-10-9
收藏
得分:0 
搞定!为了方便大家学习我把代码送出:
<%if DateDiff("h",rs("dateTime"),now())<=24 then%><img src="img/new.gif"><%end if%>
这是1天的,Datadiff函数介绍如下:
DateDiff 函数

描述
返回两个日期之间的时间间隔。
语法
DateDiff(interval, date1, date2 [,firstdayofweek][, firstweekofyear]])
DateDiff 函数的语法有以下参数:

参数 描述
interval 必选。字符串表达式,表示用于计算 date1 和 date2 之间的时间间隔。有关数值,请参阅“设置”部分。
date1, date2 必选。日期表达式。用于计算的两个日期。
firstdayofweek 可选。指定星期中第一天的常数。如果没有指定,则默认为星期日。有关数值,请参阅“设置”部分。
firstweekofyear 可选。指定一年中第一周的常数。如果没有指定,则默认为 1 月 1 日所在的星期。有关数值,请参阅“设置”部分。


设置
interval 参数可以有以下值:
设置 描述
yyyy 年
q 季度
m 月
y 一年的日数
d 日
w 一周的日数
ww 周
h 小时
m 分钟
s 秒


firstdayofweek 参数可以有以下值:

常数 值 描述
vbUseSystem 0 使用区域语言支持 (NLS) API 设置。
vbSunday 1 星期日(默认)
vbMonday 2 星期一
vbTuesday 3 星期二
vbWednesday 4 星期三
vbThursday 5 星期四
vbFriday 6 星期五
vbSaturday 7 星期六


firstweekofyear 参数可以有以下值:

常数 值 描述
vbUseSystem 0 使用区域语言支持 (NLS) API 设置。
vbFirstJan1 1 由 1 月 1 日所在的星期开始(默认)。
vbFirstFourDays 2 由在新年中至少有四天的第一周开始。
vbFirstFullWeek 3 由在新的一年中第一个完整的周开始。


说明
DateDiff 函数用于判断在两个日期之间存在的指定时间间隔的数目。例如可以使用 DateDiff 计算两个日期相差的天数,或者当天到当年最后一天之间的星期数。
要计算 date1 和 date2 相差的天数,可以使用“一年的日数”(“y”)或“日”(“d”)。当 interval 为“一周的日数”(“w”)时,DateDiff 返回两个日期之间的星期数。如果 date1 是星期一,则 DateDiff 计算到 date2 之前星期一的数目。此结果包含 date2 而不包含 date1。如果 interval 是“周”(“ww”),则 DateDiff 函数返回日历表中两个日期之间的星期数。函数计算 date1 和 date2 之间星期日的数目。如果 date2 是星期日,DateDiff 将计算 date2,但即使 date1 是星期日,也不会计算 date1。

如果 date1 晚于 date2,则 DateDiff 函数返回负数。

firstdayofweek 参数会对使用“w”和“ww”间隔符号的计算产生影响。

如果 date1 或 date2 是日期文字,则指定的年度会成为日期的固定部分。但是如果 date1 或 date2 被包括在引号 (" ") 中并且省略年份,则在代码中每次计算 date1 或 date2 表达式时,将插入当前年份。这样就可以编写适用于不同年份的程序代码。

在 interval 为“年”(“yyyy”)时,比较 12 月 31 日和来年的 1 月 1 日,虽然实际上只相差一天,DateDiff 返回 1 表示相差一个年份。

参考百度百科

[[it] 本帖最后由 towering 于 2008-2-24 18:17 编辑 [/it]]
2008-02-24 18:16
快速回复:如何实现asp在最近新闻上加闪动"news"标志(问题已解决)
数据加载中...
 
   



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

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