格式化时间日期函数

转载 2006年06月05日 10:05:00

<script language="vbScript">
<!--
Function DateTimeToString(oDate, sFormatInfo)
 Dim wkDayShort, wkDayLong
 Dim mtNameShort,mtNameLong
 wkDayShort = Array("Sun","Mon","Tue","Wed","Thu","Fri","Sat")
 wkDayLong = Array("Sunday","Monday","Tuesday","Wednesday","Thursday","Friday","Saturday")
 mtNameShort = Array("Jan","Feb","Mar","Apr","May","Jun","Jul","Aug","Sep","Oct","Nov","Dec")
 mtNameLong = Array("January","February","March","April","May","June","July","August","September","October","November","December")
 '格式模式替换
 sFormatInfo = Replace(sFormatInfo,"yyyy",Year(oDate))
 '临时转义
 sFormatInfo = Replace(sFormatInfo,"MMMM","$1")
 sFormatInfo = Replace(sFormatInfo,"dddd","$2")
 sFormatInfo = Replace(sFormatInfo,"MMM","$3")
 sFormatInfo = Replace(sFormatInfo,"ddd","$4")

 sFormatInfo = Replace(sFormatInfo,"yy",Right(Year(oDate),2))
 sFormatInfo = Replace(sFormatInfo,"MM",Right(String(2,"0") & Month(oDate),2))
 sFormatInfo = Replace(sFormatInfo,"dd",Right(String(2,"0") & Day(oDate),2))
 sFormatInfo = Replace(sFormatInfo,"HH",Right(String(2,"0") & Hour(oDate),2))
 sFormatInfo = Replace(sFormatInfo,"mm",Right(String(2,"0") & Minute(oDate),2))
 sFormatInfo = Replace(sFormatInfo,"ss",Right(String(2,"0") & Second(oDate),2))
 sFormatInfo = Replace(sFormatInfo,"M",Right(Month(oDate),1))
 sFormatInfo = Replace(sFormatInfo,"d",Right(Day(oDate),1))
 sFormatInfo = Replace(sFormatInfo,"h",Right(Day(oDate),1))
 sFormatInfo = Replace(sFormatInfo,"m",Right(Minute(oDate),1))

 sFormatInfo = Replace(sFormatInfo,"$1",mtNameLong(Month(oDate)-1))
 sFormatInfo = Replace(sFormatInfo,"$2",wkDayLong(Weekday(oDate,1)-1))
 sFormatInfo = Replace(sFormatInfo,"$3",mtNameShort(Month(oDate)-1))
 sFormatInfo = Replace(sFormatInfo,"$4",wkDayShort(Weekday(oDate,1)-1))

 DateTimeToString = sFormatInfo
End Function
//-->
</script>

--------------------------------------
实现以下格式模式:(英文可以改为中文)


格式模式     说明
d   月中的某一天。一位数的日期没有前导零。
dd   月中的某一天。一位数的日期有一个前导零。
ddd   周中某天的缩写名称,定义范围: "Sun","Mon","Tue","Wed","Thu","Fri","Sat"
dddd   周中某天的完整名称,定义范围: "Sunday","Monday","Tuesday","Wednesday","Thursday","Friday","Saturday"。
M   月份数字。一位数的月份没有前导零。
MM   月份数字。一位数的月份有一个前导零。
MMM   月份的缩写名称,定义范围: "Jan","Feb","Mar","Apr","May","Jun","Jul","Aug","Sep","Oct","Nov","Dec"。
MMMM   月份的完整名称,定义范围: "January","February","March","April","May","June","July","August","September","October","November","December"。 
yy   不包含纪元的年份。如果不包含纪元的年份小于 10,则显示具有前导零的年份。
yyyy   包括纪元的四位数的年份。   
H   24 小时制的小时。一位数的小时数没有前导零。
HH   24 小时制的小时。一位数的小时数有前导零。
m   分钟。一位数的分钟数没有前导零。
mm   分钟。一位数的分钟数有一个前导零。
s   秒。一位数的秒数没有前导零。
ss   秒。一位数的秒数有一个前导零。


实例:
-------------------
DateTimeToString(Now, "yyyy年M月dd日 HH:mm:ss")
->类似于 2006年5月22日 17:02:38

利用localtime_s函数格式化输出当地日期与时间

Visual C++ 6.0开发环境中显示当地日期与时间主要通过localtime()函数来实现,该函数的原型在time.h头文件中,其语法格式如下: struct tm *localtime(xo...

js 时间戳 日期格式化 函数

function date ( format, timestamp ) { var a, jsdate=((timestamp) ? new Date(timestamp*1000) : n...

js日期时间格式化函数 支持季度 24/12小时制 周 毫秒(Date扩展)

[javascript]代码库 "javascript" type = "text/javascript" >     /** ...

js 格式化时间日期函数小结

Date.prototype.format = function(format){ var o = { "M+" : this.getMonth()+1, //month "d+" : this.ge...

strftime() 函数根据区域设置格式化本地时间/日期

转自:百度百科求助编辑百科名片strftime,是一种计算机函数,strftime() 函数根据区域设置格式化本地时间/日期,函数的功能将时间格式化,或者说格式化一个时间字符串。目录函数简介程序示例I...

strftime()函数根据区域设置格式化本地时间/日期 setlocale() 函数设置地区信息(地域信息)

我是小白一个,知识要慢慢积累, 今天用到这个函数,发现很多功能,记录一下,下面其实就是PHP手册上复制下来的。 setlocale() 函数设置地区信息(地域信息) strft...

PHP日期和时间函数.ppt

  • 2017年08月03日 09:28
  • 4.44MB
  • 下载

oracle日期时间函数大全

  • 2014年06月05日 11:22
  • 25KB
  • 下载

[转] Linux常用C函数-日期时间篇

转Zi 日期时间篇 asctime ctime gettimeofday gmtime localtime mktime settimeofday time asctime(将时间和日期以字符串...
  • hailmy
  • hailmy
  • 2014年07月10日 14:26
  • 350
内容举报
返回顶部
收藏助手
不良信息举报
您举报文章:格式化时间日期函数
举报原因:
原因补充:

(最多只允许输入30个字)