当前位置: 首页 > 图文教程 > 网络编程 > ASP > asp之日期和时间函数示例

ASP
开辟一条自由ASP快车道
用XML结合数据库,给服务器减负。
纯编码实现数据库的建立或压缩
多个表单和多个图片一起上传完美解决方案
列表项可上下移动的Multiple列表
模拟QQ的下拉列表选择图象
利用FSO取得BMP,JPG,PNG,GIF文件信息(大小,宽、高等)
二级域名原理以及程序,申请即可开通.
利用ASP+XML架设在线考试系统
ASP项目中的通用条件查询模块
一个为字符串中的网址加上链接的程序例子
用Agent+ASP技术制作语音聊天室
多表单域无组件文件上传的例子
使用xmlhttp为网站增加股市行情查询功能
用ASP开发WEB日期选择器
javascript+HTML仿造VB里的MonthView控件
使用xmlHttp结合ASP,实现网页的异步调用
调用DirectX的组件实现的时钟
在ASP页里面注册DLL的VBScript CLASS
ASP程序界面的多语言支持

ASP 中的 asp之日期和时间函数示例


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

asp之日期和时间函数示例
可以使用日期和时间函数来得到各种格式的日期和时间

函数
语法
说明
示例
Now
Now()取得系统当前的日期和时间Dim MyVar MyVar = Now
' MyVar
包含当前的日期和时间。
Date
Date()取得系统当前的日期Dim MyDate MyDate = Date
' MyDate
包含当前系统日期。
Time
Time()取得系统当前的时间Dim MyTime MyTime = Time
' 返回当前系统时间。
Year
Year(Date)取得给定日期的年份Dim MyDate, MyYear
MyDate = #October 19, 1962#

'分派一日期。
MyYear = Year(MyDate)
' MyYear
包含 1962
Month
Month(Date)取得给定日期的月份Dim MyVar MyVar = Month(Now)
' MyVar包含当前月对应的数字。
Day
Day(Date)取得给定日期是几号Dim MyDay MyDay = Day("October 19, 1962")
'MyDay包含 19
Hour
Hour(time)取得给定时间是第几小时Dim MyTime, MyHour
MyTime = Now MyHour = Hour(MyTime)
' MyHour
包含代表当前时间的数值。
Minute
Minute(time)取得给定时间是第几分钟Dim MyVar
MyVar = Minute(Now)
Second
Second(time)取得给守时间是第几秒Dim MySec
MySec = Second(Now)
'MySec
包含代表当前秒的数字。
WeekDay
WeekDay(Date)取得给定日期是星期几的整数,1表示星期日,2表示星期一,依此类推Dim MyDate, MyWeekDay
MyDate = #October 19, 1962#

' 分派日期
MyWeekDay = Weekday(MyDate)
'
MyWeekDay
包含 6,MyDate 代表星期五
DateDiff
DateDiff("Var",Var1,Var2)
Var:日期或时间间隔因子,有如下参数:
yyyy 年 m月 d 日 ww星期 h小时 s秒
Var1:第一个日期或时间
Var2:第二个日期或时间,比Var1晚
计算两个日期或时间的间隔DateDiff("d",Date(),#1/1/2005#)
'返回离2005元旦还有多少
DateDiff("h",Date(),#1/1/2005#)
'返回离2005元旦还有多少小时
DateDiff("d",#1/1/2003#,#1/1/2005#)
'返回两个日期之间的天数
DateAdd
DateDiff("Var",Var1,Var2)
Var:日期或时间间隔因子:
Var1:日期或时间间隔倍数
Var2:日期或时间的基准
对两个日期或时间作加法

如下示例将 95 年 1 月 31 日加上一个月:

NewDate = DateAdd("m", 1, "31-Jan-95")

在这个示例中,DateAdd 返回 95 年 2 月 28 日,而不是 95 年 2 月 31 日。如果 date 为 96 年 1 月 31 日,则返回 96 年 2 月 29 日,这是因为 1996 是闰年。

如果计算的日期是在公元 100 年之前,则会产生错误。

FormatDateTime
FormatDateTime(Date,vbShortDate)转化为短日期格式FromatDateTime(Date(),vbLongDate)
"以长日期格式显示
FormatDateTime(Date,vbLongDate)转化为长日期格式
FormatDateTime(Date,vbShortTime)转化为短时间格式
FormatDateTime(Date,vbLongTime)转化为长时间格式