asp怎么给最新文章加new图标呢?

刚刚发了个问题点错了,直接点位了确认答案了……这次悬赏就只有多点……呵呵,下面是相关的代码……知道的,直接给我加进去,我运行通过了就加分,谢谢大家了啊……我都整了很久了语... 刚刚发了个问题点错了,直接点位了确认答案了……这次悬赏就只有多点 ……呵呵,下面是相关的代码……知道的,直接给我加进去,我运行通过了就加分,谢谢大家了啊……我都整了很久了语法还是不对!
many="top "&many
Set RsValue=server.CreateObject("ADODB.Recordset")
sqlValue="select "&many&" * from News "&SortV&" "&orderV
RsValue.open sqlValue,conn,3,3
If Not RsValue.eof Then
While Not RsValue.eof
response.write "<li>"
If timel=1 then
response.write "<span>["&Trim(Left(RsValue("InfoTime"),10))&"]
</span>"
Else
response.write ""
End If
response.write "<a href='index_con.asp?ID="&RsValue("ID")&"'
style='color:#000000'>"&Left(RsValue("Title"),lengthL)&"</a></li>"
RsValue.MoveNext
Wend
End If
End Function

我想在今日最新下面加new,请问怎么加的啊?
时间字段名是 Infotime 下面这段加上没用呢?
if news="1" then
if datediff("d",rs("Infotime"),date())<=5 then
Response.Write "<img src=images/new.gif>"
end if
end if
展开
 我来答
炀凡
2010-09-13 · TA获得超过768个赞
知道小有建树答主
回答量:263
采纳率:0%
帮助的人:371万
展开全部
建立一个newpic变量,获取图片,然后把它加在文章标题前面或后面,符合条件则显示:

请先确认你的infotime值是时间类值,如果是文本类,请cdate(rs("Infotime"))
再请确认你的news="1"有效。

dim newpic
newpic=""
if news="1" then
if datediff("d",rs("Infotime"),date())<=5 then
newpic = "<img src=images/new.gif>"
end if
end if

response.write newpic&"<a href='index_con.asp?ID="&RsValue("ID")&"'
style='color:#000000'>"&Left(RsValue("Title"),lengthL)&"</a></li>"

加后面:
response.write "<a href='index_con.asp?ID="&RsValue("ID")&"'
style='color:#000000'>"&Left(RsValue("Title"),lengthL)&"</a>"&newpic&"</li>"
syt251681107
2010-09-13 · TA获得超过5371个赞
知道大有可为答主
回答量:5680
采纳率:25%
帮助的人:2143万
展开全部
response.write "<a href='index_con.asp?ID="&RsValue("ID")&"'
style='color:#000000'>"&Left(RsValue("Title"),lengthL)&"</a>"

if datediff("d",rs("Infotime"),date())<=5 then
Response.Write "<img src=images/new.gif>"
end if

response.write "</li>"
已赞过 已踩过<
你对这个回答的评价是?
评论 收起
推荐律师服务: 若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询

为你推荐:

下载百度知道APP,抢鲜体验
使用百度知道APP,立即抢鲜体验。你的手机镜头里或许有别人想知道的答案。
扫描二维码下载
×

类别

我们会通过消息、邮箱等方式尽快将举报结果通知您。

说明

0/200

提交
取消

辅 助

模 式