其他

防御吧作为15年知名老牌域名服务商,CNNIC和CANN双认证域名注册商,已经
持续为500多万个域名提供服务,包括智能DNS/自由转移/隐私保护等服务!
ASP格式化时间日期补0变2位数长日期表示
2019-04-02 14:46:46 【

2019-4-2短日期 变 2019-04-02长日期

Function FStime(times)
  Dim years,months,days
    if len(times)=0 then exit function
    years=year(times)
    months=right("0"&month(times),2)
    days=right("0"&day(times),2)
    times=years&"-"&months&"-"&days
    FStime=times
End Function

2019-4-1 23:37:5短日期 变 2010-04-01 23:37:05长日期

Function FLtime(times)
  Dim years,months,days,hours,minutes,seconds
    if len(times)=0 then exit function
    years=year(times):months=right("0"&month(times),2)
    days=right("0"&day(times),2):hours=right("0"&hour(times),2)
    minutes=right("0"&minute(times),2):seconds=right("0"&second(times),2)
    FLtime=years&"-"&months&"-"&days&" "&hours&":"&minutes&":"&seconds
End Function

<%

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

%>


程序代码(把yyyy-mm-dd格式的日期中的月份和日期转换成两位数字的方法)

dim today
today=Date '避免重复调用Date,所以赋值给一个变量
today=Year(today) & "-" & Right("0" & Month(today),2) & "-" & Right("0" & Day(today),2)

以上就是东方网域小编为大家整理的ASP格式化时间日期补0相关内容,详情可以浏览网站的相关内容或在线联系客服,希望以上的对你有所帮助。


】【打印关闭】 【返回顶部
分享到QQ空间
分享到: 
上一篇防御吧2019五一放假通知 下一篇centos使用yum安装apache+php+mys..

立足首都,辐射全球,防御吧专注云防御及云计算服务15年!

联系我们

联系地址:北京市朝阳区望京湖光中街一号鹏景阁大厦10层
服务热线:010-56157787 ,010-56159998
企业QQ:4000043998
技术支持:010-56159998
E-Mail:800@fangyuba.com
Copyright ? 2003-2016 fangyuba. 防御吧(完美解决防御与加速) 版权所有 增值许可:京B2-20140042号
售前咨询
公司总机:4000043998 01056155355
24小时电话:010-56159998
投诉电话:18910191973
值班售后/技术支持
售后服务/财务
备案专员
紧急电话:18610088800