ASP中格式化时间短日期补0变两位长日期的方法asp
2010-2-7短日期 变 2010-02-07长日期
Function FStime(times)
Dim years,months,days
if len(times)=0 then exit function
years=year(times)
&n...
2010-2-7短日期 变 2010-02-07长日期
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
2010-2-7 23:37:5短日期 变 2010-02-07 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
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
2010-2-7 23:37:5短日期 变 2010-02-07 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
上一篇：ASP常用函数收藏
我要评论