当前位置: 首页 > 图文教程 > 网络编程 > ASP > Asp获取当日文章并支持前一天后一天的方法

ASP
出现404页面错误的自动发送邮件的代码
ASP视频教程:建立显示已经添加的新闻页面
ASP视频教程:使用Eweb编辑器丰富新闻内容的格式
ASP视频教程:建立修改新闻页面
ASP视频教程:制作删除新闻的功能
ASP视频教程:建立产品类别表和添加类别页面
ASP视频教程:建立管理产品的页面
ASP视频教程:制作其它栏目管理页面
ASP实例教程:隐藏下载地址和防盗
ASP教程:虚拟目录下不能上传图片
ASP视频教程:制作网站前台顶部导航页面
ASP视频教程:制作前台导航菜单
ASP视频教程:对前台导航菜单进行调整美化
ASP视频教程:制作新闻中心显示页面
ASP视频教程:制作新闻详细内容显示页面
ASP视频教程:制作前台产品显示页面(按产品类别显示)
ASP视频教程:制作前台产品显示页面(横向重复显示图片)
ASP视频教程:制作在线订购页面
ASP视频教程:制作关于我们和联系我们页面
ASP视频教程:后台功能的一些完善

ASP 中的 Asp获取当日文章并支持前一天后一天的方法


出处:互联网   整理: 软晨网(RuanChen.com)   发布: 2009-08-14   浏览: 84 ::
收藏到网摘: n/a

今天群里一个朋友浏览了我的asp98.cn网站,她说最好做一个当日内容的列表,用户一般都懒得往下去看的。感觉非常有道理,这就是所谓的用户体验了,呵呵!说搞就搞!所以搞到半夜一点半...... - - #

内容列表非常简单,这里就不多说了,首先思路,定义一个变量获取值来查询数据库。如果为空就等于当前时间。

  一、变量定义 

二、判断日期格式是否正确

这个程序做好以后我才考虑到,现在觉得以他的重要性应该放在这里

(知识点:IsDate函数)

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

三、数据库查询
(知识点:这里用到一个datediff时间函数)

以下是引用片段:
Sql = "Select * From [表] where datediff('d',数据库时间,'"&变量名&"')=0 Order By id Desc"
...............
...........

 http:www.asp98.cn

四、最后加上一个链接

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

后一天处可以加一个判断

<%IF datediff("d",变量名,now())>0 then%>显示后一天的链接<%end if%>

有关这个链接,(*^__^*),本人试了很多方法都得不到正确的结果 所以用了最笨的方法,就是把年月日一一读出来,然后在天的地方进行加减。各位朋友如果有更好的方法请联系我哦!QQ:3277121,或者到我的网站http:www.asp98.cn联系我。

具体实例请看本站的 http://asp98.cn/Arclist.asp 页面!