国产探花免费观看_亚洲丰满少妇自慰呻吟_97日韩有码在线_资源在线日韩欧美_一区二区精品毛片,辰东完美世界有声小说,欢乐颂第一季,yy玄幻小说排行榜完本

首頁(yè) > 編程 > ASP > 正文

獲取當(dāng)日文章,且支持前一天、后一天的方法

2024-05-04 11:06:07
字體:
供稿:網(wǎng)友

今天群里一個(gè)朋友瀏覽了我的asp98.cn網(wǎng)站,她說最好做一個(gè)當(dāng)日內(nèi)容的列表,用戶一般都懶得往下去看的。感覺非常有道理,這就是所謂的用戶體驗(yàn)了,呵呵!說搞就搞!所以搞到半夜一點(diǎn)半...... - - #

內(nèi)容列表非常簡(jiǎn)單,這里就不多說了,首先思路,定義一個(gè)變量獲取值來查詢數(shù)據(jù)庫(kù)。如果為空就等于當(dāng)前時(shí)間。

一、變量定義

代碼如下:
Dim 變量名 '名字自己起一下吧,本人最不會(huì)起名字了。
IF Request.QueryString("參數(shù)") = "" Then
變量名 = Now()
Else
變量名 = Request.QueryString("參數(shù)")
End If

二、判斷日期格式是否正確

這個(gè)程序做好以后我才考慮到,現(xiàn)在覺得以他的重要性應(yīng)該放在這里

(知識(shí)點(diǎn):IsDate函數(shù))

以下是引用片段:
If Not IsDate(變量名) Then
變量名 = now()
End If

三、數(shù)據(jù)庫(kù)查詢
(知識(shí)點(diǎn):這里用到一個(gè)datediff時(shí)間函數(shù))

以下是引用片段:
Sql = "Select * From [表] where datediff('d',數(shù)據(jù)庫(kù)時(shí)間,'"&變量名&"')=0 Order By id Desc"
...............

四、最后加上一個(gè)鏈接

以下是引用片段:
前一天 后一天

后一天處可以加一個(gè)判斷

<%IF datediff("d",變量名,now())>0 then%>顯示后一天的鏈接<%end if%>

有關(guān)這個(gè)鏈接,(*^__^*),本人試了很多方法都得不到正確的結(jié)果 所以用了最笨的方法,就是把年月日一一讀出來,然后在天的地方進(jìn)行加減。各位朋友如果有更好的方法請(qǐng)聯(lián)系我哦!QQ:3277121,或者到我的網(wǎng)站http:www.asp98.cn聯(lián)系我。

具體實(shí)例請(qǐng)看本站的 http://asp98.cn/Arclist.asp 頁(yè)面!

發(fā)表評(píng)論 共有條評(píng)論
用戶名: 密碼:
驗(yàn)證碼: 匿名發(fā)表
主站蜘蛛池模板: 马关县| 邵武市| 土默特左旗| 麻江县| 高淳县| 拜泉县| 河北区| 改则县| 集贤县| 华容县| 湛江市| 色达县| 武威市| 卢湾区| 廊坊市| 宜春市| 高州市| 陵水| 尤溪县| 沈阳市| 河池市| 赤城县| 怀来县| 龙岩市| 黎川县| 莎车县| 侯马市| 开封市| 巴南区| 融水| 仁布县| 邳州市| 神木县| 昌乐县| 沁源县| 衡东县| 奇台县| 镇原县| 新营市| 嘉荫县| 临颍县|