ASP中格式化时间短日期补0变两位长日期的方法(asp 时间差)墙裂推荐

随心笔谈3年前发布 admin
213 0 0

文章摘要

本文介绍了Rem Pw_Sys中的一个日期格式转换函数DateTimeFormat。该函数用于将日期按照指定的格式进行转换,支持多种格式选项,包括: 1. 年/月/日格式(如"2023年10月15日") 2. 月/日格式(如"10月15日") 3. 年-月-日格式(如"2023-10-15") 4. 年/月/日格式(如"2023/10/15") 5. 月/日格式(如"10/15") 6. 星期几格式(如"星期三") 7. 年/月/格式(如"2023年10月") 8. 月/日格式(如"10/15") 9. 时间格式(如"10:15") 10. 年月格式(如"2023年10月") 该函数通过switch-case结构实现多种格式转换功能,适用于需要灵活调整日期显示格式的场景,如Web开发、数据分析等。


<%

Rem Pw_Sys 日期格式转换函数

function DateTimeFormat(DateTime,Format)
select case Format
case “1”
DateTimeFormat=””&year(DateTime)&”年”&month(DateTime)&”月”&Right(“0″ & Day(DateTime),2)&”日”
case “2”
DateTimeFormat=””&month(DateTime)&”月”&Right(“0″ & Day(DateTime),2)&”日”
case “3”
DateTimeFormat=””&year(DateTime)&”-“&month(DateTime)&”-“&Right(“0″ & Day(DateTime),2)&””
case “4”
DateTimeFormat=””&year(DateTime)&”/”&month(DateTime)&”/”&Right(“0″ & Day(DateTime),2)&””
case “5”
DateTimeFormat=””&month(DateTime)&”/”&Right(“0″ & Day(DateTime),2)&””
case “6”
DateTimeFormat=””&year(DateTime)&”年”&month(DateTime)&”月”&Right(“0” & Day(DateTime),2)&”日<font color=red> “&FormatDateTime(DateTime,4)&”</font>”
case “7”
temp=”星期日,星期一,星期二,星期三,星期四,星期五,星期六”
temp=split(temp,”,”)
DateTimeFormat=temp(WeekRight(“0” & Day(DateTime),2)-1)
case “8”
DateTimeFormat=””&month(DateTime)&”-“&Right(“0″ & Day(DateTime),2)&””
case “9”
if len(hour(DateTime))=1 then
str=”0″&hour(DateTime)
else
str=hour(DateTime)
end if
DateTimeFormat=DateTimeFormat(DateTime,1)&” “&str&”:”&Minute(DateTime)
case “10”
DateTimeFormat=””&year(DateTime)&”年”&month(DateTime)&”月”
case else
DateTimeFormat=DateTime
end select
end function

%>

© 版权声明

相关文章