国产探花免费观看_亚洲丰满少妇自慰呻吟_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ā)表
主站蜘蛛池模板: 甘德县| 淮滨县| 道真| 井冈山市| 金门县| 三台县| 蒙阴县| 山丹县| 刚察县| 株洲市| 建水县| 辉县市| 黄大仙区| 宜都市| 洛阳市| 洛浦县| 云龙县| 石柱| 新乡县| 得荣县| 庆元县| 河曲县| 新巴尔虎左旗| 益阳市| 舞阳县| 萝北县| 灵武市| 新巴尔虎右旗| 土默特右旗| 郑州市| 内乡县| 鄂尔多斯市| 武平县| 德兴市| 平原县| 武安市| 梁山县| 宜兰市| 凉城县| 鹤峰县| 乐至县|