信息发布中的判断过期和有效期的东西
发布时间：2016-12-29 来源：查字典编辑
摘要：复制代码代码如下:yxq=cdate(rdsInfo("InfoDate"))//得到有效期fbsj=FormatTime(rdsInfo(...
复制代码 代码如下:yxq=cdate(rdsInfo("InfoDate"))//得到有效期
fbsj=FormatTime(rdsInfo("CreateTime"),8)//发布时间
dqsj=DateAdd("d",yxq,fbsj)//到期时间
sysj=DateDiff("d",date(),dqsj)//判断剩余时间或是否过期
ifsysj<0then
sysj="<fontcolor=#808080>过期</font>"
else
sysj="<fontcolor=#ff0000>"&sysj&"</font>天"
endif