asp 格局化时间函数[网站编程]

本款函数可以按照用户给定的时间日期举行年代日,时分秒等,只要用户给定差别的style参数便可以显示差别气势的时间日期.

function formattime(testtime,style)  
dim n,y,r,s,f,m  
n = year(testtime)  
y = month(testtime)  
r = day(testtime)  
s = hour(testtime)  
f = minute(testtime)  
m = second(testtime)  
if len(n) = 2 then n = "20" & n  
if len(y) = 1 then y = "0" & y  
if len(r) = 1 then r = "0" & r   
if len(s) = 1 then s = "0" & s  
if len(f) = 1 then f = "0" & f  
if len(m) = 1 then m = "0" & m  
nn=right(n,2)  
if style = 1 then  
formattime = "<font color=""#ff0000"">"& n &"</font>年<font color=""#ff0000"">"& y &"</font>月<font color=""#ff0000"">"& r &"</font>日<font color=""#ff0000"">"& s &"</font>时"  
elseif style = 2 then  
formattime = r &"日 "& s & ":" & f & ":" & m  
elseif style = 3 then  
formattime = n &"年"& y &"月"& r &"日"  
elseif style = 4 then  
formattime = n & "-" & y & "-" & r & " " & s & ":" & f  
elseif style = 5 then  
formattime = y &"-"& r &" " & s & ":" & f  
elseif style = 6 then  
formattime = n &"年"& y &"月"& r &"日" & s &":"& f  
elseif style = 7 then  
formattime = n & y & r & s & f & m  
elseif style = 8 then  
formattime = n & "-" & y & "-" & r  
elseif style = 9 then  
formattime = n & "/" & y & "/" & r   
end if  
end function