国产成人毛片毛片久久网_国产午夜激无码av毛片不_国产乱对白精彩在线播放_av资源站中文字幕_亚洲男人的天堂网站_国产成 人 综合 亚洲网_中国国产激情一区_少妇一级淫片免费放_亚洲一本大道av久在线播放_免费观看美女裸体网站

2019-4-2短日期 變 2019-04-02長(zhǎng)日期

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長(zhǎng)日期

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 日期格式轉(zhuǎn)換函數(shù)

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格式的日期中的月份和日期轉(zhuǎn)換成兩位數(shù)字的方法）

dim today
today=Date '避免重復(fù)調(diào)用Date，所以賦值給一個(gè)變量
today=Year(today) & "-" & Right("0" & Month(today),2) & "-" & Right("0" & Day(today),2)

以上就是東方網(wǎng)域小編為大家整理的ASP格式化時(shí)間日期補(bǔ)0相關(guān)內(nèi)容，詳情可以瀏覽網(wǎng)站的相關(guān)內(nèi)容或在線聯(lián)系客服，希望以上的對(duì)你有所幫助。