信息發(fā)布中的判斷過(guò)期和有效期的東西
更新時(shí)間：2006年12月25日 00:00:00 作者：
復(fù)制代碼 代碼如下:
yxq=cdate(rdsInfo("InfoDate")) //得到有效期
fbsj=FormatTime(rdsInfo("CreateTime"),8) //發(fā)布時(shí)間
dqsj=DateAdd( "d" ,yxq ,fbsj) //到期時(shí)間
sysj=DateDiff ("d",date(),dqsj) //判斷剩余時(shí)間 或是否過(guò)期
if sysj<0 then
sysj="<font color=#808080>過(guò)期</font>"
else
sysj="<font color=#ff0000>"&sysj&"</font> 天"
end if
fbsj=FormatTime(rdsInfo("CreateTime"),8) //發(fā)布時(shí)間
dqsj=DateAdd( "d" ,yxq ,fbsj) //到期時(shí)間
sysj=DateDiff ("d",date(),dqsj) //判斷剩余時(shí)間 或是否過(guò)期
if sysj<0 then
sysj="<font color=#808080>過(guò)期</font>"
else
sysj="<font color=#ff0000>"&sysj&"</font> 天"
end if
相關(guān)文章
在Asp程序中取得表單所有內(nèi)容的代碼...2007-09-09
ASP的Server.MapPath()不同參數(shù)返回路徑總結(jié)
這篇文章主要介紹了ASP的Server.MapPath()不同參數(shù)返回路徑總結(jié),也就是在Server.MapPath()中填入絕對(duì)路徑、相對(duì)路徑等情況的返回值總結(jié),需要的朋友可以參考下2014-07-07
windows2003下使用asp WScript.Shell的設(shè)置方法
在windows2000下，IIS默認(rèn)設(shè)置是可以web和可執(zhí)行程序通信的。但是在2003下IIS關(guān)于這方面的服務(wù)是禁止的。2007-12-12
這篇文章主要介紹了.Net部署Docker-v指令使用，本文給大家介紹的非常詳細(xì)，對(duì)大家的學(xué)習(xí)或工作具有一定的參考借鑒價(jià)值，需要的朋友可以參考下2023-04-04
這篇文章主要介紹了asp實(shí)現(xiàn)截取字符串函數(shù),代碼非常簡(jiǎn)潔，也非常實(shí)用，這里分享給大家，有需要的小伙伴參考下吧。2015-03-03
ASP 常見對(duì)象總結(jié)(熟悉一下利用以后的開發(fā)使用)
ASP 常見對(duì)象總結(jié)(熟悉一下利用以后的開發(fā)使用)2009-11-11![ASP+JS三級(jí)聯(lián)動(dòng)下拉菜單[調(diào)用數(shù)據(jù)庫(kù)數(shù)據(jù)]](http://img.jbzj.com/images/xgimg/bcimg6.png)
ASP+JS三級(jí)聯(lián)動(dòng)下拉菜單[調(diào)用數(shù)據(jù)庫(kù)數(shù)據(jù)]
ASP+JS三級(jí)聯(lián)動(dòng)下拉菜單[調(diào)用數(shù)據(jù)庫(kù)數(shù)據(jù)]...2007-03-03
轉(zhuǎn)換中文為unicode 轉(zhuǎn)換unicode到正常文本
轉(zhuǎn)換中文為unicode 轉(zhuǎn)換unicode到正常文本...2006-10-10
動(dòng)網(wǎng)論壇的asp 數(shù)據(jù)庫(kù)連接代碼
動(dòng)網(wǎng)論壇的asp程序,在一定程度了，成了asp的頂峰之作。高手2009-02-02
AJAX簡(jiǎn)單應(yīng)用實(shí)例-彈出層
AJAX的簡(jiǎn)單應(yīng)用,包括js彈出DIV層、層拖動(dòng)、ajax后臺(tái)讀取數(shù)據(jù)！注意getinfo.asp文件是以u(píng)tf-8格式保存的，在getinfo.asp里面可以寫讀數(shù)據(jù)庫(kù)代碼！2008-08-08