最近很多站长说到网站建设最好做一个当日内容的列表，用户一般都懒得往下去看的。感觉非常有道理，这就是所谓的用户体验了，呵呵！内容列表非常简单，这里就不多说了，首先思路，定义一个变量获取值来查询数据库。如果为空就等于当前时间。
一、变量定义
代码如下：
dim 变量名 '名字自己起一下吧，本人最不会起名字了。
if request.querystring(参数) = then
变量名 = now
else
变量名 = request.querystring(参数)
end if
二、判断日期格式是否正确
这个程序做好以后我才考虑到，现在觉得以他的重要性应该放在这里
（知识点：isdate函数）
以下是引用片段：
if not isdate(变量名) then
变量名 = now
end if
三、数据库查询
（知识点：这里用到一个datediff时间函数）
以下是引用片段：
sql = select * from [表] where datediff('d',数据库时间,'&变量名&')=0 order by id desc
...............
...........
http:www.asp98.cn
四、最后加上一个链接
以下是引用片段：
前一天 后一天
后一天处可以加一个判断
0 then%>显示后一天的链接
有关这个链接，(*^__^*)，本人试了很多方法都得不到正确的结果 所以用了最笨的方法，就是把年月日一一读出来，然后在天的地方进行加减。